Bonjour à Tous,
J'essais de formater des cellules sous conditions et ça plante sans que j'arrive à trouver pourquoi
Voilà le code pour une condition, et j'ai l'erreur "impossible de définir la propriété NumberFormat de la classe Range"
Voilà le code complet, j'arrive bien à inscrire la valeur du textbox85 dans la cellule, mais pas à la formater avec VBa
Est il possible par exemple de faire : Forma = ListBox35.Text et ensuite "format de la cellule = Forma" ?, cela m'éviterait pas mal de si imbriqués
Merci d'avance pour votre aide
cordialement Didier
J'essais de formater des cellules sous conditions et ça plante sans que j'arrive à trouver pourquoi
Voilà le code pour une condition, et j'ai l'erreur "impossible de définir la propriété NumberFormat de la classe Range"
Code:
If ListBox35.Text = "M²" Then
Cells(L, C).NumberFormat = "General ""M²"""
End If
Voilà le code complet, j'arrive bien à inscrire la valeur du textbox85 dans la cellule, mais pas à la formater avec VBa
Code:
Private Sub CommandButton10_Click()
With Sheets("Programme des travaux")
Dim L As Long, C As Long
C = 4
L = Range("A36").End(xlUp).Row
Cells(L, C).Value = TextBox85.Value
Unload UserForm1
If ListBox35.Text = "M²" Then
Cells(L, C).NumberFormat = "General ""M²"""
End If
End With
End Sub
Est il possible par exemple de faire : Forma = ListBox35.Text et ensuite "format de la cellule = Forma" ?, cela m'éviterait pas mal de si imbriqués
Merci d'avance pour votre aide
cordialement Didier