dans une textbox ou dans la cellule E7 ??Si je rentre une valeur dans ma textbox en E7 par exemple
Sheets("nomfeuille").Range("E7").Value = TextBox1.Value
Range("A1:A10").Value = TextBox1
Sheets("Données").Cells(li, col)Resize(8).Value = Me.TextBox3.Value 'place la valeur de la TextBox 3
Sheets("Données").Cells(7, col)Resize(8).Value
Sheets("Données").Cells(7, col).Resize(8).Value = Me.TextBox3.Value
Option Explicit
Dim x As Variant
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 5 Or Target.Count > 1 Then Exit Sub
If IsNumeric(Target) And Target.Value < 0 Then Target = x
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
x = Target.Value
End Sub