Variable im Makro nutzen
10.10.2022 12:43:54
sandra
irgendwie komme ich an diese Stelle nicht weiter und hoffe, dass mir jemand helfen kann.
ich würde gern über ein Makro den Namen eine Tabellenblattes aus einer Zelle auslesen, um diesen dann mit einigen anderen "fixen" Tabellenblättern zu einer pdf-Datei zusammenfügen. Leider weiß ich nicht, wie ich diese Variable abfrage bzw. einbinde:
Sub PD()
Name = Worksheets("Input").Cells(1, 67).Value 'hier steht das Tabellenblatt welches variable ist
Dim strFileName As String, sFile As String
strFileName = Application.GetSaveAsFilename(InitialFileName:=Environ("Userprofile") & "\Desktop\" & "Calcu" & Range("D3").Value, FileFilter:="PDF-Datei (*.pdf), *.pdf")
If strFileName = "Falsch" Then Exit Sub
Sheets(Array("Input", "Capacity", "Options", Das Variable Tabellenblatt)).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=strFileName, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False _
Sheets("Input").Select
MsgBox "Datei als PDF gespeichert unter / File saved as PDF at " & strFileName, 64, "Hinweis / Note"
End Sub