#VB_Récupérer la valeur d'une cellule [Résolu]

Messages postés
30
Date d'inscription
mardi 19 août 2008
Dernière intervention
15 mai 2014
- - Dernière réponse : chambreur
Messages postés
30
Date d'inscription
mardi 19 août 2008
Dernière intervention
15 mai 2014
- 15 mai 2014 à 09:37
Bonjour,
je souhaite savoir comment je peux récupérer le contenu d'une cellule sur laquelle on a double cliqué.
J'utilise la fonction :Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean).
Dim adresse as string
adress=Target.adress
me donne l'adresse de la cellule ex: $A$10
Mais comment récupérer le contenu de cette cellule. Comment puis je tout simplement récupérer A10 sans les dollars qui me gêne?
Merci d'avance (je suis débutant VB)
Afficher la suite 

Votre réponse

5 réponses

Meilleure réponse
Messages postés
23584
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
11 décembre 2018
1
Merci
Bonsoir...

Je pense qu'il y a un petit souci dans ta question...

d'un côté tu nous demandes : Comment récupérer le contenu de la cellule... ce que fait (comme Ucfoutu te l'a indiqué) la propriété VALUE.

Et d'un autre côté... tu nous dis vouloir récupérer A10 sans les dollars ... ce qui correspond aux COORDONNEES de ta cellule (ce que donne Target.Address => $A$10).

Donc... avant de te répondre... pourrais tu nous dire Exactement ce que tu cherches à récupérer ?

enfin sinon..
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

'Numero de colonne de la cellule
Debug.Print Target.Column

'Numéro de ligne..
Debug.Print Target.Row

'Addresse de la cellule
adr = Target.Address
    Debug.Print adr

'addresse sans $
adr = Replace(Target.Address, "$", "")
    Debug.Print adr

'valeur :
Debug.Print Target.Value


End Sub

Merci jordane45 1

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources a aidé 98 internautes ce mois-ci

Commenter la réponse de jordane45
Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
0
Merci
Bonjour,
Target est un objet Range.
Un objet Range a une propriété Value (et également une propriété Text)

EDIT : Quant à l'adresse sans les "$" (et bien que je n'en voie aucune utilité) ===>>
MsgBox Target.Address(False, False)

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviend
Commenter la réponse de ucfoutu
Messages postés
30
Date d'inscription
mardi 19 août 2008
Dernière intervention
15 mai 2014
0
Merci
Merci pour ta réponse rapide.
Pourtant, j'avais essayé de faire:
msgbox(Target.value)
et ça m'avait affiché du vide, je vais re-tester.
Commenter la réponse de chambreur
Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
0
Merci
Bonjour jordane45,
On peut se poser tellement de questions, dès lors que l'on voit le soin apporté à l'écriture du code présenté :
pour mémoire :
Dim adresse as string
adress=Target.adress
Commenter la réponse de ucfoutu
Messages postés
30
Date d'inscription
mardi 19 août 2008
Dernière intervention
15 mai 2014
0
Merci
Bonjour à vous deux,
Merci pour vos réponses :)
Oui, c'est vrai que ma question n'était pas très claire mais votre réponse est exactement ce que j'attendais. (Il y avait 2 questions en une et toutes les possibilités que vous avez indiquées m'intéresse)
Désolé pour "adresse", j'ai écrit à la main vite fait.
Pour info, si "target.value" n'avait pas fonctionné c'est que j'avais cliqué sur une cellule vide. Mea culpa.
Merci
Commenter la réponse de chambreur

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.