Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro "quand clic"

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Usine à gaz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

Usine à gaz

XLDnaute Barbatruc
Bonjour à tous,

Tout d'abord, je vous souhaite un bon dimanche.

J'ai encore besoin de vous pour mettre en place une macro. J'ai essayé, je planche depuis des heures LOl et je n'ai pas réussi.

Voici mon soucis :

J'ai besoin d'un agenda pour prise de rendez-vous et j'en ai trouvé un plutôt fonctionnel.

Pour l'améliorer, j'y ai ajouté une feuille de calcul qui se nomme "N° sem".

je souhaite, afin de ne pas avoir à chercher dans la ligne des onglets en bas la semaine à traiter (je les mettrai en masqué), qu'en cliquant sur le numéro de semaine dans ma feuille, en face des dates, qu'automatiquement la feuille de la semaine correspondante s'ouvre.

En espérant m'être expliqué à peu près clairement, je vous joins le fichier et vous remercie vivement de votre aide.

Amicalement,
Lionel 🙂
 

Pièces jointes

Dernière édition:
Trier par date Trier par votes
Re : Macro "quand clic"

Bonjour, arthour973.

Clic droit sur le 1er n° de semaine, lien hypertext "dans ce document"
... Et on recommence 52 fois 🙂

Robert : Bonjour, Edith 🙂
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Macro "quand clic"

Bonjour Arthour, bonjour le forum,

Il me semble que quand on demande de l'aide on donne accès au code non ? Ça nous évite de recréer ta structure pour te proposer une solution...

Je te propose le code ci-dessous sur l'événement Double-Clic (je trouve que sur la sélection c'est pas très pratique mais tu pourras changer) de l'onglet Nº Sem :
Code: 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim PL As Range 'déclare la variable PL

'définit la variable PL
Set PL = Application.Union(Range("C4:C13"), Range("G4:G13"), Range("K4:K13"), Range("S4:S13"), Range("W4:W6"))
'si le double-clic a lieu ailleurs que dans la plage PL, sort de la procédure
If Application.Intersect(Target, PL) Is Nothing Then Exit Sub
Cancel = True 'empêche le mode [Edition] lié au double-clic
Sheets(CStr(Target.Value)).Activate 'active l'onglet correspondant
End Sub

[Édition]
Bonjour Patrick on s'est croisé...
 
Vote positif 0 Vote négatif
Re : Macro "quand clic"

Bonjour,

Merci pour ta rapide réponse.

Tu as raison pour le code et cela me semble aussi évident mais le fichier n'est pas de moi et il est protégé.
J'attends de l'auteur les mots de passe et je le déprotégerai avant de le transmettre à nouveau sur le site.

Je vais essayer ton code.

Merci vraiment à tous de votre gentillesse et de me répondre ..... un dimanche LOl,
Amicalement,
Lionel,
 
Vote positif 0 Vote négatif
Re : Macro "quand clic"

Re-Bonjour et bonjour à tous,

Encore merci pour votre solution.
Cependant, celle de Victor 21 est plus rapide et plus simple une fois avoir affecté un lien aux semaines, c'est pratique
Amicalement,
Lionel,
 
Vote positif 0 Vote négatif
Re : Macro "quand clic"

Re-Bonjour Victor et bonjour à tous,

j'ai choisi votre solution d'affecter des liens aux cellules.
Bien, s'il faut les faire une par une mais c'est super bien et pratique.

Encore merci,
Amicalement,
Lionel,
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

E
  • Question Question
Microsoft 365 heure positif ou negatif
Réponses
11
Affichages
429
ebe
E
A
  • Question Question
XL 2021 Consommation en fonction des semaines
Réponses
1
Affichages
237
sylvanu
F
  • Question Question
XL 2016 Graphique avoir des blancs en non des valeurs à 0 quand la donnée est vide
Réponses
4
Affichages
258
JHA
J
B
  • Question Question
XL 2016 Macro "Double-clic + Entrée"
2
Réponses
16
Affichages
406
job75
  • Résolu(e)
XL 2019 Problème avec Saisie Intuitive
Réponses
4
Affichages
183
Titof06
O
  • Question Question
XL 2021 pas de clic droit
Réponses
4
Affichages
232
orguyrine
O
  • Question Question
Autres XL2024. Pour PatrickToulon, clic droit dans VBE.
Réponses
4
Affichages
206
jeff1494
B
  • Question Question
Microsoft 365 Faire la somme de plusieurs tableaux
2
Réponses
17
Affichages
2 K
AtTheOne
A
  • Résolu(e)
XL 2021 tirage au sort aléatoire sans doublon
2 3 4
Réponses
54
Affichages
1 K
bsalv
B
D
  • Résolu(e)
Microsoft 365 recherche 2 conditions
Réponses
5
Affichages
141
JHA
J
N
  • Question Question
Microsoft 365 Taux de réclamation
Réponses
1
Affichages
209
sylvanu
A
  • Question Question
Autres gestion commande
Réponses
0
Affichages
305
alex32700
A
K
  • Question Question
Microsoft 365 XLS : Somme toutes les 7 colonnes
Réponses
6
Affichages
276
Kristelle1555
K
  • Résolu(e)
XL 2016 *** RESOLU MERCI :)*** Impression personnalisée.
4 5 6
Réponses
78
Affichages
2 K
Agecanonix35400
  • Résolu(e)
XL 2016 Planning de ménage
Réponses
5
Affichages
528
Volvo64400
D
  • Résolu(e)
XL 2019 Boucle sur plusieurs feuilles
Réponses
6
Affichages
627
dadaze
D
A
  • Question Question
Microsoft 365 le tri dans le mode Plan (Grouper)
Réponses
3
Affichages
178
abouam
A
S
  • Question Question
Microsoft 365 Récapituler comptes dettes
Réponses
3
Affichages
233
Seydina
S
Y
  • Question Question
Power Query Besoin d'aide pour configurer un power query
Réponses
3
Affichages
283
alexga78
A
A
  • Question Question
XL 2013 Création de planning en 3x8 pour 11 agents
Réponses
0
Affichages
185
Atexide
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…