[땡큐엑셀vba & 엑셀매크로] 엑셀 매크로 실행시 빈셀에 대해서는 실행하지 않도록 하는 방법 문의드립니다.

 

 

 

 

'작성자:땡큐엑셀vba & 엑셀매크로
'먼저 범위를 선택한후 실행하세요
Sub 한줄로()

    'G열 지우기
    Columns("G").ClearContents
    
    '선택한 범위를 루프돌며 공백이 아닌 값을 G열에 나열함
    i = 0
    For Each r In Selection
    
        If r <> "" Then
            i = i + 1
            Range("G" & i) = r
        End If
    
    Next
    
	MsgBox "완료되었습니다", vbInformation, "땡큐엑셀vba & 엑셀매크로"   
    
End Sub


 
 
 

 

 

내용있는셀만한열로정리하기-땡큐엑셀vba.xlsm

0.07MB