Contenu récent par boli

Bonjour , merci de m'avoir répondu ,j'ai essayé et sa ne marche pas ;( désolé Est-ce qu'il faut que je l'ajoute à la formule ..... Merci

Aussi petit probleme il ne se met pas automatiquement sur chaques onglets (31 jours ) , il faut que je fasse des enter à chaque fois est-ce que c'est possible qu'il change quand je change le premier onglet svp. Merci pour la réponse rapide .

Merci beaucoup JCGL

bonjour , je voudrais utiliser la même formule que celle d'en haut( Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("B4")) Is Nothing Then ActiveSheet.Name = Range("B4") End If End Sub) Mais utiliser le format date comment je peut le faire svp. Merci

bonjour , je voudrais utiliser la même formule que celle d'en haut( Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("B4")) Is Nothing Then ActiveSheet.Name = Range("B4") End If End Sub) Mais utiliser le format date comment je peut le faire svp. Merci

bonjour , je voudrais utiliser la même formule que celle d'en haut( Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("B4")) Is Nothing Then ActiveSheet.Name = Range("B4") End If End Sub) Mais utiliser le format date comment je peut le faire svp. Merci