Sujet Précédent Sujet Suivant

Excel

swifth Messages postés 8 Statut Membre -  
kadeh Messages postés 341 Statut Membre -
Bonjour,
SVP quelqu'un peut m'aide a trouvé une solution pour enregistrer
les éléments d'une feuille excel sur une autre feuille excel automatiquement et merci
j'attent votre favorable répanse .

1 réponse

Réponse 1 / 1
kadeh Messages postés 341 Statut Membre 92
 
bon soir
quel sont les éléments que tu veux enregistrer?
@+
0
swifth Messages postés 8 Statut Membre
 
merci de votre réponse

par exemple quant je remplie ma feuille excel et je clik sur enregistré je veut que sa enregistre au même temps sur une autre feuille excel :)
0
kadeh Messages postés 341 Statut Membre 92 > swifth Messages postés 8 Statut Membre
 
tu veux enregistrer toute la feuille sur une autre feuille??? à qoui sert?
ou bien tu veux enregistrer des ligne, des colonnes ou des cellules spécifiques
@+
0
swifth Messages postés 8 Statut Membre > kadeh Messages postés 341 Statut Membre
 
je vous explique par exemple je suis entrain de remplir ma feuille (une seul feuille) avec des donné je veut que sait donné se copier sur une autre feuille quant je clik sur enregistre
0
kadeh Messages postés 341 Statut Membre 92 > swifth Messages postés 8 Statut Membre
 
onglet développeur, inserer bouton de commande (active x)
double click sur le bouton et insère le code suivant: et remplace feuil1 et feuil2 par les noms de tes feuille

Private Sub CommandButton1_Click()
Sheets("Feuil1").Select
Cells.Select
Selection.Copy
Sheets("Feuil2").Select
Cells.Select
ActiveSheet.Paste
End Sub

ou bien lancer l'enregistreur de macro faire ce que tu veux, puis arrete l'enregistrement
insère un bouton sur ta feuille
clik droit sur le bouton affecter macro et tu choisis la macro crée précedement
bonne soirée
0
swifth Messages postés 8 Statut Membre > kadeh Messages postés 341 Statut Membre
 
merci pour la réponse qui ma rafraichir la mémoire :) mé bon l'enregistrement sa été sur le même classeur mais moi je veut que l'enregistrement soit sur un autre classeur
j'ai trouvé une autre formule mé il la faut un peut de modification


Sub Bouton1_QuandClic()
Sheets("Feuil1").Select
Sheets("Feuil1").Copy
ActiveWorkbook.SaveAs FileName:= _
"C:\mes documents\" & "nomduclasseur", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub


((( ActiveWorkbook.SaveAs )) ca veur dire ActiveWorkbook.enregistrerSous

j'ai remplacer SaveAs pas Save mé sa marche pas

merci de m'aide svp

Cordialement
0