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 à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy