2014-10-29 1 views
0

여러 가지 다른 기능을 수행하기 위해 VBA에 매크로를 구축 중 하나는 다른 매크로에서 보고서로 데이터를 복사하는 것입니다. 스프레드 시트. 데이터를 제공 할 마스터 스프레드 시트에는 모든 클라이언트에 대한 데이터가 있으며, VLOOKUP을 사용하고 해당 클라이언트와 관련된 모든 데이터를 가져옵니다. 어느 방법이된다# N/A가 아닌 행을 삭제하거나 # N/A가 아닌 행만 선택하는 경우

1) #N/A 첫 번째 항목에 대한 항목을보고는 상기 제 #N/A의 행 번호를 당기는 위의 모든 데이터 (선택하는 것이 유용 할 제 2 비트 용이

할 것이다

2) 행을 삭제는 열 U # 개의 N/A입니다 -이 발견 한 문제가 루프가 매우 큰 것을하고 아래의 링크

I want to delete the row if columns C,D and E has #N/A using VBA

유사한 오랜 시간, 내가 사용됩니다
+0

[이 항목 (http://stackoverflow.com/questions/11631363/how-to-copy-a-line-in-excel-using-a-specific-word-and-pasting-to-another -excel-s)가 시작됩니다. –

+0

VBA에서 '# N/A'와 (과) 동등하지 않아 필터링 할 수 없습니까? – DannyBland

+0

Criteria1 : = "# N/A" –

답변

1

이 정도면 충분합니까 ?? :

Sub Macro1() 
    Dim N As Long, rFilter As Range 
    N = Cells(Rows.Count, "U").End(xlUp).Row 
    Application.ScreenUpdating = False 
    Application.Calculation = xlCalculationManual 
     Set rFilter = Range("U1:U" & N) 
     Set rr = Range("U2:U" & N) 
     rFilter.AutoFilter Field:=1, Criteria1:="#N/A" 
     Set rkill = rr.Cells.SpecialCells(xlCellTypeVisible) 
     rkill.EntireRow.Delete 
    Application.ScreenUpdating = True 
    Application.Calculation = xlCalculationAutomatic 
    rFilter(1).AutoFilter 
End Sub 
관련 문제