Office: (Office 2013) Tabelle mit Steuerelementen erweitern

Hallo!

Ich möchte eine Tabelle mit Einträgen, wie z.B. Datum, Bearbeiter und weiteren Spalten erstellen. Die Einträge sollen jeweils über Dropdownmenüs ausgewählt werden können. Was ich als erstes hinkriegen möchte ist, dass ich diese Tabelle per Knopfdruck (z.B. auf ein Plus-Symbol oder so) um eine Zeile ergänze und die Steuerelemente etc. in diese neue Zeile mit übernommen werden, leer, so dass man neue Daten in die neue Zeile einfügen kann. Die Formatierung soll dabei auch beibehalten werden (z.B. Rahmenlinien).

Wie lässt sich das realisieren bzw. über welche/n Funktion/sumfang? Kennt evtl. jemand ein ähnliches Beispiel für dieses Problem?

Außerdem hätte ich gerne, dass, wenn ich in das Datumsfeld klicke, ein kleiner Kalender aufgeht, aus dem man nun das Datum in das Feld übertragen kann *Smilie Damit beschäftige ich mich gerade, habe es aber bislang nicht hingekriegt...

MfG
Thelightener

:)

 

Hi,

mit Drowpdownmenüs meinst du Gültigkeitszellen, Formular-Steuerelemente oder ActiveX-Steuerelemente?

Zu deiner Frage bezüglich Kalender schaue hier: Link zum Thread - vielleicht hilft das ja schon weiter.

 

Hallo,

die Dropdown's habe ich bislang per Gültigkeitszellen gelöst, da ich bei den Steuerelementen das Problem hatte, dass diese auch beim Druck sichtbar waren. Vielleicht gibt es noch eine andere Möglichkeit?

Der Thread bezüglich des Kalenders hat mir weitergeholfen, danke. Das funktioniert soweit.

MfG
Thelightener

 

Hi,

du kannst selbstverständlich Gültigkeitszellen verwenden, ist in deinem Fall sowieso günstiger.
Kopiere einfach nur die letze Zeile und lösche dann die Zellinhalte der eingefügten Zeile. Das kannst du mit dem Makrorekorder aufzeichen. Anschließend kannst du dieses Makro entsprechend anpassen und einem ins Tabellenblatt eingefügten Button zuweisen.

 

Hallo!

Das Mit dem Makro aufzeichnen ist schon mal ne super Sache! Aber wie kann ich es hinkriegen, dass die neue Zeile immer dem Tabellenende angehängt wird? Ich setze jetzt eine Kopie der ersten Tabellenzeile unter selbige, lösche den Inhalt und füge neuen hinzu. Führe ich das Makro dann erneut aus, wandert die davor eingefügte Zeile leider nach unten und steht an letzter Stelle. Kannst du mich auch hier erleuchten? *Smilie *entsetzt

MfG
TheLightener

 

Hi,

wie sieht denn dein aufgezeichneter Code aus?

 

Der sieht so aus:

Code:

MfG
Thelightener

 

Hi,

wenn ich deinen 1. Beitrag richtig interpertiert habe, dann soll immer unterhalb der letzten Zeile eingefügt werden. Dein aufgezeichneter Code jedoch fügt zuerst eine leere Zeile ein und dann dort die kopierte Zeile - meine Frage: befinden sich unterhalb von Zeile 10 noch weitere Daten, die nicht überschrieben werden dürfen? Falls ja - wie kann festgestellt werden, was die letzte belegte Zeile deiner Tabelle ist?

 

Hallo,

das ist ja genau mein Problem. Wie kann ich feststellen, was die letzte belegte Zeile meiner Tabelle ist und unterhalb dieser eine neue Zeile einfügen?

MfG
Thelightener

 

Hi,

du hast meine Frage nicht beantwortet: befinden sich unterhalb deiner Tabelle noch weitere Daten, die nicht überschrieben werden dürfen oder ist es die tatsächlich letzte Zeile im gesamten Tabellenblatt?

 

Hey,

entschuldige. Unterhalb der Tabelle werden keine weiteren Daten mehr vorkommen. Die Tabelle selbst soll halt immer nur per Knopfdruck erweiterbar sein und mit neuen Daten gespeist werden.

MfG
TheLightener

 

Hi,

dann so:

Code:

 

Hallo Beverly,

deine Lösung funktioniert soweit, danke. Ich habe die Datumseingabe (wie zu Beginn des Threads erwähnt) mit dem Beispiel UserForm04 auf dieser Seite realisiert:

VBA Beispiele Seite Userform - Hajo's Excelseiten

Für die Datumseingabe muss man im VBA-Code den Bereich festlegen, in dem dieser funktioniert. Das müsste jetzt natürlich irgendwie miteinander verknüpft werden. Per Knopfdruck wird eine weitere Tabellenzeile hinzugefügt und gleichzeitig der Bereich erweitert, indem die Datumseingabe umgesetzt wird. Ich vermute aber, dass dies nicht ohne weiteres machbar ist und einiges an Arbeit bedeutet, oder gibt es eine einfache Lösung?

Noch etwas zu deinem letzten Post: Die Tabelle wird nur dann erweitert, wenn in Spalte A etwas steht. Ist es auch möglich, dass die Tabelle erweitert wird, sobald in irgendeiner Tabellenspalte bereits etwas eingetragen ist? Wenn ich jetzt z.B. Die Tabelle um ein Zeile ergänze, überall Einträge mache nur in Spalte A nicht, dann löscht er mir beim nächsten Buttonklick die gemachten Einträge wieder.

MfG
TheLightener

 

Hi,

zu Frage 1: ändere diese Zeile:

Code:

in diese

Code:

Damit wird der benutze Bereich angesprochen.


Zu Frage 2: ändere die Zeile zur Ermittlung der letzten belegten Zeile wie folgt:

Code:

Hinweis: diese Art der Ermittlung löst einen Fehler aus, falls das Tabellenblatt vollkommen leer ist, ist dagegen mindestens 1 Zelle gefüllt, funktioniert der Code korrekt.