archivage

J

julos08

XLDnaute Nouveau

• 12 Mars 2005

• #2

bonsoir catherine

Pouurais tu etre plus explicite sur ta demande sinon tu peux essayé ca

Sub Enregistre_Sous()
Dim Nom As String

Nom = InputBox('Donnez le nom du fichier!')
If Nom = '' Then Exit Sub
Sheets('feuil1').Copy
ActiveWorkbook.SaveAs Filename:=Nom
End Sub

a la place de feuil1 tu met le nom de ta feuille

@++
julos08

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 12 Mars 2005

• #3

Bonjour, enfin bonsoir !, Catherine

Voici un code le plus simple possible pour toi :

Code:

Sub AutoSaveOneSheet()
Dim WS As Worksheet
Dim MyPath As String

Set WS = Worksheets('NomDeTaFeuille')

MyPath = ThisWorkbook.Path & '\\'

WS.Copy

    With ActiveWorkbook
        .SaveAs MyPath & 'Back_Up_As_At_' & Format(Now, 'DD-MM-YY-HH-MM-SS'Â'Â')
        .Close
    End With

End Sub

Si tu as des problèmes avec les macro je te conseille ce Fil de l'ancien Forum

=> Lien supprimé

Fil qui lui-même contient d'autres liens... à suivre ...

Bonne Soirée
@+Thierry

Message édité par: _Thierry, à: 12/03/2005 21:31

 

Vote positif 0 Vote négatif

C

catherine

Guest

• 12 Mars 2005

• #4

re à tous
merci en attendant
à+
catherine

 

Vote positif 0 Vote négatif

C

catherine

Guest

• 12 Mars 2005

• #5

oups et re

je vais paretre nunuche mais je le place ou ce code aîe excuse je débute

merci de votre compréhention

cath

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 12 Mars 2005

• #6

Re Bonsoir Catherine

Je vois que tu n'as pas suivi mes liens...

Tu as tout dedans...

Bonne Soirée et dévcouverte du VBA
@+Thierry

 

Vote positif 0 Vote négatif

J

julos08

XLDnaute Nouveau

• 12 Mars 2005

• #7

Dans excel tu clic sur outils, macro, visualbasic editeur
ensuite dans le vba tu clic sur insertion, module
tu colle le code dans le module
puis tu retourne dans excel
avec la barre d'outil formulaire tu crée un bouton et tu lui assigne la macro
sinon tu clic sur outils, macro, macros
tu selectionne ta macro et tu clic sur executer

voila

@++
julos08

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 12 Mars 2005

• #8

Bonsoir Julos,

... tiens toi non plus tu n'as pas suivi mes liens !

Bonne Soirée
@+Thierry

 

Vote positif 0 Vote négatif

J

julos08

XLDnaute Nouveau

• 12 Mars 2005

• #9

bonsoir thierry

non desole javais lexplication toute prete sous la main

mais jai ete voir les fils, ton explications et 100 fois mieux

@++
julos08

 

Vote positif 0 Vote négatif

C

CATHERINE

Guest

• 12 Mars 2005

• #10

re

pour être plus claire voila ce que je recherche

sur la premier feuille ce trouve des données feuille qui va me servir tout le temps

j'aimerais archiver celle ci dans une autre ou je pourais consulte toutes les feuille archiver
est ce possible
aider moi je ne m'en sort pas je débute dans la macro

j'ai suivi les fil mais je ne comprend toujours pas comment archiver
pardon de ne pas comprendre mais j'essais et tout seul c'est assez compliquer


merci de votre compréhention
à+

catherine

 

Vote positif 0 Vote négatif

ChTi160

XLDnaute Barbatruc

• 12 Mars 2005

• #11

Salut'Catherine' julos08 ' et @+Thierry
je pense qu'il faut être plus précise et peut être mettre un exemple de ce que tu veux

j'aimerais archiver celle ci dans une autre ou je pourais consulte toutes les feuille archiver

sont ce les feuilles ou les données de cette feuille que tu veux ajouter a celles déjà archivées dans l'autre feuille ,comme on le ferait pour aprovisionner une base de données
bonne nuit

Message édité par: ChTi160, à: 12/03/2005 23:20

 

Vote positif 0 Vote négatif