Hallo erneut Excel-Freunde,
mein Titel verrät es bereits. Eine Zelle soll markiert werden, daraufhin soll "F2" und dann "Enter" gedrückt werden.
Mein Makro sieht bisher so aus:
'Ans Ende der Tabelle springen
ActiveSheet.Cells(Rows.Count, 2).End(xlUp).Select
ActiveCell.Offset(1, 0).Select
' Eingabeaufforderung 1 Datum
Eingabe = InputBox("Bitte Datum angeben, wann die Ware eingetroffen ist!" & Chr(13) & Chr(10) & Chr(13) & Chr(10) & _
"Bitte schreiben Sie in: tt:mm:jjjj" & Chr(13) & Chr(10) & _
"" & _
"", _
"Zugang [Datum]", ActiveSheet.Range("B1") _
& "_", 7000, 5000)
If StrPtr(Eingabe) = 0 Then
' MsgBox ("Die Schaltfläche Abbrechen wurde gewählt. Der Vorgang wird abgebrochen.") End Else
End If
ActiveCell.Offset(0, 0).Value = Eingabe
Wie man sieht, sucht er sich selbst die letzte Zelle in meiner Tabelle um dort mit einer Eingabeaufforderung das Datum anzugeben.
Nun möchte ich als nächsten Schritt, genau diese Zelle, wo man eben das Datum eingegeben hat mittels dem Makro da oben, ... das er diese Zelle auswählt, "F2" und dann "Enter" drückt.
Alle Versuche dies zu bewerkstelligen, schlugen bisher fehl.
Habt ihr eine Idee?
Viele Grüße,
David :) ... Pixelschubster :D
