Microsoft 365 activer onglet format date

tahon.patrice · 3 Juillet 2024

Bonjour à tous,

je me creuse la tête.
J'aimerai activer un onglet déjà existant ( exemple: 1-06-24)
en msg box ca marche, il m'indique bien le nom de la cellue mais impossible de m'ouvrir l'onglet?
Quelqu'un à une piste?
Merci à tous
Patrice

sylvanu · 3 Juillet 2024

Bonjour Patrice,
Un essai en traitant la date non pas sous forme de nombre mais sous forme de chaine :

VB:

 Sub MOISSHEET()
 Range("A" & Range("a65536").End(xlUp)(2).Row).Select
 Selection.Offset(-1, 0).Select
 Dim MOIS$, Chaine$
 MOIS = ActiveCell
 MOIS = Replace(MOIS, "/", "-")
 MOIS = Left(MOIS, 6) & Right(MOIS, 2)
 Worksheets(MOIS).Activate
 End Sub

tahon.patrice · 3 Juillet 2024

sylvanu à dit:
Bonjour Patrice,
Un essai en traitant la date non pas sous forme de nombre mais sous forme de chaine :

VB:

Sub MOISSHEET() Range("A" & Range("a65536").End(xlUp)(2).Row).Select Selection.Offset(-1, 0).Select Dim MOIS$, Chaine$ MOIS = ActiveCell MOIS = Replace(MOIS, "/", "-") MOIS = Left(MOIS, 6) & Right(MOIS, 2) Worksheets(MOIS).Activate End Sub

Merci beaucoup

Microsoft 365 activer onglet format date

tahon.patrice

XLDnaute Nouveau

Pièces jointes

sylvanu

XLDnaute Barbatruc

Pièces jointes

tahon.patrice

XLDnaute Nouveau

Discussions similaires