Sauvegarde d'un onglet

bonjour tout le monde

j'aimerais savoir si vous connaissez un code qui permettrait d'enregistrer une seule feuille de mon classeur de 22 pages.

la seule feuille de mon classeur que je veux enregistrer constitu ma base de donnée

merci

cdt,

le giaire

Bonjour,

un exemple :

Sub sauv()
Dim LePath As String
Dim LeNom As String
Application.ScreenUpdating = False
LePath = ActiveWorkbook.Path & "\"
LeNom = "sauvegarde du " & Format(Date, "yyyy-mm-dd") & ".xls"
Sheets("Base").Copy
ActiveWorkbook.SaveAs LePath & LeNom
ActiveWorkbook.Close
End Sub

Bonne journée

bonjour,

ton code ne fonctionne pas

il m'ouvre une nouvelle feuille

il faut mettre le code ou???

cdt,

le giaire

Bonsoir,

On ne dit pas :

ton code ne fonctionne pas

on dit, je n'arrive pas à l'adapter...

Ce code est à mettre dans un module standard (sous VBE, clic droit sur le "ThisWorkBook", Insérer -> Module)

Tu as bien un onglet nommé "base"? (ou tu as changé le nom de l'onglet dans le code)?

Et, euh, j'y pense, as-tu regardé dans le répertoire de ton fichier initial, si tu n'avais pas un nouveau classeur nommé "sauvegarde du 2010-06-25"?

Bonjour,

il m'ouvre une nouvelle feuille

Hormis les commentaires de Cousinhub, l'instruction --> Sheets("Base").Copy copie la feuille BASE de ton fichier vers un nouveau classeur. Donc normal que cela t'ouvre unnouveau classeur avec uniquement la feuille BAse.

Amicalement

Edit : Salut Cousinhub, cela faisait longtemps que tu étais absent du forum... bonne journée à Nouéma.

Rechercher des sujets similaires à "sauvegarde onglet"