Re : Comment récupérer la valeur d'une TextBox à partir d'une fonction d'un autre Cla
Bonjour Ratos, Gelinotte,
Un essai (bien tordu ma foi - il y a forcément plus simple) qui utilise une feuille auxilliaire cachée "Aux" dans le classeur "traitement" pour le passage des valeurs.
Pour utiliser les valeurs des TextBox du userForm (ou tout contrôle ayant une propriété "VALUE") dans le classeur 'traitement', on utilise : sh.Range("aux_NomControle")
avec sh=ThisWorkbook.Sheets("Aux") et avec NomControle qui est le nom du contrôle sur le userform auquel on veut faire référence.
Pour afficher les résultats des calculs de "Fairesomme", on utilise la syntaxe suivante (dans le userform):
Me.NomControle= sh.Range("aux_NomControle")
avec sh= Workbooks("Ratos-Traitement-v2.xls").Sheets("Aux") et avec NomControle qui est le nom du contrôle sur le userform auquel on veut faire référence.
Exemple: il ya un contrôle Heure (textbox) sur le userform.
Dans le classeur 'traitement', pour accéder à la valeur de Heure on écrit : msgbox sh.range("aux_heure")
Pour récupérer la valeur de heure, après calcul dans le classeur 'traitement' on écrit: me.heure = sh.range("aux_heure")