Information générale
Catégorie:
COM/DCOM et OLE Automation
Dear Yuri,
Thanks very much for your code. It works just fine !
The job was to take out the address of an active cell, find out it's column, and then do a calculation on the entire column. By using 'ActiveCell' in your code, I've got the desired result.
lstr = mid(ActiveCell.Address(), 2)
Ln = InStr(1, lstr, "$")
MsgBox (Left(lstr, Ln - 1))
Thanks again !
Regards,
Steve.
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement