Le 29/10/2018 à 21:21, Philippe BLANCHARD a écrit :
Merci Jean-François pour ta réponse
mais comment fait on pour l'affecter à une cellule ?
comme dans ton message d'origine :
Sub Main
Dim oSheet As Object
Dim oCell As Object
Dim MaChaine As String
oSheet = ThisComponent.Sheets.getByName("Feuille1")
oCell = oSheet.GetCellRangeByPosition(0, 0) 'A1
'au lieu de lire par : MaChaine = oCell.String
'on écrit par
oCell.String = MaChaine
End Sub
Bien cordialement,
--
Jean-Francois Nifenecker, Bordeaux
--
Envoyez un mail à [email protected] pour vous désinscrire
Les archives de la liste sont disponibles à
https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy