Discussion :

[theDucky]

Bonjour,

Je créé deux fichiers Excel : FACTURES et CLIENTS

J'ai une UserForm dans FACTURES ou je récupère les données clients dans des TextBox.

Je cherche à mettre ces données dans des cellules du fichier CLIENTS.

Je pensais à quelque chose du genre :

Code :

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

Workbooks("CLIENTS.xlsm").Sheets("CLIENTS").Cells(1, 1) = FACTURES.xlsm.UserForm1.TextBox1.Value

mais évidemment ça ne fonctionne pas (sinon je ne serais pas ici ).

Si quelqu'un avait une idée pour résoudre mon problème.

Merci d'avance !!!

[Philippe Tulliez]

Bonjour,
En supposant que le code VBA et donc le UserForm se trouve dans le classeur nommé FACTURES
La ligne pour écrire le contenu du contrôle TextBox nommé txtCompany en cellule A2 de la feuille nommée Client du classeur nommé Client.xlsb est

Code :

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

1
2
3
4
5
Private Sub cmdConfirm_Click()
  With Workbooks("Client.xlsb").Worksheets("Client")
   .Range("A2").Value = Me.txtCompany.Value
  End With
End Sub

[theDucky]

Bonjour Philippe, et merci de votre réponse.

Cependant, l'UserForm est bien dans le fichier FACTURES, mais le code de ma macro est dans le fichier CLIENT.

[Philippe Tulliez]

Bonjour,

Cependant, l'UserForm est bien dans le fichier FACTURES, mais le code de ma macro est dans le fichier CLIENT.

C'est curieux.
Il faudrait alors être plus explicite de la manière dont l'ensemble du code travaille.
Où se trouve le code qui active le UserForm ?
L'édition de cette procédure apporterait un peu plus d'éclaircissement

[theDucky]

Je vais essayé d'être plus explicite.

Dans le fichier Facture :
UserForm1
TextBox1

Je lance ensuite une macro depuis facture pour inscrire ma facture dans ce fichier.

Afin de d'enregistrer mes données clients (qui sont dans l'UserForm) dans mon fichier Client, j'active une macro dans mon fichier Client qui récupère les données de la TextBox1 (vérif client existent, etc..)

Du coup, il me manque la partie de code pour mettre les données de la TextBox1 (dans le fichier Facture) dans une cellule ou une variable de ma macro dans mon fichier Client.

J'espère avoir été suffisamment explicite.

[theDucky]

J'essaye Autrement :

Fichier Facture :

Code :

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

1
2
3
4
5
6
7
Sub Macro_Facture()
 
    UserForm1.Show
 
    applicatio.Run "Client.xlsm!Module1.Macro_Client"
 
End Sub

Fichier Client :

Code :

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

1
2
3
4
5
6
7
Sub Macro_Client()
    
    Dim Variable As String
    
    Variable = UserForm1.TextBox1
    
End Sub

C'est "UserForm1.TextBox1" que je n'arrive pas à trouver.