[Résolu] Aide sur une macro

[filtre69]

Bonjour,
voila j'ai fait une macro avec l'aide de excel et elle marche pas comme je veux
mais elle marche en mode test. Le but de cette macro est quand je clic sur la cellule A1 de toute mes feuilles je retourner sur la feuille données
merci d'avance de votre aide
voici la macro

Sub Retour_page_Données()
'
' Retour_page_Données Macro
'

'
Range("A1").Select
Sheets("Données").Select
End Sub

 

[Caillou]

Re : Aide sur une macro

Bonjour,

Peut-être qu'au lieu de faire une macro, tu peux placer un lien hypertexte dans chaque cellule A1.
1. sélectionner la cellule A1
2. clic droit / lien hypertexte
3. choisir "Emplacement dans ce document"
4. choisir la feuille "Données"
5. OK

Caillou

 

[phlaurent55]

Re : Aide sur une macro

Bonjour à tous,

avec ce code à mettre dans ThisWorkbook

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A1")) Is Nothing Then
Cancel = True
Sheets("Données").Select
End If
End Sub

clic-droit en A1 pour se diriger vers la feuille "Données"

à+
Philippe

 

[filtre69]

Re : Aide sur une macro

Yes ça marche phlaurent55 merci a vous deux pour votre aide.
J'ai encore une demande a vous faire sur mon calendrier je veux savoir en fin d'année les congés qu'il reste
j'ai bien trouver une formule qui marche sur janvier mais j'arrive pas a la faire marcher sur tous les mois
sachant que le total sur sur la feuille récap annuel.

=SI(NB.SI(Janvier!$D5:$E35;"CA")+(NB.SI(Janvier!$D5:$E35;"CA/2")/2)=0;"";NB.SI(Janvier!$D5:$E35;"CA")+(NB.SI(Janvier!$D5:$E35;"CA/2")/2))

merci filtre69

 

[phlaurent55]

Re : Aide sur une macro

Re,

J'ai encore une demande a vous faire sur mon calendrier je veux savoir en fin d'année les congés qu'il reste

sans voir le fichier la réponse risque de se faire attendre

à+
Philippe

 

[filtre69]

Re : Aide sur une macro

ok je te poste mon agenda