Bonjour à tous j'utilise ce code qui fonctionne trés bien, pour une numérotation automatique en colonne B.Je suis appelé à y integréer une ligne en couleur fusionnée de A à J avec du texte dans cette ligne.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Private Sub CommandButton2_Click() ' Mise en place des valeurs saisies DerLig = [A65000].End(xlUp).Row + 1 Cells(DerLig, 1).Value = ComboBox5 cells(derlig,2).FormulaR1C1 = "=IF(RC1="""","""",ROW()-2)" Cells(DerLig, 3).Value = TextBox1 Cells(DerLig, 4).Value = TextBox2 Cells(DerLig, 5).Value = TextBox3 If OptionButton1.Value = True Then Cells(DerLig, 6).Value = TextBox4.Value & "" ElseIf OptionButton2.Value = True Then Cells(DerLig, 6).Value = TextBox4.Value & " ml" ElseIf OptionButton3.Value = True Then Cells(DerLig, 6).Value = TextBox4.Value & " m²" End If Cells(DerLig, 7).Value = TextBox5 Cells(DerLig, 8).Value = TextBox6 Cells(DerLig, 9).Value = ComboBox6
Et je ne voudrais pas comptabiliser cette ligen dans ma numérotation automatique.
Est ce réalisable?
si oui y a t'il la possibilité de m'aider, par avance merci, amitiés
De ce fait je voudrais que si
Partager