Maxoverfred
XLDnaute Occasionnel
Bonjour voici mon problème, je suis en train de comparer les champs sur mon form et sur ma feuille(qui va me servir de print), le form va charger dans un premier temps la feuille et permettre l'impression des données selon un autre format que sur le form...
J'aimerais donc par exemple: j'ai un textbox qui s'appele 'Txt_toto', je vais regarder si je le retrouve bien dans ma feuille (Sheet1) et si oui, le remplir avec les données selon la procédure suivante:
J'ai essayé avec vfind=worksheets('Print').Names.item('Txt_toto') mais je ne sais pas comment je dois continuer mon test étant donné que si je définis la valeur comme string, il se plante.
For Each ctrl In usrinput.Controls
vfind= ???
If IsNull(vfind) Or vfind = '' Then
Else
ThisWorkbook.Worksheets('Print').Range(ctrl.Name) = ctrl.Value
End If
End If
Next
Quelqu'un a une idée?
J'aimerais donc par exemple: j'ai un textbox qui s'appele 'Txt_toto', je vais regarder si je le retrouve bien dans ma feuille (Sheet1) et si oui, le remplir avec les données selon la procédure suivante:
J'ai essayé avec vfind=worksheets('Print').Names.item('Txt_toto') mais je ne sais pas comment je dois continuer mon test étant donné que si je définis la valeur comme string, il se plante.
For Each ctrl In usrinput.Controls
vfind= ???
If IsNull(vfind) Or vfind = '' Then
Else
ThisWorkbook.Worksheets('Print').Range(ctrl.Name) = ctrl.Value
End If
End If
Next
Quelqu'un a une idée?