Sverweis in VBA

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Sverweis in VBA
von: ludicla
Geschrieben am: 01.12.2015 08:27:30

Hallo Profis,
ich hab eine UF mit der ich Daten erfasse und Zeilenweise in eine Datei übertrage.
Der Code (Auszug):
Cells(xzeile, 1) = ComboBox1
Cells(xzeile, 2) = CDbl(ComboBox2)
MsgBox "Daten werden übernommen"
Cells(xzeile, 3) = "A1"
Cells(xzeile, 4) = ComboBox21
Die Combobox1 bei Cells(xzeile,1) beinhaltet das Datum.
Wie kann ich per Sverweis das Monat auslesen und in Cells(xzeile, 5) ausgeben.
Wie muss der Vlookup aussehen - ich bekomm die Syntax nicht in die Reihe.
schon jetzt Danke für die Hilfe.
Gruss Ludicla

Bild

Betrifft: AW: Sverweis in VBA
von: Werner
Geschrieben am: 01.12.2015 08:53:19
Hallo Ludicla,
Versuch mal

Cells(xzeile, 5).Value = Format(Combobox1.Value, "mm")
Gruß Werner

Bild

Betrifft: AW: Sverweis in VBA
von: Rudi Maintaire
Geschrieben am: 01.12.2015 10:13:57
Hallo,
wieso sverweis?
Cells(xzeile, 5) = Month(ComboBox1)
Gruß
Rudi

Bild

Betrifft: AW: Sverweis in VBA
von: ludicla
Geschrieben am: 01.12.2015 11:22:19
Hallo Rudi,
das hab ich mittlerweile auch geschnallt (ich schäm mich)
und wie formatiere ich die Zahl als Datum mit "MMMM" ?
Danke und
Gruss Ludicla.

Bild

Betrifft: AW: Sverweis in VBA
von: Rudi Maintaire
Geschrieben am: 01.12.2015 11:53:35
Hallo,
entweder

Cells(xzeile, 5) = MonthName(Month(ComboBox1))

oder
Cells(xzeile, 5) = Format(cdate(ComboBox1),"MMMM")

Gruß
Rudi

Bild

Betrifft: AW: Sverweis in VBA
von: ludicla
Geschrieben am: 01.12.2015 12:21:50
Hallo Rudi
Danke Dir, ich mach mich gleich an die Arbeit
Gruss Ludicla

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Sverweis in VBA "