Re: [fr-users] Macro : Récupérer le contenu d'une cellule

Bonjour Philippe,

Le 08/07/2018 à 21:46, demande_aide_fr@libreoffice.org a écrit :
> Dans Calc, j'aimerai récupérer le contenu d'une cellule dans une macro (C'est la fonction cells sur 
> Excel).

Si vous répondez, merci de penser à utiliser la fonction "répondre à 
tous" de votre logiciel de courrier électronique de façon que la liste 
reçoive une copie de votre réponse.

Pour accéder à une cellule d'une feuille il faut connaître la feuille.

Dim oSheet As Object
Dim oCell As Object     'l'objet cellule recherché

Dim MaValeur As Double  'les différentes valeurs possibles
Dim MaChaine As String  '(selon la situation)
Dim MaFormule As String


'on récupère l'objet feuille
oSheet = ThisComponent.Sheets.getByName("Feuille1")

'récupérer l'objet cellule
'1. à partir de son nom. ex : "A1"
oCell = oSheet.GetCellRangeByName("A1")

'2. à partir de ses coordonnées. ex : 0, 0 pour A1 (X = 0, Y = 0 ; 
valeurs indexées à partir de 0)
oCell = oSheet.GetCellRangeByPosition(0, 0)

'3. à partir d'une cellule nommée. ex : A1 est nommée "MaCellule"
oCell = oSheet.GetCellRangeByName("MaCellule")


'Une fois l'objet cellule récupéré, on accède au contenu de la cellule
' par :

MaValeur  = oCell.Value         'si valeur numérique
MaChaine  = oCell.String        'valeur texte (existe dans tous les cas)
Maformule = oCell.Formula       'si formule


En espérant avoir aidé.

Bien cordialement,
--
Jean-Francois Nifenecker, Bordeaux


--
Envoyez un mail à users+unsubscribe@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