Reprise d'une formule dans une textbox
Résolu/Fermé
michelbr
Messages postés
9
Date d'inscription
jeudi 15 novembre 2012
Statut
Membre
Dernière intervention
28 mars 2013
-
22 févr. 2013 à 14:57
michelbr Messages postés 9 Date d'inscription jeudi 15 novembre 2012 Statut Membre Dernière intervention 28 mars 2013 - 28 mars 2013 à 11:26
michelbr Messages postés 9 Date d'inscription jeudi 15 novembre 2012 Statut Membre Dernière intervention 28 mars 2013 - 28 mars 2013 à 11:26
A voir également:
- Reprise d'une formule dans une textbox
- Formule si et - Guide
- Formule excel pour additionner plusieurs cellules - Guide
- Formule excel moyenne - Guide
- Excel retour à la ligne dans une formule - Guide
- Formule excel - Guide
1 réponse
michelbr
Messages postés
9
Date d'inscription
jeudi 15 novembre 2012
Statut
Membre
Dernière intervention
28 mars 2013
28 mars 2013 à 11:26
28 mars 2013 à 11:26
J'ai trouvé la solution :-)
En fait, la solution est toute bête, il faut juste procéder en deux phases :
-Lors du chargement de mon TextBox, étant donné que la formule qui y apparaît est sous la forme 00:00:00, je suis la procédure suivante : Je charge la TextBox depuis ma cellule source, j'en contrôle le contenu, si le contenu est "00:00:00" je le vide ("")
TextBox11.Value = .Cells(i + 1, "k").Value
If TextBox11 = "00:00:00" Then
TextBox11 = ""
End If
-Lors du déchargement de mon TextBox, pour ne pas écraser ma formule par du vide, je teste à nouveau mon TextBox, de la manière suivante : Si mon TextBox n'est pas vide, je me place sur la cellule de destination et j'y copie le contenu du Textbox.
Donc, si mon TextBox est vide je ne fais rien, ce qui n'écrase pas ma formule.
If Not TextBox11.Value = "" Then
.Offset(1, 10).Value = TextBox11.Value
End If
En fait, la solution est toute bête, il faut juste procéder en deux phases :
-Lors du chargement de mon TextBox, étant donné que la formule qui y apparaît est sous la forme 00:00:00, je suis la procédure suivante : Je charge la TextBox depuis ma cellule source, j'en contrôle le contenu, si le contenu est "00:00:00" je le vide ("")
TextBox11.Value = .Cells(i + 1, "k").Value
If TextBox11 = "00:00:00" Then
TextBox11 = ""
End If
-Lors du déchargement de mon TextBox, pour ne pas écraser ma formule par du vide, je teste à nouveau mon TextBox, de la manière suivante : Si mon TextBox n'est pas vide, je me place sur la cellule de destination et j'y copie le contenu du Textbox.
Donc, si mon TextBox est vide je ne fais rien, ce qui n'écrase pas ma formule.
If Not TextBox11.Value = "" Then
.Offset(1, 10).Value = TextBox11.Value
End If