Re : Formulaire VBA renvoi sur plusieurs onglets
Encoooore moi !!
Bon le userform marche très bien, j'ai juste un petit soucis au niveau de mes pages de données. Les textbox sont en format texte et forcément je rentre dans certaines colonnes des montants du coup j'ai de très énervantes petites étiquettes vertes d'erreur. J'ai bien vu l'astuce pour changer le format des heures mais je n'arrive pas à trouver la dénomination pour le format nombre ?
Private Sub CommandButton1_Click()
If ComboBox1.ListIndex = -1 Then Exit Sub
With Sheets(CStr(ComboBox1))
dl = .Range("A65000").End(xlUp).Row + 1
If IsDate(TextBox1) Then .Cells(dl, 1) = CDate(TextBox1)
.Cells(dl, 2) = TextBox2
.Cells(dl, 3) = TextBox3
.Cells(dl, 4) = TextBox4
.Cells(dl, 5) = TextBox5
.Cells(dl, 6) = TextBox6
.Cells(dl, 7) = TextBox7
.Cells(dl, 8) = TextBox8
End With
Efface
End Sub
Il me faudrait les textbox 4 à 8 en format nombre, j'ai cherché sur le forum sur ce sujet et je ne tombe jamais sur la même formulation en If ... 😕