Créer et nommer une nouvelle feuille ExcelRésolu

Question

Bonjour, 

Je dois créer un Excel avec deux trois options VBA et j'arrive a générer automatiquement (relié a un bouton) une nouvelle feuille qui s'insère en troisième position dans les onglets mais je n'arrive pas a la créer en lui donnant un nom qui correspond à la date du jour. Aussi si quelqu'un à la solution, merci par avance. 

En espérant que cela soit possible 

Je me sers d'Excel 2003 au travail.

jrivet · Accepted Answer

Salut,
Je ne sais pas si cela va t'aider mais regarde ceci.

Worksheets.Add().Name = Replace(Date, "/", "_")

@+: Ju£i?n
Pensez: Réponse acceptée

Konyl · Answer

Merci beaucoup, ça marche

jrivet · Answer

Re,
De rien.

NB: Le bouton réponse acceptée sert à valider le ou les post qui t'on donné la solution

@+: Ju£i?n
Pensez: Réponse acceptée

Konyl · Answer

Peut être peux tu m'aider pour une deuxième problèmatique, j'explique rapidement.

J'utilise un Excel relié a une requête sql pour importer des données depuis une bdd. donc comme tu me l'as montré, je crée une feuille nommée avec la date du jour grace a un bouton "Historiser", mais si l'utilisatrice reclic sur ce même bouton, bah le code fait une erreur car la feuille existe déjà, normal. 
Ma question est : comment lui dire d'écraser la feuille si elle existe déjà mais de façon non nominative. J'écris ce que je pense a la place du code vu que je suis débutant.

Worksheets.Add().Name = Replace(Date, "/", "_") 
If sheet (Date, "/", "_") existe déjà then ecrase avec (Date, "/", "_")

Merci encore pour ton aide, n'hésite pas si tu as des questions.

jrivet · Answer

Re,
Regarde ce que fait ceci.

On Error Resume Next
   Application.DisplayAlerts = False
   Call Worksheets(Replace(Date, "/", "_")).Delete
On Error GoTo 0
Worksheets.Add().Name = Replace(Date, "/", "_")
Application.DisplayAlerts = True , ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

Konyl · Answer

Nickel, merci encore !

jrivet · Answer

Re,
De rien. Je vais me répéter

NB: Le bouton réponse acceptée sert à valider le ou les post qui t'on donné la solution (IE PAS CEUX POUR DIRE MERCI)

Il ont pour but d'aider visuellement un autre memebres à identifier rapidement les réponses correctes

@+: Ju£i?n
Pensez: Réponse acceptée

Créer et nommer une nouvelle feuille Excel

7 réponses

Votre réponse

Discussions similaires