2014-04-10 1 views
0

(VBA)엑셀 VBA : 응용 프로그램에 대한 I 엑셀 비주얼 베이직을 사용하고 IF 문

나는, 세포의 집합을 선택하는 매크로를 가지고 그들을 절단하고 붙여 넣기와 범위 ('셀) ALL 기타 사항 서보 -OFF 교체 사용자가 선택한 다른 시트의 정의 된 셀로 이동합니다. 그러나 사용자가 선택한 스프레드 시트에서 빈 행 (예 : 0으로 표시)을 매크로로 찾아야합니다. 데이터는 붙여 넣기중인 지점에 이미있을 수 있습니다.

내 코드

: 기본적으로

Sub Button11_Click() 
' 
' Button11_Click Macro 
' 

' 
    Range("A2:K2").Select 
    Selection.Cut 
    Sheets(Application.InputBox("Type desired Team")).Select 
    Range("B4").Select 
    Sheets("ImporterSheet").Select 
End Sub 

,

Range(B4).Select 

필요

Range(If ActiveCell <> 0 then ActiveCell.Offset(1,0). If ActiveCell = 0 then paste data here) 

답변

1

로 대체 할이 시도 :

Range(Range("B:B").Find(0, [B1]).Address).Select 

에서 0 인 첫 번째 셀을 선택합니다.
이것이 필요한가요?

현재로서는 THIS을 시도해 보시면 코딩을 향상시키는 데 도움이 될 것입니다.

+0

셀 B1에 배치하는 것이 좋지만 셀 B4에서 0을 찾아야합니다. – user3408099

+0

그런 다음'[B1]'을'[B4]'로 변경하십시오. – L42

+0

고마워요,하지만 지금은 "오류 91 : 개체 변수 또는 블록 변수가 설정되지 않았습니다"및 해당 디버깅 줄을 범위 (범위 ("B : B"). 찾기 (0, [B1]).).고르다 – user3408099