VBA Input-Eingabe in Zelle eintragen?
Guten Abend,
ich möchte gerne den Inhalt aus einer Inputbox in Zelle D28 schreiben, nur leider funktioniert es nicht.
Folgendes Makro: (sicherlich nicht schön geschrieben aber es bis auf die Zelle D28)
Sub erstellen()
Dim NeuerTabellenName As String
Dim TabellenName As Boolean
Dim myInput As String
Dim WsTabelle As Worksheet
myInput = InputBox("Bitte geben Sie den Namen des neuen Monates an", "Monat anlegen")
For Each WsTabelle In Worksheets
If WsTabelle.Name = myInput Then
TabellenName = True
Exit For
End If
Next WsTabelle
If TabellenName Then
MsgBox ("Der Monat existiert bereits. Der Vorgang wurde abgebrochen. Bitte ueberpruefen Sie Ihre Eingabe.")
Worksheets("Admin").Select
Else
NeuerTabellenName = myInput
Worksheets("Muster").Copy After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Name = NeuerTabellenName
Worksheets("Admin").Range(D28).Value = myInput
Worksheets("Admin").Select
End If
End Sub
Der Fehler muss ja hier liegen:
Worksheets("Admin").Range(D28).Value = myInput
Über eine Lösung wäre ich sehr dankbar.
Gruß
3 Antworten
Vom Fragesteller als hilfreich ausgezeichnet
Nutzer, der sehr aktiv auf gutefrage ist
Probiers mal mit
Worksheets("Admin").Cells(28,4).Value = myInput
Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer
Microsoft Excel, VBA
Dir fehlen die Gänsefüße "D28"
Worksheets("Admin").Range("D28").Value = myInput
Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer
Microsoft Excel
Worksheets("Admin").Range("D28").Value = myInput
sollte klappen.
Woher ich das weiß:Berufserfahrung – IT-Administrator (i.R.)
Super, vielen Dank :) Hatte jetzt @LtLTSmash Vorschlag schon verwendet aber deines klappt auch! Dankeschön
Oubyi, UserMod Light
06.12.2019, 20:17
@RobinM66
Gern geschehen😊.
Ja, das sind zwei gleichwertige Möglichkeiten.
Wobei "Cells" den Vorteil hat, dass man leichter Variablen einbauen kann und "Range", dass man die Zelladresse direkt ablesen kann.
Super, es funktioniert. Vielen Dank. Aber ist das inhaltlich nicht im Endeffekt genau das gleiche?