| Von |
zfwez |
| eMail |
|
| Am |
19. Januar 2008 um 22:29:08 |
| Frage |
Hallo,
meine Listbox1 soll alle Zahlen in der Spalte A anzeigen, erhalte jedoch die Fehlermeldung :"Die Methode 'Range' für das Objekt '_Global' ist fehlgeschlagen" .???????
Dim i As Byte, zelle As String
i = 1
zelle = "UV_Messwerte!A" & CStr(i)
'Alle Werte der Liste der Tabelle werden gelesen, bis eine leere Zelle kommt.
Do Until Range(zelle).Formula = ""
ListBox1.AddItem Range(zelle).Formula
i = i + 1
zelle = "UV_Messwerte!A" & CStr(i)
Loop
Zweitens : da in der Spalte A auch Texte vorhanden sind, soll die Listbox1 nur Zahlen im Format z.B.218,2538605
erkennen.
Bitte um Mithilfe
Gruß
|
|
Zum Seitenanfang