Wenn Frame1=leer Druck verweigern
02.05.2007 09:52:31
Losos
ich zeige in einem Frame1 Diagramm an, den Nutzer vorher aus einem ComboBox ausgewählt hat.
Das funktioniert schon, aber falls er kein Auswahl getroffen hat möchte ihn informieren, dass kein Druck möglich ist bzw. kein Diagramm gewählt wurde und auch nicht drucken. Wie kann ich prüfen: ist ein Diagramm in Frame1 vorhanden?
Das was ich probiert habe funktioniert nicht. Bitte um Hilfe!
Private Sub cbDrucken_Click()
If UserForm2.Frame1.Picture = "" Then
MsgBox ("Kein Diagramm vorhanden!")
Else
Sheets("Vergleich").Select
ActiveSheet.ChartObjects("Chart 4").Activate
ActiveChart.ChartArea.Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End If
End Sub