Herbers Excel-Forum - das Archiv
Range in AddItem füllen
Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Betrifft: Range in AddItem füllen
von: marina
Geschrieben am: 02.10.2003 16:28:18
Hallo Leute,
ich brauche unbedingt mal eure Hilfe ..
Ich möchte Reihe 9F - 9H in eine Combobox füllen.
Allerdings komme ich mit:
Comb_Papierticketzuschlag.AddItem (Zahlungsbeleg_Datenblatt.Range("9F:9H"))
.. nicht weiter !
Vielen Dank schon im Voraus !!
lg, Marina
Betrifft: AW: Range in AddItem füllen
von: Michael Scheffler
Geschrieben am: 02.10.2003 16:38:11
Hi,
Du musst es zellenweise einfülllen:
Comb_Papierticketzuschlag.AddItem Cells(i, j)
Gruß
Micha
Betrifft: AW: Range in AddItem füllen
von: GraFri
Geschrieben am: 02.10.2003 16:43:09
Hallo
Der Datentyp Byte hat nur einen Bereich bis 255.
Besser wäre Datentyp Integer (+/- 32768) bzw. Datentyp Long (+/- 2147483648)
mfg, GraFri
Betrifft: AW: Range in AddItem füllen
von: marina
Geschrieben am: 02.10.2003 16:45:01
na kann ich denn das auch irgendwie mit ner range machen ?
Hat jemand ein codebeispiel für mich ?
Lieben Dank,Marina
Betrifft: AW: Range in AddItem füllen
von: Michael Scheffler
Geschrieben am: 02.10.2003 16:48:19
Hi,
vielleicht wenn Du ControlSource nimmst.
Gruß
Micha
Betrifft: AW: Range in AddItem füllen
von: GraFri
Geschrieben am: 02.10.2003 16:53:30
Hallo
Sub Comb_Papierticketzuschlag_füllen()
Dim n As Byte
For n = 1 To 3
Comb_Papierticketzuschlag.AddItem Sheets("Tabelle1").Cells(9, 6 + n)
Next n
End Sub
Code eingefügt mit
Syntaxhighlighter 2.4
mfg, GraFri