excel - プログラムで Excel VBE 選択にアクセスできますか?

Question

Excel VBE でいくつかの VB コンポーネントを開き、一部のテキストを次のように強調表示すると、

テキスト「zBool」をプログラムで取得する方法はありますか?

Sendkeys を使用しないことが望ましい

6x ニュージーランド スタインラーガー ビール (良い解決策)、別の良い解決策

Q: 黒い羊が白い羊よりも食べる量が少ないのはなぜですか?

A：数が少ないから

Answer 1

「Microsoft Visual Basic for applications extensibility...」への参照を追加します。

Sub Tester()

Dim oVBE As vbe
Dim startLine As Long, startCol As Long
Dim endLine As Long, endCol As Long
Dim sContent As String, tmp As String, l As Long
    Set oVBE = Application.vbe

    oVBE.ActiveCodePane.GetSelection _
        startLine, startCol, endLine, endCol

    For l = startLine To endLine
        tmp = oVBE.ActiveCodePane.CodeModule.Lines(l, 1)
        If l = endLine Then tmp = Left(tmp, endCol - 1)
        If l = startLine Then tmp = Right(tmp, (Len(tmp) - startCol) + 1)
        sContent = sContent & IIf(Len(sContent) > 0, Chr(10), "") & _
                  tmp
    Next l


    Debug.Print sContent

End Sub

GetSelection メソッド: http://msdn.microsoft.com/en-us/library/aa443954(v=vs.60).aspx

返された情報を使用して実際のテキストにアクセスする方法については、こちらを参照してください: http://www.cpearson.com/excel/vbe.aspx (どこかにあるはずです...)

編集-私自身の教育のためにあなたのためにそれをしました...
私はそれをあなたのタブに置きます;-)