J'utilise plusieurs "TextBox" pour remplir automatiquement des cellules.
Exemple de la TextBox2 :
Private Sub TextBox2_Change()
Range("a9").Value = TextBox2.Text
End Sub
Pour effacer le contenu des cellules liées je n'ai pas de souci par contre y-a-t-il une possibilité d'effacer le contenu de ces zones de texte en une seule fois ? sans à avoir à leur contenu une par une.
Merci pour réponse(s) à venir. Je ne peux vous joindre le fichier source (Trop lourd)
Et1000lio
Donc tu sembles connaître les références de tes cellules liées. Pour la textbox2, c'est A9.
Une solution élégante consiste à les sélectionner en cliquant sur ctrl et de nommer la zone (par exemple) Textboxà0.
Puis dans un module :
Code:
Sub Zéro()
Range("Textboxà0") = ""
end Sub
ou sans zone nommée (en supposant que les cellules liées sont en A9, B24, C36:
Code:
Sub ZéroBis()
Range("A9, B24, C36, H14") = ""
end Sub
Merci pour ta réponse mais ... Oups ! Je suis un peu perdu.
Oui j'ai connaissance des cellules liées mais ce sont les informations dans zone texte que je voudrai effacer... je te fais une image de ma feuille... ce sera plus explicatif.