Makro läuft (noch) nicht...funktionsaufruf
21.11.2006 07:21:32
niki
Dachte ich könnte mit angefügtem Makro einem Nutzer etwas drucken lassen, wenn aber die zelle A2 leer ist drauf hinweisen, das in dem (ausgeblendetem) blatt ohnehin nichts steht...aber das will so nicht...die fehlermeldung ist : funktionsaufruf muss den typ variant oder objekt zurückgeben...weiß jemand rat?
vielen dank!!
Sub drucken_1()
If Sheets("Tabelle1").Range("A2") = "" Then
MsgBox("keine Kommentare zum drucken!", vbOKOnly, "Keine Kommentare vorhanden") = vbOK
Else
Sheets("Tabelle1").PrintOut Copies:=1, Collate:=True
End If
End Sub