Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
404to408
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Werte aus Listbox in Tabelle; Zellenformat
Kersten
Hallo zusammen
Ich lasse Werte aus einer Listbox in eine Tabelle übertragen. Danach sind aber in den Ziel-Zellen die Zahlenformate kaputt. Und zwar so, dass für diese Zellen kein Format mehr angegeben werden kann.
Wie kann ich die Werte aus der Lisbox so übertragen, dass nur Werte übergeben werden. (ohne Formate)
Nachfolgender Code überträgt die Einträge in eine Tabelle

Private Sub cmdEintragen_Click()
Dim iRow As Integer, iRowL As Integer, rng As Range
Set rng = ActiveCell.CurrentRegion.Rows(ActiveCell.Row)
iRowL = ActiveCell.Row
For iRow = 0 To lstKorb.ListCount - 1
Cells(iRowL + iRow, 5) = lstKorb.List(iRow, 0)
Cells(iRowL + iRow, 6) = lstKorb.List(iRow, 1)
Cells(iRowL + iRow, 8) = lstKorb.List(iRow, 2)
Cells(iRowL + iRow, 7) = lstKorb.List(iRow, 3)
Cells(iRowL + iRow, 9) = lstKorb.List(iRow, 4)
Next iRow
lstKorb.Clear
Unload Me
End Sub

Vielleicht kann mir jemand sagen welches Zauberwörtchen ich dazu noch benötige.
Danke
Gruß Kersten

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Werte aus Listbox in Tabelle; Zellenformat
Ulf
Cells(iRowL + iRow, 5) = CDbl(lstKorb.List(iRow, 0))
Den Datentyp entsprechend auswählen, CInt, CLng,CDate
Ulf
AW: Werte aus Listbox in Tabelle; Zellenformat
Kersten
Hi Ulf
klappt nicht. Ich bekomme bei allen Deklarationen die Meldung "Typen unverträglich" :-|
Kersten
AW: Werte aus Listbox in Tabelle; Zellenformat
Ulf
Tut mir Leid, keine weitere Idee.
Ukf
Anzeige

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige