Errata corrige !!!
Hi!
Mi sono accorto dove me lo devo mettere... il Return True, intendo...
if key=chr(9) then
if column=1 then
column=-1
end if
me.EditCell row, column+1
Return True ' <--- se non lo mettete qui, sara' ben
difficile possiate scrivere qualcosa dentro la cella... Meditate
gente, meditate
end if
Ciao...
PS Ma c'e' qualcuno in ascolto?
Il giorno 20/set/05, alle ore 10:10, Lucio Liberi ha scritto:
Basta aggiungere
Return true nell'evento CellKeyDown e funziona anche su Mac
Dim Tab as String
Dim i, j As Integer
i=row
j=column+1
Tab=Chr(9)
if key=Tab then
if j=5 then
j=0
end if
ListBox1.EditCell i, j
end if
Return True <<<-------
ciao a tutti e grazie!!!
lucio liberi
|