Utisiation du mois de la date du jour
Fermé
dnk78
Messages postés
2
Date d'inscription
mardi 23 juin 2015
Statut
Membre
Dernière intervention
26 juin 2015
-
26 juin 2015 à 13:41
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 - 26 juin 2015 à 19:11
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 - 26 juin 2015 à 19:11
A voir également:
- Utisiation du mois de la date du jour
- Mettre à jour ses pilotes - Guide
- Loto 5/90 resultat du jour ✓ - Forum Excel
- Mise a jour airpods - Guide
- Mise à jour x96 mini ✓ - Forum Accessoires & objets connectés
- Nous n'avons pas pu terminer les mises à jour - Forum Windows 10
1 réponse
Frenchie83
Messages postés
2240
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
11 août 2023
337
26 juin 2015 à 14:44
26 juin 2015 à 14:44
Bonjour
Quelle est la logique?
mois=1 sélectionner A1
mois=6 sélectionner A45
mois = 7 sélectionner A80
En attendant plus de précisons, coller ceci dans le module de chaque feuille et remplacer les adresses de cellules entre crochets par vos adresses.
Cdlt
Quelle est la logique?
mois=1 sélectionner A1
mois=6 sélectionner A45
mois = 7 sélectionner A80
En attendant plus de précisons, coller ceci dans le module de chaque feuille et remplacer les adresses de cellules entre crochets par vos adresses.
Private Sub Worksheet_Activate()
Select Case Month(Date)
Case Is = 1
[A1].Select
Case Is = 2
[A10].Select
Case Is = 3
[A20].Select
Case Is = 4
[A30].Select
Case Is = 5
[A40].Select
Case Is = 6
[A50].Select
Case Is = 7
[A60].Select
Case Is = 8
[A70].Select
Case Is = 9
[A80].Select
Case Is = 10
[A90].Select
Case Is = 11
[A100].Select
Case Is = 12
[A110].Select
End Select
End Sub
Cdlt
26 juin 2015 à 15:26
dnk78
26 juin 2015 à 19:11
Case Is = 1
?
Case 1
fait l'affaire.