Ich würde gerne mit einem Makro eine Inputbox aufrufen einen Wert eingeben und diesen in die Zelle A1 in der Tabelle1 eintragen lassen.
Kann mir da wer weiterhelfen?
Danke
Sub test()
Dim Wert
Wert = InputBox("Geben Sie einen Wert ein:")
If Wert <> "" Then
Sheets("Tabelle1").Range("A1") = Wert
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen