Bonjour à tous,
J'aurais besoin de votre aide.
J'ai une feuille, contenant des dates qui sont calculées chacune x temps après la date précédante.
Donc, à priori, à part la première date, toutes sont automatiques.
De temps à autre, je change une date en tapant dans une cellule une date au format dd.mm.yyyy. Dès lors, toutes les dates qui suivent sont recalculées.
Je voulais faire cela depuis un userform.
Lorsque j'ouvre mon fichier depuis le masque, mes formules n'apparaissent pas dans les textbox, mais à la place j'ai : 00:00:00 (format heure à la place de ma formule).
Au moment où je sauve mon fichier, toutes mes formules disparaîssent, remplacées par un 0, sur ma feuille de données.
Comment faire pour que ma formule soit reprise dans ma textbox (éventuellement cachée) de manière à ce qu'ensuite, lors de la sauvegarde, cette formule se retrouve à nouveau à sa place dans la feuille de données ?
Ou alors, peut-être ce serait plus facile, comment faire pour que, s'il y a une formule dans la case, si je n'entre rien dans la textbox correspondante, cela n'écrive rien dans la cellule de ma feuille de données, afin de ne pas y effacer ma formule déjà présente ?
Voici un moreau de ma macro :
For i = 0 To ListBox1.ListCount
If ListBox1.Selected(i) = True Then
With Worksheets("SELECTIONS").Range("a" & i + 1)
.Offset(1, 1).Value = TextBox2.Value
.Offset(1, 2).Value = TextBox3.Value
.Offset(1, 3).Value = TextBox4.Value
.Offset(1, 4).Value = TextBox5.Value
.Offset(1, 5).Value = TextBox6.Value
.Offset(1, 6).Value = TextBox7.Value
.Offset(1, 7).Value = TextBox8.Value
.Offset(1, 8).Value = TextBox9.Value
'etc...
End With
End If
Next i
Merci d'avance pour votre aide, meilleures salutations à tous
Michel
J'aurais besoin de votre aide.
J'ai une feuille, contenant des dates qui sont calculées chacune x temps après la date précédante.
Donc, à priori, à part la première date, toutes sont automatiques.
De temps à autre, je change une date en tapant dans une cellule une date au format dd.mm.yyyy. Dès lors, toutes les dates qui suivent sont recalculées.
Je voulais faire cela depuis un userform.
Lorsque j'ouvre mon fichier depuis le masque, mes formules n'apparaissent pas dans les textbox, mais à la place j'ai : 00:00:00 (format heure à la place de ma formule).
Au moment où je sauve mon fichier, toutes mes formules disparaîssent, remplacées par un 0, sur ma feuille de données.
Comment faire pour que ma formule soit reprise dans ma textbox (éventuellement cachée) de manière à ce qu'ensuite, lors de la sauvegarde, cette formule se retrouve à nouveau à sa place dans la feuille de données ?
Ou alors, peut-être ce serait plus facile, comment faire pour que, s'il y a une formule dans la case, si je n'entre rien dans la textbox correspondante, cela n'écrive rien dans la cellule de ma feuille de données, afin de ne pas y effacer ma formule déjà présente ?
Voici un moreau de ma macro :
For i = 0 To ListBox1.ListCount
If ListBox1.Selected(i) = True Then
With Worksheets("SELECTIONS").Range("a" & i + 1)
.Offset(1, 1).Value = TextBox2.Value
.Offset(1, 2).Value = TextBox3.Value
.Offset(1, 3).Value = TextBox4.Value
.Offset(1, 4).Value = TextBox5.Value
.Offset(1, 5).Value = TextBox6.Value
.Offset(1, 6).Value = TextBox7.Value
.Offset(1, 7).Value = TextBox8.Value
.Offset(1, 8).Value = TextBox9.Value
'etc...
End With
End If
Next i
Merci d'avance pour votre aide, meilleures salutations à tous
Michel
Dernière édition: