Programmation d'un bouton Traitement

Hulk

XLDnaute Barbatruc

• 12 Mai 2010

• #2

Re : Programmation d'un bouton Traitement

Hello Forum, Gimli,

Vois le classeur joint.

Deux méthodes possibles !

 

Pièces jointes

• Test.xls

  38 KB · Affichages: 69
• Test.xls

  38 KB · Affichages: 71
• Test.xls

  38 KB · Affichages: 72

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 12 Mai 2010

• #3

Re : Programmation d'un bouton Traitement

Merci Hulk c'est gentil 🙂

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 12 Mai 2010

• #4

Re : Programmation d'un bouton Traitement

J'ai réussi à programmer le bouton, grâce à Hulk 😉 . Pourriez vous m'expliquer la manière à suivre pour que lorsque je clique sur le bouton Traitement, il ouvre le document chargé dans un autre onglet ? Et le summum serait de pouvoir renommer en même temps le nouvel onglet (facultatif).
Merci 🙂

 

Vote positif 0 Vote négatif

U

Ubot303

XLDnaute Occasionnel

• 12 Mai 2010

• #5

Re : Programmation d'un bouton Traitement

Bonjour Gimli et Hulk,

Tu veux ouvrir ton classeur cible, copier son contenu dans un nouvel onglet de ton classeur courant et renommer l'onglet?
L'enregistreur de macros peut aider pour la syntaxe manquante 😉

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 12 Mai 2010

• #6

Re : Programmation d'un bouton Traitement

D'accord , mais je suis pas très à l'aise avec les macros 🙁
En gros je dois faire quoi ? merci de ton aide 😉

j'ai essayé avec l'enregistreur de macros, j'y arrive pas, je suis pas doué

 

Dernière édition: 12 Mai 2010

Vote positif 0 Vote négatif

U

Ubot303

XLDnaute Occasionnel

• 12 Mai 2010

• #7

Re : Programmation d'un bouton Traitement

Les réponses de l'enregistreur de macro 🙂

Ton_fichier_source.open
Sheets("Sheet1").Select
Selection.Copy
Windows("Ton_fichier_cible.xls").Activate
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Sheet2").Select
Sheets("Sheet2").Name = "Gimli"

Cliquez pour agrandir...

Il ouvre ainsi "Ton fichier_source" et copie le contenu de l'onglet sheet1 dans ton onglet sheet2 de "Ton_fichier_cible" et renomme l'onglet Sheet2 en Gimli 😀

Tu peux évidemment copier l'onglet directement sans passer par un ctrl c / ctrl v du contenu de l'onglet 🙂

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 12 Mai 2010

• #8

Re : Programmation d'un bouton Traitement

Super ! Merci énormément 🙂
Pour le "fichier_cible" je met le nom de la cellule ou il y a le chemin relatif ?


😛

 

Dernière édition: 12 Mai 2010

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 12 Mai 2010

• #9

Re : Programmation d'un bouton Traitement

la feuille qui comporte le bouton traitement s'appelle FeuilleTraitement.xls donc je remplace "Ton_fichier_source.open" par "FeuilleTraitement.xls.open" ? ça me paraît bizarre :$
et comment je fais pour sélectionner le contenu d'une cellule (le chemin relatif du fichier a ouvrir dans le nouvel onglet se trouve dans une cellule nommée CheminSource) ?

merci 🙂

 

Vote positif 0 Vote négatif

U

Ubot303

XLDnaute Occasionnel

• 12 Mai 2010

• #10

Re : Programmation d'un bouton Traitement

Je suis allé un peu vite sur l'ouverture d'un fichier 😉

Workbooks.Open "c:\Perso\Base de données.xls" devrait mieux fonctionner...
Tu peux évidemment remplacer le chemin par ta cellule B2 qui contient le chemin :

cells(2,2).value & "\Base de données.xls"

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 14 Mai 2010

• #11

Re : Programmation d'un bouton Traitement

Bonjour Ubot303,bonjour le forum,

désolé je n'ai pas pu venir sur le forum hier. Je ne comprend pas très bien en fait, pourrais-tu modifier ton code avec les données que j'ai fourni dans mon dernier post ? :

la feuille qui comporte le bouton traitement s'appelle FeuilleTraitement.xls donc je remplace "Ton_fichier_source.open" par "FeuilleTraitement.xls.open" ? ça me paraît bizarre :$
et comment je fais pour sélectionner le contenu d'une cellule (le chemin relatif du fichier a ouvrir dans le nouvel onglet se trouve dans une cellule nommée CheminSource) ?

merci

Cliquez pour agrandir...

EDIT:
j'ai une erreur à la première ligne (et sans doute à d'autres lignes aussi ^^), voici le code de mon bouton :

Private Sub BtnTraitement_Click()

Range("CheminSource").Value.Open
Sheets("Feuil1").Select
Selection.Copy
Windows(Range("CheminSource").Value).Activate
Sheets("Feuil2").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Feuil2").Select
Sheets("Feuil2").Name = "Brut"

End Sub

Cliquez pour agrandir...

merci 🙂

 

Dernière édition: 14 Mai 2010

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 14 Mai 2010

• #12

Re : Programmation d'un bouton Traitement

Quelqu'un peut m'aider ? 🙁
merci 😱

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 14 Mai 2010

• #13

Re : Programmation d'un bouton Traitement

Je me permet de mettre un petit Up 😱

 

Vote positif 0 Vote négatif

gimli

XLDnaute Occasionnel

• 16 Mai 2010

• #14

Re : Programmation d'un bouton Traitement

up, help me please 🙁

 

Vote positif 0 Vote négatif

Macpoy

XLDnaute Impliqué

• 16 Mai 2010

• #15

Re : Programmation d'un bouton Traitement

bonsoir le forum, gimli,

Workbooks.Open Filename:="C:\"& Range("CheminSource") & ".xls"

à mettre à la place de :

Range("CheminSource").Value.Open

@plus

 

Vote positif 0 Vote négatif