Information générale
Catégorie:
COM/DCOM et OLE Automation
Titre:
Font size for whole Activesheet
Versions des environnements
Hi all,
This works:
1. lCell=oExcel.ActiveSheet.Range("A1").SpecialCells(11).Address(.F.,.F.,1)
2. area = "A1:"+lCell
3. oRange=oExcel.RANGE("&area").Select
4. oExcel.Selection.Font.Size = 10
but how should I make 4. without prior 3 statements ?
TIA, gojko
Suivant
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