새 행을 만들고 셀을 선택하십시오.

Question

사용자가 양식에 행을 추가 할 수있게하려는 중입니다. 그러나 프로그래밍 방식으로 행을 추가해야 새로운 행에 이미 매크로가 할당 된 확인란이 포함됩니다.

내 솔루션은 InputBox로 행을 삽입하는 것이 었습니다.

Dim rowloc As String 

rowloc = InputBox("Location to Insert Row", "What row do you want to insert 
the new row ABOVE?") 

Rows(rowloc).Select 
Selection.Insert Shift:=xlDown 

그러나 나는 시간의 지옥이 그 새로운 행의 열 B로 이동하여 체크 박스를 삽입하는 데. VBA에서 새로운 버튼을 만드는 데 문제가 없습니다. 문제가되는 다른 셀로 연결됩니다.

Rows(rowloc).Offset(0, 1).Select 

도 작동하지 않습니다. 유용한 힌트 또는 솔루션?

Answer 1

Thw Rows(rowloc)은 행 rowloc의 모든 셀을 포함하는 범위입니다. 당신은, 동등하게,

Rows(rowloc).Parent.Cells(rowloc,2).Select ' in column 2 ("B") 

또는

ActiveSheet.Cells(rowloc,2).Select ' in column 2 ("B") 
    ' might not be the same worksheet though, depending on your setup 

등을, 예를 들어, 다음 (이 행에)이 범위에

Rows(rowloc).Cells(2).Select ' in column 2 ("B") 

을 셀을 식별하거나해야하는 경우