bonjour,
j'ai créé un style personnalisé (formatage de date dans une cellule),
dans un document calc,(F11, nom du style : styleDate)
je n'arrive pas à employé ce style dans mes macros :
Sub formate_donnees
'variables
Dim sheetIn As Object
Dim CelIn As Object
Dim iLig As Long
Dim tOK As Boolean
'routines
sheetIn = monDoc.Sheets.getByName("feuille1")
tOK = True
iLig = 0
while tOK = True
if sheetIn.getCellByPosition(2,iLig).String = "" then
tOK = False
else
CelIn = sheetIn.getCellByPosition(0,iLig)
CelIn.cellStyle = styleDate
iLig = iLig + 1
end if
wend
End Sub
comprends pas pourquoi cela ne marche pas.
gérard
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]