Bonjour,
Voici ma macro :
Sachanque la fonction IsWorksheet(str As String) me renvoie un boolean pour savoir si une page portant déjà ce nom éxiste.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Public Sub CreatePage(nomPage As String) Dim x As Integer x = ActiveWorkbook.Application.Sheets.Count If (IsWorksheet(nomPage)) Then GoTo ExisteDeja Sheets.Add.Move After:=Sheets(x) Sheets(x + 1).Name = nomPage ExisteDeja: End Sub
Et voilà, lorsque je lance ma fonction (mon classeur est vide) régulièrement (pas tout le temps), il me crée les pages en les nommant par défaut, c'est-à-dire par incrémentation : Feuil7; Feuil8; etc... (au lieu du nom spécifié en paramètre).
Y-t-il une ligne de code qui me permette de "raffraichir" les pages, que le document excel se remette en mémoire les pages qu'il possède?
Merci !
Partager