Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1292to1296
1292to1296
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 Spalten aus Listbox in Tabelle schreiben

Forumthread: 2 Spalten aus Listbox in Tabelle schreiben

2 Spalten aus Listbox in Tabelle schreiben
18.01.2013 13:01:28
Mario
Hallo zusammen,
ich habe mir eine Listbox mit zwei Spalten erstellt, die mit Daten aus einer Tabelle auch korrekt gefüllt werden. Nun möchte ich gerne in der Listbox mehrere Einträge auswählen. Auch das funktioniert einwandfrei.
Über eine OK-Schaltfläche sollen die ausgewählten Datensätze in das Tabellenblatt "SYS" in die Spalte D und Spalte E und zwar immer in die letzten freien Zellen geschrieben werden.
Genau an dieser Stelle komme ich nicht weiter.
Ich freue mich über jede Hilfe.
Viele Grüße
Mario

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: 2 Spalten aus Listbox in Tabelle schreiben
18.01.2013 13:14:15
Rudi
Hallo, 
Sub xxx()
Dim i As Integer
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) Then
Sheets("SYS").Cells(Rows.Count, 4).End(xlUp).Offset(1) = .List(i, 0)
Sheets("SYS").Cells(Rows.Count, 5).End(xlUp).Offset(1) = .List(i, 1)
End If
Next
End With
End Sub

Gruß
Rudi

Anzeige
AW: 2 Spalten aus Listbox in Tabelle schreiben
18.01.2013 13:22:38
Mario
Hallo Rudi,
ganz herzlichen Dank für die schnelle Hilfe.
Habe den Code eingebaut und es funktionierte auf Anhieb.
Danke!

Forumthreads zu verwandten Themen

Tabellenblätter miteinander verknüpfen
Ephraim

Guten Morgen,
leider schaff ich es nicht, zwei Tabellenblätter in einer Datei miteinander zu verknüpfen. Was in Tabellenblatt 1 steht soll auch automatisch in TB2 übertragen werden. Optimalerweise soll in TB 2 lediglich eine Spalte ausgefüllt werden. Der restliche Inhalt soll geschützt sein...
18.08.2008 07:19:00
Thread-ID: 1002497
4 Beiträge
Tabelle mit Daten aus zweiter Tabelle ergänzen
Fritz_W

Hallo VBA-Experten,
die nachfolgend dargestellte Tabelle "Statistik" möchte ich entsprechend der Daten aus der Tabelle "Daten" Bereich E3:E52 jeweils wie nachfolgend beschrieben erweitern:
In der Tabelle "Daten" können im Bereich E3:E52 bis zu 50 Namen stehen.
Das Makro soll diese N...
19.08.2008 19:49:00
Thread-ID: 1003024
10 Beiträge
Anzeige
Eingaben aus Tabellen mit Userform befüllen
Peter

Hallo wertes Forum
ich habe da mal wieder etwas und komme nicht so richtig weiter.
Ich habe eine Tabelle
In Spalten Namen und in Zeilen Datum
Nun möchte ich gern das ganze mit Userform befüllen
also eine combobox, die mir das Datum zurürck gibt und eine die Mir die Namen a...
06.09.2008 11:42:00
Thread-ID: 1007825
4 Beiträge
Spaltenwerte ausgewählter Tabellen kopieren
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Zur weiteren Verwendung möchte ich nur die Ergebnisse der markierten Tabellenblätter in eine neu...
07.09.2008 08:42:00
Thread-ID: 1007926
2 Beiträge
aut.Füllen von Felden mittels Referenztabellen
Felden

Hallo,
ich habe folgende Situation:
Ich habe zu einer Artikelnummer eine Kundenartikelnummer und einen Preis. Diese Daten habe ich in einer "Referenztabelle", d.h. in einem eigenen Excelfile.
Ich möchte nun bei der Erstellung von Rechnungen lediglich die Artikelnummer eingeben. Exce...
24.09.2008 08:04:00
Thread-ID: 1011910
2 Beiträge
Verknüpfung mit vorigem Tabellenblatt
reiner

Hallo Leute
einer Datei wird jeden Monat ein neues dem dann aktuellen Monat entsprechendes Tabellenblatt hinzugefügt. Zelle Q3 des aktuellen Tabellenblattes soll den in Zelle A3 enthaltenen Wert des Vormonats (voriges Tabellenblatt) als Verknüpfung übernehmen.
Die hierfür erforderliche...
30.09.2008 09:20:35
Thread-ID: 1013261
5 Beiträge
Tabelle mittels eingebundenem Java jar-file füllen
Arthur

Ein fröhliches Hallo zusammen.
Ich habe ein Java jar-file, eingebunden in eine Excel-Datei. Die darin enthaltene Funktion soll per Knopfdruck aufgerufen werden, Daten aus einer anderen Anwendung abholen und das Ergebnis in einem Worksheet eintragen.
Der Knopfdruck samt Aufruf der Funkti...
27.11.2008 15:46:00
Thread-ID: 1028425
2 Beiträge
Wie Säulendiagramm mit Tabelle mit gestapelten Säu
sohsoh

