ich würde gern per Buttonklick eine Abfrage starten wollen, wobei bestimmte Zellen auf leere Zellen gecheckt werden und wenn welche vorhanden sind, in diese ein "n.b." schreibt.
Mein ansatz:
Sub button()
If Sheets(Tabelle1).Cells(1, 1).Value = "" Then
Sheets(Tabelle1).Cells(1, 1).Value = "n.b."
End If
End Sub
aber hier erscheint Laufzeitfehler 13, Typen unverträglich.Danke im Voraus.
Gruß Erik