A voir également:
- Nous récupérons les données... veuillez patienter quelques secondes, puis réessayer de couper ou copier.
- Couper une video - Guide
- Copier une vidéo youtube - Guide
- Instagram une erreur s'est produite veuillez réessayer ✓ - Forum Instagram
- Effacer les données de navigation - Guide
- Facebook une erreur s'est produite veuillez réessayer ✓ - Forum Facebook
4 réponses
tenace
Messages postés
828
Date d'inscription
jeudi 22 novembre 2007
Statut
Membre
Dernière intervention
25 juillet 2015
223
15 janv. 2008 à 18:08
15 janv. 2008 à 18:08
Bonsoir,
Sans en être sur de suite, essaie avec la fonction insérer --->objet, et la tu choisis le classeur à lier
a+
Kev.
Sans en être sur de suite, essaie avec la fonction insérer --->objet, et la tu choisis le classeur à lier
a+
Kev.
salut tenace,
J'ai essayé mais moi il me faut juste certines valeurs des cellules du classeur. Et là quand on clique sur l'objet c'est le classeur qui s'ouvre. C'est vrai que c'est mieux que de l'ouvrir manuellement mais pas exactement ce que je veux.
Merci quand même
J'ai essayé mais moi il me faut juste certines valeurs des cellules du classeur. Et là quand on clique sur l'objet c'est le classeur qui s'ouvre. C'est vrai que c'est mieux que de l'ouvrir manuellement mais pas exactement ce que je veux.
Merci quand même
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 304
15 janv. 2008 à 18:49
15 janv. 2008 à 18:49
Bonjour Tenace,Goldrigger
La macro ci-dessous dite de "Walkenbach" extrait la valeur des cellules A1 (R1C1), B2 (R2C2) etc dans un fichier fermé "source.xls"; le classeur fermé et le classeur "hôte" sont ici dans le m^me dossier: à adapter à ton cas et à tes cellules
Sub lire_ferme()
Dim chemin As String
chemin = ThisWorkbook.Path
Range("A3") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R1C1")
Range("B4") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R2C2")
Range("C8") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R5C3")
Range("E9") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R7C4")
End Sub
Bonne soirée
Michel
La macro ci-dessous dite de "Walkenbach" extrait la valeur des cellules A1 (R1C1), B2 (R2C2) etc dans un fichier fermé "source.xls"; le classeur fermé et le classeur "hôte" sont ici dans le m^me dossier: à adapter à ton cas et à tes cellules
Sub lire_ferme()
Dim chemin As String
chemin = ThisWorkbook.Path
Range("A3") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R1C1")
Range("B4") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R2C2")
Range("C8") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R5C3")
Range("E9") = ExecuteExcel4Macro("'" & chemin & "\[source.xls]Feuil1'!R7C4")
End Sub
Bonne soirée
Michel