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




Antwort per Email an