Clever-Excel-Forum

Hallo Com :15:

Ich habe eine kleine Frage bezüglich des speicherns oder drucken von Excel Tabellen mit VBA Code.
Bin da nicht so der Profi, deshalb hoffe ich, dass mir vielleicht jemand weiterhelfen kann.

Folgende Situation:
Ich habe 40 Excel Dateien, welche jeweils 1-2 Tabellen haben mit dem dazugehören Code geschrieben in VBA.
Nun würde ich gerne diese Excel Dateien im PDF Format speichern.
Wichtig ist mir dabei, dass dabei die benutzen Tabellenblätter und der VBA Code in der PDF zu sehen sind. Leider weiß ich nur wie ich die Tabellenblätter speicher, jedoch nicht mit den Makros dazu.

Gibt es vielleicht irgendeine Möglichkeit (u.a. mit einem Drittprogramm oder ähnlichem) so eine PDF Datei zu erstellen?
Es ist leider sehr mühselig, jede Datei einzeln zu öffnen und die Tabellen mit dem VBA Code getrennt zu drucken.

Anbei ein kleines Beispiel, wie so eine Datei aussieht.

Code:
Sub M_snb()

   With ThisWorkbook.VBProject.VBComponents("Tabelle1").CodeModule

     c00 = .Lines(1, .CountOfLines)

   End With

   With Tabelle1.Shapes.AddTextbox(1, 20, 120, 600, 760).TextFrame2.TextRange

        .Font.Size = 8

        .Text = c00

        Tabelle1.ExportAsFixedFormat 0, "..........."

        .Parent.Parent.Delete

    End With

 End Sub

Sykora

snb