Copier un lien avec implémentation
Résolu
pierrel54
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
pierrel54 Messages postés 8 Date d'inscription Statut Membre Dernière intervention -
pierrel54 Messages postés 8 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai créé un tableau récapitulatif dans Excel qui va rechercher des infos dans d'autres fichiers excel.
Voici un exemple d'une cellule du tableau récapitulatif :
=+'C:\Users\Admin\Documents\EXCELL2014\[048.xlsm]Données'!$E$45
Lorsque je copie ce lien dans la cellule en-dessous pour compléter le tableau, je voudrais que le document visé (048) devienne 049 automatiquement. Est-ce possible?
Merci
J'ai créé un tableau récapitulatif dans Excel qui va rechercher des infos dans d'autres fichiers excel.
Voici un exemple d'une cellule du tableau récapitulatif :
=+'C:\Users\Admin\Documents\EXCELL2014\[048.xlsm]Données'!$E$45
Lorsque je copie ce lien dans la cellule en-dessous pour compléter le tableau, je voudrais que le document visé (048) devienne 049 automatiquement. Est-ce possible?
Merci
A voir également:
- Copier un lien avec implémentation
- Partager des photos avec un lien - Guide
- Lien url - Guide
- Comment copier une vidéo youtube - Guide
- Verificateur de lien - Guide
- Comment retrouver un lien copier sur android - Guide
8 réponses
Bonjour
une tentative avec macro
https://www.cjoint.com/?3ChqiMnQ4RV
Cdlmnt
une tentative avec macro
https://www.cjoint.com/?3ChqiMnQ4RV
Cdlmnt
ccm81
Messages postés
10909
Date d'inscription
Statut
Membre
Dernière intervention
2 433
message modifié à 16h09
Merci ccm81 de vous intéresser à ma recherche, j'ai ouvert le lien que vous m'avez envoyé mais lorsque je tape ctrl+F, il y a un écran qui apparait, ensuite je tape Alt F11 et il ne se passe rien, peut-être que je n'ai pas tout compris?
Quelques points à vérifier
1. Avant de taper quoique ce soit
Clic-droit sur l'onglet de la feuille/Visualiser le code
tu dois voir le Module 1 dans la fenêtre de gauche, le code de la macro est dedans
2. as tu accepté l'ouverture des macros (Outils/Macros/Sécurité/...)
3. se positionner en A3 puis Ctrl+f (touche Ctrl et touche f)
4. Chez moi, les fichiers 048 .... n'existent pas donc je ne peux pas voir ce que ça donne, mais la formule copiée semble bonne
1. Avant de taper quoique ce soit
Clic-droit sur l'onglet de la feuille/Visualiser le code
tu dois voir le Module 1 dans la fenêtre de gauche, le code de la macro est dedans
2. as tu accepté l'ouverture des macros (Outils/Macros/Sécurité/...)
3. se positionner en A3 puis Ctrl+f (touche Ctrl et touche f)
4. Chez moi, les fichiers 048 .... n'existent pas donc je ne peux pas voir ce que ça donne, mais la formule copiée semble bonne
Toujours merci mais le problème reste entier :
1.J'ai cliqué du droit sur la feuille et ensuite sur visualiser le code, il y a effectivement un nouvel écran qui apparaît mais je n'y vois pas de module 1 ou de macro.
2.Outils/Macros/Sécurité/... c'est dans Excel?
3.Quand je me positionne dans A3 et que je tape Ctrl+F, il y a effectivement un écran qui apparaît "rechercher et remplacer" mais je ne vois pas ce que je dois en faire.
Le but c'est que quand je copie la cellule A2 dans la cellule A3 le 048.xlsm devienne automatiquement 049.xlsm
1.J'ai cliqué du droit sur la feuille et ensuite sur visualiser le code, il y a effectivement un nouvel écran qui apparaît mais je n'y vois pas de module 1 ou de macro.
2.Outils/Macros/Sécurité/... c'est dans Excel?
3.Quand je me positionne dans A3 et que je tape Ctrl+F, il y a effectivement un écran qui apparaît "rechercher et remplacer" mais je ne vois pas ce que je dois en faire.
Le but c'est que quand je copie la cellule A2 dans la cellule A3 le 048.xlsm devienne automatiquement 049.xlsm
1. Visiblement, la macro n'est pas passée, c'est un pb de passage d'un xls2003 avec macro à un xlsm2007
Je ne connais pas la manip
mais on peut contourner
Alt-F11 pour accéder à l'éditeur VBA
Insertion/module
et tu copies le code ci-dessous
2. Le but c'est que quand je copie la cellule A2 dans la cellule A3 le 048.xlsm devienne automatiquement 049.xlsm
J'ai bien compris
Je ne connais pas la manip
mais on peut contourner
Alt-F11 pour accéder à l'éditeur VBA
Insertion/module
et tu copies le code ci-dessous
Option Explicit Public Sub FicPlusUn() Dim rc1 As Long, rp As Long, fic1, fic2, f As String, lfic1 As Long, lfic2 As Long f = ActiveCell.Offset(-1, 0).FormulaLocal rc1 = InStr(f, "[") rp = InStr(f, ".") fic1 = Mid(f, rc1 + 1, rp - rc1 - 1) lfic1 = Len(fic1) fic2 = fic1 + 1 lfic2 = Len(fic2) fic2 = String(lfic1 - lfic2, "0") & fic2 f = Replace(f, fic1, fic2) ActiveCell.FormulaLocal = f End Sub
2. Le but c'est que quand je copie la cellule A2 dans la cellule A3 le 048.xlsm devienne automatiquement 049.xlsm
J'ai bien compris
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
as tu copié le code dans le module 1? c'est la première chose à faire
puis retour à la feuille de calcul
Si oui (ça c'est pour excel 2003 mais ça doit y ressembler avec excel2007)
Outils/Macro/macros tu choisi FicPlusUn
Option. tu choisis un raccourci clavier (j'ai pris Ctrl+f)
et ça devrait commencer à fonctionner
puis retour à la feuille de calcul
Si oui (ça c'est pour excel 2003 mais ça doit y ressembler avec excel2007)
Outils/Macro/macros tu choisi FicPlusUn
Option. tu choisis un raccourci clavier (j'ai pris Ctrl+f)
et ça devrait commencer à fonctionner
Bonjour,
Encore merci, je crois que je progresse mais dans Windows 7, macros se trouve dans affichage et pas dans outils. J'ai trouvé et j'ai sélectionné FicPlusUn et il me met un message :
Erreur d'exécution '5' :
Argument ou appel de procédure incorrect
Lorsque je clique sur débogage, la 5ième ligne du code apparaît en jaune.
fic1 = Mid(f, rc1 + 1, rp - rc1 - 1)
Bonne journée
Encore merci, je crois que je progresse mais dans Windows 7, macros se trouve dans affichage et pas dans outils. J'ai trouvé et j'ai sélectionné FicPlusUn et il me met un message :
Erreur d'exécution '5' :
Argument ou appel de procédure incorrect
Lorsque je clique sur débogage, la 5ième ligne du code apparaît en jaune.
fic1 = Mid(f, rc1 + 1, rp - rc1 - 1)
Bonne journée
Lorsque tu es sur la ligne erreur (jaune), tu passes la souris sur f tu dois voir apparaitre sa valeur soit ta (longue) formule
tu peux aussi en profiter pour voir les valeurs de rp (rang du "." dans f, rc1 rang du "[" et de rc2 rang du "]"
si ce n'est pas le cas
Tu dois te placer en dessous de la cellule contenant la formule à copier
ex. Ta formule est en A2
tu sélectionnes A3 puis Ctrl+f
tu peux aussi en profiter pour voir les valeurs de rp (rang du "." dans f, rc1 rang du "[" et de rc2 rang du "]"
si ce n'est pas le cas
Tu dois te placer en dessous de la cellule contenant la formule à copier
ex. Ta formule est en A2
tu sélectionnes A3 puis Ctrl+f
