Copier un lien avec implémentation
Résolu/Fermé
pierrel54
Messages postés
8
Date d'inscription
vendredi 7 mars 2014
Statut
Membre
Dernière intervention
9 mars 2014
-
7 mars 2014 à 15:35
pierrel54 Messages postés 8 Date d'inscription vendredi 7 mars 2014 Statut Membre Dernière intervention 9 mars 2014 - 8 mars 2014 à 10:57
pierrel54 Messages postés 8 Date d'inscription vendredi 7 mars 2014 Statut Membre Dernière intervention 9 mars 2014 - 8 mars 2014 à 10:57
A voir également:
- Copier un lien avec implémentation
- Verifier un lien - Guide
- Lien url - Guide
- Créer un lien pour partager des photos - Guide
- Copier une vidéo youtube - Guide
- Cliquez sur ce lien. en n'utilisant que le clavier, quel mot obtenez-vous ? ✓ - Forum souris / Touchpad
8 réponses
ccm81
Messages postés
10854
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
26 avril 2024
2 404
Modifié par ccm81 le 7/03/2014 à 16:09
Modifié par ccm81 le 7/03/2014 à 16:09
Bonjour
une tentative avec macro
https://www.cjoint.com/?3ChqiMnQ4RV
Cdlmnt
une tentative avec macro
https://www.cjoint.com/?3ChqiMnQ4RV
Cdlmnt
pierrel54
Messages postés
8
Date d'inscription
vendredi 7 mars 2014
Statut
Membre
Dernière intervention
9 mars 2014
7 mars 2014 à 17:23
7 mars 2014 à 17:23
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?
ccm81
Messages postés
10854
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
26 avril 2024
2 404
7 mars 2014 à 17:51
7 mars 2014 à 17:51
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
pierrel54
Messages postés
8
Date d'inscription
vendredi 7 mars 2014
Statut
Membre
Dernière intervention
9 mars 2014
7 mars 2014 à 18:34
7 mars 2014 à 18:34
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
ccm81
Messages postés
10854
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
26 avril 2024
2 404
7 mars 2014 à 18:45
7 mars 2014 à 18:45
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
pierrel54
Messages postés
8
Date d'inscription
vendredi 7 mars 2014
Statut
Membre
Dernière intervention
9 mars 2014
7 mars 2014 à 19:23
7 mars 2014 à 19:23
Désolé mais cela ne fonctionne pas, comment puis-je t'envoyer la copie d'écran de ce que j'ai fait?
ccm81
Messages postés
10854
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
26 avril 2024
2 404
Modifié par ccm81 le 7/03/2014 à 20:04
Modifié par ccm81 le 7/03/2014 à 20:04
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
pierrel54
Messages postés
8
Date d'inscription
vendredi 7 mars 2014
Statut
Membre
Dernière intervention
9 mars 2014
8 mars 2014 à 09:40
8 mars 2014 à 09:40
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
ccm81
Messages postés
10854
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
26 avril 2024
2 404
8 mars 2014 à 10:35
8 mars 2014 à 10:35
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
pierrel54
Messages postés
8
Date d'inscription
vendredi 7 mars 2014
Statut
Membre
Dernière intervention
9 mars 2014
8 mars 2014 à 10:57
8 mars 2014 à 10:57
Un tout grand merci, cela fonctionne mais il fallait aller préciser dans les options de la macro la lettre F et en plus c'est : ctrl + shift + F
Je te souhaite une belle journée
Je te souhaite une belle journée
7 mars 2014 à 16:20