[VBA] 단축키:F8, 마침표, 콜론 관련 문의드립니다

Question

1. 한 단계씩 코드 실행[F8]이 안먹힐 때

보통 Sub abc() ~ End Sub()은 단축키 F8 을 사용해 값을 보면서 코드를 이해하고 있는데요,

사용자정의함수는 단축키 F8 이 안먹히네요,

DeBug.Print도 하기 애매하고, 어떻게 한 단계씩 코드를 실행해 볼 수 있는 방법이 없을까요?

아니면, 값을 확인할 수 있는 또 다른 좋은 방법이 없을까요?

Function InRange(rng1, rng2) As Boolean

    InRange = False

    If rng1.Parent.Parent.Name = rng2.Parent.Parent.Name Then

        If rng1.Parent.Name = rng2.Parent.Name Then

            If Union(rng1, rng2).Address = rng2.Address Then

                InRange = True

            End If

        End If

    End If

End Function

2-1. 마침표(.)의 의미가 무엇인지 모르겠습니다. 이걸 왜 사용했는지요?

Parent와 관련 있는 것 같기도 하고 참 애매합니다.

Function LASTINCOLUMN(rng As Range)

    Dim LastCell As Range

    Application.Volatile

    With rng.Parent        With .Cells(**.**Rows.Count, rng.Column)

            If Not IsEmpty(**.**Value) Then

                LASTINCOLUMN = **.**Value

            ElseIf IsEmpty(**.**End(xlUp)) Then

                LASTINCOLUMN = ""

            Else

                LASTINCOLUMN = **.**End(xlUp).Value

            End If

         End With

    End With

End Function

2-2. FileDialog의 속성, 메서드(.InitialFileName, .Title,  .Show)같아요.

FileDialog(msoFileDialogFolderPicker) 다음에 _(언더바)없이 .(마침표)를 사용했는데, 왜 이렇게 사용했을까요?

여기서 .(마침표)의 의미가 무엇인지요?

Sub GetAFolder2()

    If Val(Application.Version) < 10 Then

        MsgBox "This requires Excel 2002 or later.", vbCritical

        Exit Sub

    End If

    With Application.FileDialog(msoFileDialogFolderPicker)

        **.**InitialFileName = Application.DefaultFilePath & ""

        **.**Title = "Please select a location for the backup"

        **.**Show

        If .SelectedItems.Count = 0 Then

            MsgBox "Canceled"

        Else

            MsgBox .SelectedItems(1)

        End If

    End With

End Sub

**3. 아래의 코드에서 Canceled: 의  : (콜론)**의미가 무엇인지요?

콜론을 지우면 에러가 뜨던데 정확한 의미를 알고 싶어요.

Sub EraseRange()

    Dim UserRange As Range

    On Error GoTo Canceled    Set UserRange = Application.InputBox _

        (Prompt:="Range to erase:", _

        Title:="Range Erase", _

        Default:=Selection.Address, _

        Type:=8)

    UserRange.Clear

    UserRange.Select

Canceled:

End Sub

첨부파일을 첨부하고 싶은데, 이 게시판에는 첨부파일을 첨부할 수 없네요.

감사합니다.

Answer 1

안녕하십니까? 치카치카님

Microsoft Community 사이트를 방문해 주셔서 감사합니다.

문의 하신 VBA 단축키 문제에 대해 안내를 드리겠습니다.

말씀해 주신 VBA 매크로의 경우 해당 포럼에서는 지원이 되지 않습니다.

MSDN 개발자 포럼에 문의하여 도움을 받으시기 바랍니다.

http://msdn.microsoft.com/ko-kr/office/

http://social.msdn.microsoft.com/Forums/vstudio/ko-KR/home?forum=visualbasicko

추가적인 내용이 있다면 하단의 [응답] 버튼을 눌러 회신해주시기 바랍니다.

제시해 드린 답변이 도움이 되었기를 바랍니다.

응답이 문제 해결에 도움이 되었다면, 아래에 있는 답변으로 [표시] 버튼을 눌러 주시기 바랍니다. 이는 유사한 증상을 겪는 다른 사용자들에게 도움이 될 수 있습니다.

감사합니다.