Insérer contenu d'une cellule dans un commentaire d'un autre classeur (ouvert)
Résolu/Fermé
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
-
10 mars 2021 à 23:01
yg_be Messages postés 21303 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mars 2023 - 12 mars 2021 à 18:57
yg_be Messages postés 21303 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mars 2023 - 12 mars 2021 à 18:57
A voir également:
- Insérer contenu d'une cellule dans un commentaire d'un autre classeur (ouvert)
- Fichier ouvert dans un autre programme - Guide
- Excel colorer une cellule sous condition d'une autre cellule ✓ - Forum Excel
- Fichier ouvert dans system ✓ - Forum Virus / Sécurité
- Insérer liste déroulante excel - Guide
- Aller à la ligne dans une cellule excel - Guide
3 réponses
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
10 mars 2021 à 23:17
10 mars 2021 à 23:17
bonjour,
la macro serait-elle dans un des deux fichiers?
as-tu essayé avec l'enregistreur de macros?
la macro serait-elle dans un des deux fichiers?
as-tu essayé avec l'enregistreur de macros?
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
Modifié le 11 mars 2021 à 10:26
Modifié le 11 mars 2021 à 10:26
J'ai tenté quelque chose comme cela déjà ne serait-ce que pour renvoyer la valeur de Matin mais ça ne marche pas :
Erreur d'execution '1004' :
Erreur définie par l'application ou l'objet
With MTTH.Sheets("Feuil1").Range("B1")
If .Comment Is Nothing Then .AddComment
.Comment.Text Text:=TDB.Sheets("Feuil1").Range("B2").Value
End With
Erreur d'execution '1004' :
Erreur définie par l'application ou l'objet
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
11 mars 2021 à 11:58
11 mars 2021 à 11:58
est-ce le code complet?
à quelle ligne l'erreur?
merci d'utiliser les balises de code: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
à quelle ligne l'erreur?
merci d'utiliser les balises de code: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
11 mars 2021 à 12:32
11 mars 2021 à 12:32
C'est cette ligne où est l'erreur
Le code complet est le suivant :
La ligne d'erreur est sur cette ligne
Le code complet est le suivant :
Set MTTH = ThisWorkbook
Set TDB = Workbooks("TDB.xlsm")
With MTTH.Sheets("Feuil1").Range("B1")
If .Comment Is Nothing Then .AddComment
.Comment.Text Text:=TDB.Sheets("Feuil1").Range("B2").Value
End With
La ligne d'erreur est sur cette ligne
.Comment.Text Text:=TDB.Sheets("Feuil1").Range("B2").Value
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
11 mars 2021 à 12:40
11 mars 2021 à 12:40
afin de découvrir ce qui provoque l'erreur, décompose l'instruction donnant l'erreur.
exemple:
exemple:
dim cc as string
cc=TDB.Sheets("Feuil1").Range("B2").Value
.Comment.Text Text:=cc
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
>
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
11 mars 2021 à 23:10
11 mars 2021 à 23:10
En décomposant cela fonctionne donc ça doit être la partie
TDB.Sheets("Feuil1").Range("B2").Value après le "=" qui pose problème mais je ne vois pas d'erreur de syntaxe car j'ai fais un copier coller de cette même valeur dans la variable cc...
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
>
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
12 mars 2021 à 12:05
12 mars 2021 à 12:05
tu avais une erreur d'exécution, quelle erreur de syntaxe mentionnes-tu?
si cela fonctionne en décomposant, le problème n'est-il pas résolu?
si cela fonctionne en décomposant, le problème n'est-il pas résolu?
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
>
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
12 mars 2021 à 17:48
12 mars 2021 à 17:48
Effectivement c'est résolu donc inutile de chercher plus loin c'est le résultat qui compte.
Merci
Merci
yg_be
Messages postés
21303
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
18 mars 2023
1 326
>
Adirien
Messages postés
60
Date d'inscription
samedi 11 mai 2013
Statut
Membre
Dernière intervention
1 février 2023
12 mars 2021 à 18:57
12 mars 2021 à 18:57
si tu partages ton fichier, je peux chercher plus loin.

11 mars 2021 à 07:57
Avec l'enregistreur de macro je vais pouvoir insérer un commentaire mais je ne pourrais pas y faire apparaître une valeur de cellule pour ça je suis obligé de passer par du code