Contenu textbox vers plusieurs fichiers excelRésolu

Question

Bonjour, 
 
Voilà mon problème : 
 
J'ai en classeur excel qui ouvre un "userform" au démarrage. Ce userform comporte 3 "textbox" et un bouton validation. 
Je voudrai qu'en cliquant le bouton, les données entrées dans les textbox s'enregistrent dans des cellules d'autres fichiers excel mais que ces fichiers ne restent pas ouverts (modification et enregistrement silencieux). 
 
Quelqu'un pourrait m'aider pour le code SVP (novice en VB) 
 
Merci d'avance

jrivet · Accepted Answer

Salut, Place ceci dans le UserForm => NOTE: Je n'ai pas renommer les controls Private Sub CommandButton1_Click() 'Variable représentant le classeur "destination" Dim Wb As Workbook 'Ouverture du classeur de destination Set Wb = Application.Workbooks.Open("C:\B.xls") Call Wb.Activate 'Réduit la fenêtre pour rendre "invisible" le classeur ActiveWindow.WindowState = xlMinimized 'Place dans la cellule A1 le contenu de TextBox1 Wb.Worksheets("Feuil1").Range("A1").Value = TextBox1.Text 'Place dans la cellule B1 le contenu de TextBox2 Wb.Worksheets("Feuil1").Range("B1").Value = TextBox2.Text 'Place dans la cellule C1 le contenu de TextBox3 Wb.Worksheets("Feuil1").Range("C1").Value = TextBox3.Text 'Fermeture du classeur en sauvant les changements Call Wb.Close(True) 'Destruction de l'objet Set Wb = Nothing End Sub Coloration syntaxique automatique [AFCK] @+, Ju£i?n

marsbidon · Answer

Bonjour,

merci beaucoup pour votre réponse.

J'avais partiellement trouvé la réponse en cherchant tout seul mais il me manquait quelques codes pour que cela marche.

MAintenant c'est bon.

Merci

Contenu textbox vers plusieurs fichiers excel

2 réponses

Votre réponse

Discussions similaires