Bonjour,
Je viens vers vous car j'ai essayé plusieurs formules, dans des nouveaux classeurs il fonctionne je n'arrive pas à comprendre pourquoi dans ce classeur là il ne veut pas fonctionner pouvez-vous m'aider s'il vous plaît.
Je viens vers vous car j'ai essayé plusieurs formules, dans des nouveaux classeurs il fonctionne je n'arrive pas à comprendre pourquoi dans ce classeur là il ne veut pas fonctionner pouvez-vous m'aider s'il vous plaît.
Code:
Private Sub CmdAjouter_Click()
Sheets("ToilesRépertoriés").Activate
Range("A1").Select
Selection.End(xlUp).Select
Selection.Offset(0, 1).Select
ActiveCell = TextBox1
ActiveCell.Offset(0, 1).Value = TextBox2
ActiveCell.Offset(0, 3).Value = ComboBox1
ActiveCell.Offset(0, 4).Value = ComboBox2
ActiveCell.Offset(0, 5).Value = ComboBox3
ActiveCell.Offset(0, 6).Value = ComboBox4
ActiveCell.Offset(0, 7).Value = TextBox3
ActiveCell.Offset(0, 8).Value = TextBox4
ActiveCell.Offset(0, 9).Value = TextBox5
End Sub