|
Hi,
ich bin neu hier! Und hoffe auf Hilfe, da ich eigenlich keinerlei Erfahrung habe was VBA etc. an geht, geschweige denn irgendwas mit programmieren zu tun habe...
Eins meiner Probleme ist folgendes:
Meine Excel Datei hat neben anderen Makros ein VBA-Modul, das aus einem bestimmtem Bereich in der selben Arbeitsmappe eine pdf erstellt und diese öffnet und gleichzeitig an einem festdefinierten Ort ableget.
Das hat bis vor kurzem alles auch funktioniert ohne Probleme, allerdings meldet es nun bei eine Fehlermeldung:
Fehler beim Kompilieren:
Variable nicht definiert.
Ich vertsehe nicht genau warum, da dem Button eigentlich das korekkte Makro zugewisen ist und sich das nicht geändert hat.
Hier nun der Code, die erste Zeile wird mir dann gelb markeirt, wenn ich in der fehlermeldung auf OK klicke:
Sub aktivesBlattToPdf()
Dim PDFFileName As String
Dim LastRow As Integer
Dim PDFPath As String
PDFPath = ThisWorkbook.Path & "\Style Sheet"
PDFFileName = Range("A2") & " - " & Range("B2").Value & Range("A1") & ".pdf"
LastRow = ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Row
If Dir(PDFPath & client, vbDirectory) = "" Then
MsgBox "Please create a folder name: Style Sheet"
Else
Sheets("Supplier_Sheet").Range("A2:AA" & LastRow).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
PDFPath & "\" & PDFFileName, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End If
Kann mir hier jemand helfen, wie ich da swieder korrigieren kann?
Viele Grüße,
Nora
|