다음을 통해 공유


방법: 매크로를 사용하여 Visual Basic 또는 C# 코드 편집기에서 텍스트 추가

업데이트: 2007년 11월

확장성 개체 모델을 사용하여 Visual Basic, Visual C# 또는 Visual J# 코드 편집기에 코드를 추가할 수 있습니다. 새 프로시저나 표준 주석 블록을 추가하는 데 이 기능을 사용할 수 있습니다. 이 작업을 하려면 매크로 통합 개발 환경에 액세스하여 매크로 프로젝트를 만드는 방법을 알고 있어야 합니다. 자세한 내용은 매크로 프로젝트 추가 대화 상자를 참조하십시오. 다음 매크로 샘플을 구현하려면 Visual Basic 프로젝트가 열려 있어야 합니다.

다음 단계에서는 Visual Basic 코드 편집기에 텍스트를 추가합니다. Visual C# 코드 편집기에 코드를 추가하려면 5단계에서 prjKindCSharpProject 열거형 값을 사용합니다. Visual J# 코드 편집기에 코드를 추가하려면 5단계에서 prjKindVJSharpProject 열거형 값을 사용합니다.

참고:

표시되는 대화 상자와 메뉴 명령은 실제 설정이나 버전에 따라 도움말에서 설명하는 것과 다를 수 있습니다. 이러한 절차는 일반 개발 설정을 사용하여 개발되었습니다. 설정을 변경하려면 도구 메뉴에서 설정 가져오기 및 내보내기를 선택합니다. 자세한 내용은 Visual Studio 설정을 참조하십시오.

활성 Visual Basic 코드 편집기의 최상위에 텍스트를 추가하려면

  1. EditorMacros라는 새 매크로 모듈을 만듭니다.

  2. 다음 코드를 매크로 모듈에 추가하여 새 매크로인 AddSomeText를 만듭니다.

    Public Sub AddSomeText()
       ' Will add code here to add text.
    End Sub
    
  3. 변수를 선언하고 열려 있는 코드 편집기를 참조하도록 초기화합니다.

    Dim doc As Document = DTE.ActiveDocument
    

    자세한 내용은 Document 개체 및 ActiveDocument 속성을 참조하십시오.

  4. Document 개체에는 다음과 같이 Object 메서드를 사용하여 액세스할 수 있는 TextDocument 개체가 포함되어 있습니다.

    Dim textDoc As TextDocument = _
       CType(doc.Object("TextDocument"), TextDocument)
    
  5. Visual Basic 코드 편집기에 코드가 추가되는지 확인하려면 창을 포함하고 있는 프로젝트의 Kind 속성을 테스트합니다.

    If doc.ProjectItem.ContainingProject.Kind = _
    VSLangProj.PrjKind.prjKindVBProject Then
       ' Add code here to insert text.
    End If
    
  6. TextDocument 개체를 사용하여 편집기 시작 부분에 편집 지점을 만듭니다. 그런 다음 Selection 속성의 Insert 메서드를 사용하여 편집기에 텍스트를 추가합니다. 자세한 내용은 CreateEditPoint 메서드 및 Selection 속성을 참조하십시오.

    textDoc.StartPoint.CreateEditPoint()
    textDoc.Selection.Insert("' A comment")
    

    완성된 매크로는 다음과 같습니다.

    Public Sub AddSomeText()
       Dim doc As Document = DTE.ActiveDocument
       Dim textDoc As TextDocument = _
          CType(doc.Object("TextDocument"), TextDocument)
       If doc.ProjectItem.ContainingProject.Kind = _
          VSLangProj.PrjKind.prjKindVBProject Then
          textDoc.StartPoint.CreateEditPoint()
          textDoc.Selection.Insert("' A comment")
       End If
    End Sub
    
  7. 매크로를 저장한 다음 매크로 IDE를 닫고 매크로 탐색기에서 매크로를 실행합니다.

참고 항목

참조

ActiveDocument

Document

TextDocument