Contenu récent par nadeare

Re : La valeur du label vient d'une cellule et je veux la changer Merci je peux tu le transferré dans le bon forum ou juste reposer la question dans le bon forum

Dim a As Long Dim b As Long Private Sub UserForm_Activate() UserForm1.Height = Application.Height UserForm1.Width = Application.Width End Sub Private Sub TextBox0_Change() a = 1: b = 1: Cells(a, b) = UCase(TextBox0): TextBox1.Visible = False: TextBox1.Value = "" If Len(TextBox0) = 4...