Hallo zusammen,
habe folgendes Problem:
Ich habe eine Liste erstellt. Jetzt möchte ich immer mal wieder Informationen mit Hilfe einer InputBox ans Ende dieser Liste anfügen. Also muss ich irgendwie die erste leere Zelle unterhalb der Liste (quasi das Ende der Liste) z.B. in der Spalte A aktivieren können, um ihr Text zuzuweisen. Habe schon verschiedene Tests mit .Offset gemacht, funktioniert aber alles nicht so richtig.
Ich hoffe, ihr könnt mir helfen.
Liebe Grüße
Patrick
Ich habe eine Liste erstellt. Jetzt möchte ich immer mal
wieder Informationen mit Hilfe einer InputBox ans Ende dieser
Liste anfügen. Also muss ich irgendwie die erste leere Zelle
unterhalb der Liste (quasi das Ende der Liste) z.B. in der
Spalte A aktivieren können, um ihr Text zuzuweisen.
Hallo Patrick,
es liegt keine Notwendigkeit vor die Zelle zu aktivieren.
Sub tt()
Dim Eing As String
Eing = InputBox(„Bitte einen Wert eingebn“, „Eingabe“)
Cells(Cells(Rows.Count, 1).End(xlUp).Row + 1, 1) = Eing
End Sub
Ggfs. noch Fehleingaben bzw. Abbruch der Inputbox abfangen.
Gruß
Reinhard
Danke!
Das hilft mir schon weiter. Aber die Zelle zeigt den eingegebenen Wert nicht an. Was ist falsch?
Ansonsten funktioniert das gut, danke.
Liebe Grüße
Patrick
Das hilft mir schon weiter. Aber die Zelle zeigt den
eingegebenen Wert nicht an. Was ist falsch?
Ansonsten funktioniert das gut, danke.
Hallo Patrick,
der Wert wird nicht angezeigt aber ansonsten funktioniert es gut?
Was issen das nun?
Bei mir, XL2000 klappt der Code und der eingegebene Wert wird in die unterste erste frei Zelle eingetragen und logo angezeigt.
Gruß
Reinhard
Problem gelöst
Ich hab auch XL2000, Problem war Folgendes:
Ich hab den Code versehentlich nicht in ein Modul eingefügt, sondern in das Codefenster von Tabelle1.
Jetzt habe ich einfach alles rüberkopiert in ein Modul und es funktioniert einwandfrei. Danke nochmal!
Aber kannst du mir vielleicht erklären, woran das liegt?
Liebe Grüße
Patrick
Ich hab den Code versehentlich nicht in ein Modul eingefügt,
sondern in das Codefenster von Tabelle1.
Jetzt habe ich einfach alles rüberkopiert in ein Modul und es
funktioniert einwandfrei. Danke nochmal!
Aber kannst du mir vielleicht erklären, woran das liegt?
Hallo Patrick,
nein, kann ich nicht erklären, der Code läuft in Modul1 und dem Modul von z.B. Tabelle1.
Gruß
Reinhard