Discussion :

[LinC49]

Bonsoir tout le monde, je me permet d'écrire un nouveau post car après moult recherche je ne trouve pas de solution à mon problème.

Je m'explique j'ai un classeur avec un Userform avec des contrôles (textboxs, comboboxs...) après avoir saisie les informations demandées un bouton valider permet d'inscrire ces informations dans les cellules correspondantes.
Pour l'instant tout va pour le mieux. Ma question est est - ce que à partir de ce même bouton ou un autre je peux inscrire ces informations dans un autre classeur?

Pour conclure, si quelqu'un à une solution, un tutoriel ou une discussion résolue, je suis prenante! MERCI BEAUCOUP!!!!

[mercatog]

Exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub btnArchiver_Click()
Dim wbk As Workbook
Dim Sh As Worksheet
Dim fichierAutre As String
 
fichierAutre = "C:\Users\user\Desktop\AutreFichier.xls"
Application.ScreenUpdating = False
Set wbk = Workbooks.Open(fichierAutre)
Set Sh = wbk.Sheets("Feuil1")
Sh.Range("A1").Value = Me.textbox1.Value
'ici en copie dans A1 de Feuil1 de AutreFichier la valeur de TextBox1
Set Sh = Nothing
wbk.Close True
Set wbk = Nothing
End Sub

[pgz]

Bonsoir,

Si l'autre classeur est ouvert, c'est évident. Là où tu écrivais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisworkBook.Worksheets("NomFeuille").Range("...").Value = ...

tu écris

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

oNewWbk.Worksheets("NomFeuille").Range("...").Value = ...

Où oNewWbk est une référence à l'autre classeur ouvert.
Si l'autre classeur est fermé, tu as sur DVP ce tuto Lire et écrire dans les classeurs Excel fermés


Cordialement,

PGZ

[LinC49]

Merci beaucoup c'était exactement ce que je recherchait!!!!!!