na dann halt so
listbox1.editcell(listbox1.LastIndex,0) Gruß stefan Am 11.08.2011 um 10:35 schrieb Enno Bussmann: > Danke, Stefan, > damit wird in der tat die neue zeile aktiviert. Jetzt fehlt nur noch das > sahnehäubchen, das den cursor in die spalte 1 setzt (ich hatte irrtümlich > spalte 2 geschrieben), denn nur die ist fürs reinschreiben definiert. > > > Am 11.08.11 10:19, schrieb Stefan Sicurella: >> vielleicht >> >> >> listbox1.editcell(listbox1.LastIndex,1) >> >> gruß >> >> Stefan >> >>> Hallo, >>> ich suche und suche aber habe noch nicht das gefunden: gibt es eine >>> möglichkeit mittels cellKeyDown den cursor in die editierbare zelle zu >>> setzen ? >>> Ich habe folgenden code, der eine weitere zeile einrichtet (und die listbox >>> vergrössert): >>> >>> dim nr(i) as variant >>> if asc(key) = 13 then >>> i = i+1 >>> nr(i) = j +1 >>> me.addrow nr(i) + ".","" >>> me.height = me.height + 20 >>> j = j+1 >>> end >>> >>> Jetzt wäre es halt schön, wenn damit gleichzeitig auch die neue zeile >>> aktiviert werden könnte. Die spalte 2 ist per Listbox.TypeEditable zum >>> reinschreiben definiert. >>> >>> gruss enno >>> >> >> >
