Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

mehrere Tabellen in eine PDF-Datei zusammenführen

mehrere Tabellen in eine PDF-Datei zusammenführen
03.03.2015 19:21:24
Andy
Hallo,
habe diese Listbox und möchte in dieser Listbox mehrere Tabellen auswählen und als PDF-Datei konvertieren.
Das klappt auch ganz gut.
Nun möchte ich, das diese ausgewählten Tabellen in eine PDF-Datei gespeichert werden.
Der Name und das Datum soll aus Tabelle2 A1 und B1 entnommen werden.
Währe für eine Lösung sehr dankbar!!
Gruß Andy
Private Sub CommandButton1_Click()
Dim i As Integer
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
'Sheets(Array(ListBox1)).Selected(i)
ActiveSheet.ExportAsFixedFormat xlTypePDF, Filename:= _
"C:\Users\master\Documents\Messungen\" & Worksheets(ListBox1.List(i)) _
.Range("A1").Value & "_" & Format(Worksheets(ListBox1.List(i)). _
Range("B1").Value, "dd.mm.yyyy")
End If
Next i
Unload Me
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub

Private Sub UserForm_Initialize()
For Each sh In ThisWorkbook.Worksheets
Me.ListBox1.AddItem sh.Name
Next
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: mehrere Tabellen in eine PDF-Datei zusammenführen
03.03.2015 20:07:27
mumpel
Hallo!
Kleines Beispiel für Checkboxen. Müsstest Du entsprechend anpassen.
Ausgewählte Blätter als PDF
Gruß, René
Anzeige

341 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige