Hintergrundfarben bei Pdf-Erstellung ignorieren
09.11.2015 11:33:42
Mike
ich verwende folgendes Makro, um per Button-Klick ein Pdf von einem Tabellenblatt zu erstellen.
Der Code funktioniert soweit, mein Problem ist jedoch, dass ich in dem Blatt die Hintergrundfarbe einiger Zellen ändern muss, um diese als Eingabefelder zu kennzeichen.
Diese Hintergrundfarbe soll aber nicht auf dem PDF erscheinen - dort soll der Hintergrund einheitlich transparent, d.h. ohne Farbe sein.
Gibt es eine Möglichkeit, dass im Code zu definieren oder sonst eine Lösung dafür, ohne manuelles Ändern ?
Mein Code:
Sub CreatePdf()
Dim varDesktopPath As String
Dim varTimestamp As String
varTimestamp = Format(Now(), "yyyy-mm-dd_hh-mm-ss")
varDesktopPath = DesktopPath
Call CreateHeaderFooter
Worksheets(2).ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=varDesktopPath & "\" & ActiveWorkbook.Name & "_" & varTimestamp & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True
End Sub
Vielen Dank im Voraus,
Mike