|
Moin zusammen,
ich stehe gerad evoll auf der Leitung....
Ich drucke ein PDF mit Sheets (Array("Seite1", "Seite2" usw)) das klappt. Nun habe ich zwei Abfragen dazu gebaut.
Wenn Checkbox1.value=true - dann kommt eine bestimmte seite dazu
Wenn Checkbox2.value=true - dann kommt eine bestimmte seite dazu
Wie mache ich das wenn beide true sind ?????
==================================================================================
If Tabelle5.CheckBox36.Value = True Then
Sheets(Array("Header info", "Change description", "Task list", "TT- Annex")).Select
ElseIf Tabelle2.CheckBox1.Value = True Then
Sheets(Array("Header info", "Change description", "Task list", "Annex Change description")).Select
Else
Sheets(Array("Header info", "Change description", "Task list", "Annex Change description", "TT- Annex")).Select
Else
Sheets(Array("Header info", "Change description", "Task list", "Annex Change description")).Select
ActiveWorkbook.ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=Rout & Dat, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("Header info").Select
On Error GoTo 0
End If
============================================================
Im markierten bereich hänge ich gerade. Wenn keine aktiv ist sollen die beiden nicht mitgedruckt werden.
Eien weitere Frage noch:
Wenn die Datei schon vorhanden ist soll eine Warnung ausgegeben werden und entweder überschreiben oder abbrechen.
Hoffe auf Tipps von Euch. Danke schon mal
Gruß Andy
|