VBA Nom de feuille automatique

[FaridP]

Bonjour à Tous,

Je souhaite insérer une feuille à l'ouverture d'un classeur ayant comme nom la date du jour (ex : 07-11-2007).
Jusqu'ici, pas de problème mais là ouça se complique c'est que je ne parviens à parcourir les noms de feuilles existantes afin de vérifier que cette feuille n'existe pas déjà (dans ce cas là, plus besoin de l'insérer).

Et la cerise sur la gateau, j'aimerais que la feuille en question soit insérée en dernière position.

Je sais j'en demande beaucoup.

Merci de votre Aide.

Que la force soit avec vous !

Cordialement,

Farid

 

[wilfried_42]

Re : VBA Nom de feuille automatique

Bonjour farid

Quand tu fais ton insertion de feuille
Sheets.add , ajoute l'option : before:=sheets(1)

Comme cela quand tu ouvres tonclasseur, tu n'as qu'à tester la nom de la premiere feuille pout savoir si ta date existe

if sheets(1).name = format(date,"dd/mm/yyyy") then ' cette page existe

 

[FaridP]

Re : VBA Nom de feuille automatique

Salut Wilfried,

Tout d'abord : un grand MERCI pour ton aide, j'avance à grandes enjambées.
Le seul point qu'il me reste à éclaircir c'est comment tester la dernière feuille (à la plave de la première).

Encore merci pour ton aide ... Heu.. Ton travail même. A ce point là c'est plus de l'aide.

Amicalement,

Farid

 

[wilfried_42]

Re : VBA Nom de feuille automatique

re:

Pour tester la derniere feuille quand on ne connait pas le nombre de feuille, il faut les compter, simple : Sheets.count
donc
sheets(sheets.count).name te donne le nom de la derniere feuille

 

[FaridP]

Re : VBA Nom de feuille automatique

Super !

Je suis donc sauvé ! Merci Wilfried