Salut Flosauveur, Salut Nad,
Flosauveur, il vaudrait mieux donner tout de suite ton classeur définitif, même si tu dois y enlever les données confidentielles.
J'ai donc pris ton deuxième fichier, j'y ai ajouter le titre sur la page 2. Comme tes cellules avec le texte "Date:" ont parfois toujours un espace après les deux points - ce que je te déconseille au plus haut point, ça n'apporte que des ennuis - j'ai modifié mon code de la manière suivante :
If ActiveCell.Value = "Date:" Or ActiveCell.Value = "Date: " Then
J'ai également inséré un module sous Visual Basic - dans lequel j'ai placé mon code, copié de mon premier fichier - ainsi qu'un second bouton. Est-ce que ça peut convenir ainsi ?
Bonne journée