Thema Datum  Von Nutzer Rating
Antwort
24.01.2017 14:31:51 Rodgerwilco
NotSolved
Blau Automatisierte Dokumentationserstellung
 25.01.2017 13:18:31 BigBen
NotSolved
25.01.2017 13:34:53 BigBen
NotSolved

Ansicht des Beitrags:
Von:
BigBen		 Datum:
25.01.2017 13:18:31		 Views:
569		 Rating:
     
Antwort:
  Ja
Thema:
Automatisierte Dokumentationserstellung

Hallo,

mit diesem VBA-Code kann man alle geladenene Projekte durchlaufen und die VBA-Code der einzelnen Module ausgeben lassen:

Sub VBA_Auslesen()
    Dim i As Long
    Dim prj As Object
    Dim vbcomp As Object
    For Each prj In ActiveDocument.VBProject.VBE.VBProjects
        For Each vbcomp In prj.vbcomponents
            Debug.Print "Komponente: " & vbcomp.Name
            With vbcomp.CodeModule
                i = 1
                Do Until i > .countoflines
                    Debug.Print .Lines(i, 1)
                    i = i + 1
                Loop
            End With
        Next
        Debug.Print prj.Name
    Next
End Sub

Beim Entwickeln der Routine habe diese Webseite als Nachschlagequelle verwendet.

Standardmäßig ist der Zugriff vom Thrust Center nicht erlaubt. Um den Zugriff gestatten zu können muss gemäß dieser Webseite eine Option angepasst werden.

LG, BigBen

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
24.01.2017 14:31:51 Rodgerwilco
NotSolved
Blau Automatisierte Dokumentationserstellung
 25.01.2017 13:18:31 BigBen
NotSolved
25.01.2017 13:34:53 BigBen
NotSolved