Hallo,
ich habe folgendes Problem und schon wie ein Irrer probiert, aber bis jetzt noch keine Lösung gefunden.
Ich habe zu Verschiedenen Stoffen jeweils 2 Messwerte in 3 Verschiedenen Zuständen. Jetzt möchte ich ein Säulendigramm erstellen in denen ich 3 Säulen (zu den drei Zuständen je...
14.01.2009 10:48:22
Thread-ID: 1039519
2 Beiträge
Anzeige
Kombinationsreld mit 2 Spalten
peter

Hallo Profis
Ich arbeite mit 2 Excel Arbeitsmappen, eine als Adressdatei und die andere wo die Adressen eingefügt werden sollen (Arbeitsdatei).
Nun wähle ich in der Arbeitsdatei mittels Kombinationsfeld die Adresse aus und bringe sie mit der Formel
'= BEREICH.VERSCHIEBEN([Adressen.x...
11.03.2009 16:53:28
Thread-ID: 1059194
6 Beiträge
Inhalte in Tabelle mit Makro löschen
Tom

Hallo Excel-Spezialisten,
ich benötige eure Hilfe.
Es geht um eine Tabelle, die die Zellen A5:E100 abdeckt. Es werden zeilenweise immer wieder neue Inhalte innerhalb dieser Tabelle neu eingefügt. Andere Inhalte sind aber "abgelaufen". Das "Ablaufdatum" ist älter als "Heute", daher solle...
19.03.2009 22:16:42
Thread-ID: 1061995
5 Beiträge
Zählenwenn mit Verknüpfung auf anderes Tabellenbl.
Udo

Hallo zusammen,
ich werde mal versuchen mein Problem so verständlich wie möglich zu beschreiben:
Im ersten Tabellenblatt einer Arbeitsmappe werden in den Zellen A1 bis A6 per Dropdownfeld Namen eingetragen, welche im 2. Tabellenblatt aufgeführt sind.
Hierbei sind die Namen im 2. Tab...
25.03.2009 20:54:55
Thread-ID: 1063976
6 Beiträge
Spezialfilter mit ausgewählten Spalten
Michi

Liebe Gemeinde,
eine Tabelle mit ca. 50 Spalten soll per Spezialfilter ausgelsen werden. Das ganze wird per Makro und Schalfläche ausgeführt.
Soweit ich das verstehe ist beim Spezilafilter aber nur die filterung von Splaten möglich, die direkt nebeneinander liegen. Ich hingegen möchte...
13.05.2009 17:14:31
Thread-ID: 1074880
7 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

2 Spalten aus Listbox in Tabelle schreiben

Schritt-für-Schritt-Anleitung

  1. Listbox erstellen: Füge eine Listbox in dein Excel-Arbeitsblatt ein. Achte darauf, dass diese mit zwei Spalten konfiguriert ist.

  2. Datenquelle festlegen: Stelle sicher, dass die Listbox mit Daten aus einer bestehenden Tabelle gefüllt ist.

  3. OK-Schaltfläche hinzufügen: Füge eine Schaltfläche hinzu, die beim Klicken den folgenden VBA-Code ausführt:

    Sub EintraegeInTabelleSchreiben()
   Dim i As Integer
   With ListBox1
       For i = 0 To .ListCount - 1
           If .Selected(i) Then
               Sheets("SYS").Cells(Rows.Count, 4).End(xlUp).Offset(1) = .List(i, 0)
               Sheets("SYS").Cells(Rows.Count, 5).End(xlUp).Offset(1) = .List(i, 1)
           End If
       Next
   End With
End Sub

  4. Code ausführen: Klicke auf die Schaltfläche, um die ausgewählten Einträge in die Spalten D und E des Tabellenblatts "SYS" zu schreiben. Die Einträge werden in die nächsten freien Zellen eingefügt.

Häufige Fehler und Lösungen

  • Fehler: Listbox bleibt leer
    Lösung: Überprüfe, ob die Listbox korrekt mit Daten gefüllt ist. Stelle sicher, dass die Datenquelle richtig konfiguriert ist.

  • Fehler: Einträge werden nicht eingefügt
    Lösung: Stelle sicher, dass du die Schaltfläche korrekt mit dem VBA-Code verknüpft hast. Überprüfe, ob das Tabellenblatt "SYS" existiert.

Alternative Methoden

Falls du keine Listbox verwenden möchtest, kannst du auch Dropdown-Listen oder einfache Eingabefelder nutzen, um Daten in eine Tabelle mit 2 Spalten zu schreiben. Die gleiche Logik des VBA-Codes kann angewendet werden, um die Werte entsprechend in die Excel-Tabelle zu übertragen.

Praktische Beispiele

  • Beispiel 1: Du hast eine Listbox mit den Spalten "Name" und "Alter". Wenn du mehrere Namen auswählst, werden diese zusammen mit dem Alter in die Spalten D und E geschrieben.

  • Beispiel 2: Verwende die gleiche Methode, um eine Tabelle 2 Spalten für Produktnamen und Preise zu erstellen. Die ausgewählten Produkte und deren Preise werden dann in die Excel-Tabelle übertragen.

Tipps für Profis

  • Nutze die Datenüberprüfung in Excel, um sicherzustellen, dass nur gültige Daten in die Listbox eingefügt werden.
  • Erweitere den VBA-Code, um nach dem Einfügen der Daten eine Bestätigungsmeldung anzuzeigen.
  • Experimentiere mit verschiedenen Layouts der Listbox, um die Benutzerfreundlichkeit zu verbessern.

FAQ: Häufige Fragen

1. Frage
Kann ich die Listbox auch in anderen Excel-Versionen verwenden?
Antwort: Ja, der VBA-Code funktioniert in den meisten modernen Excel-Versionen.

2. Frage
Wie kann ich die Listbox mit mehr als zwei Spalten erweitern?
Antwort: Du kannst die Listbox so konfigurieren, dass sie mehr Spalten unterstützt, und den Code anpassen, um zusätzliche Spalten in die Excel-Tabelle zu schreiben.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige