빈 수식을 무시하고 데이터 영역의 가장자리로 이동

나는 열 A에 붙여 넣은 데이터를 참조하는 수식 ( C 열 ) 100000 줄이있는 Excel 스프레드 시트를 가지고 있습니다 . 결과 목록을 복사하려면 셀 C1 과 + + 를 선택하여 전체 범위를 선택한 다음 I + 를 선택합니다 .ctrlshiftdownctrlc

내가 직면하고있는 문제는 수식을 가진 빈 셀은 여전히 가치가있는 것처럼 계산된다는 것입니다. 따라서 C 열 에서 데이터를 선택하려고 할 때 A 열에 97000 줄만 붙여 넣으면 C100000까지 줄 바꿈을 선택했기 때문에 + +를 올바르게 사용할 수 없습니다 . 셀을 이동하거나 범위를 선택할 때 계산 된 값이 비어 있거나 존재하지 않는 수식이있는 셀을 무시할 수있는 방법이 있습니까?ctrlshiftdown

microsoft-excel

— leobelones
소스

이 Find도구를 Find All열의 값에 사용할 수 있습니다 . 그런 다음 Ctrl-A모두 선택하십시오. 그러나 10 만 개 (또는 97,000 개)의 아이템으로는 상당한 시간이 걸릴 것입니다. 또는 짧은 VBA 매크로를 사용하여 범위를 선택할 수도 있습니다.

또는 아래 표시된 매크로를 사용하여 커서가있는 셀을 확장하여 첫 번째 셀에서 데이터를 표시하는 마지막 셀까지의 열에있는 셀을 모두 포함 할 수 있습니다.

특정 열에 하드 코딩 할 수 있으며 원하는 경우 매크로에 복사 / 붙여 넣기 값 시퀀스를 포함 할 수도 있습니다.

Option Explicit

Sub SelectWithValues()
    Dim R As Range
    Dim LastRow As Long

With Columns(Selection.Column)
    Set R = .Cells.Find(what:="*", after:=.Cells(1, 1), _
                        LookIn:=xlValues, searchorder:=xlByRows, _
                        searchdirection:=xlPrevious)
    If Not R Is Nothing Then
        Set R = Range(Cells(1, R.Column), R)
        R.Select
    End If
End With

End Sub

이 매크로 (Sub)를 입력하기 alt-F11위해 Visual Basic 편집기를 엽니 다. 프로젝트 탐색기 창에서 프로젝트가 강조 표시되어 있는지 확인하십시오. 그런 다음 상단 메뉴에서 삽입 / 모듈을 선택하고 열리는 창에 아래 코드를 붙여 넣으십시오.

이 매크로 (하위)를 사용하려면 커서를 선택하려는 열에 놓으십시오. alt-F8매크로 대화 상자를 엽니 다. 매크로를 이름 및으로 선택하십시오 RUN.

— 론 로젠 펠드
소스