mariobross
XLDnaute Occasionnel
Bonjour.
en me servant de la poignée de recopie , si je selectionne ("b2:h2") et que je recopie en b2:ac2
cela génere le code suivant:
Range("B2:H2").Select
Selection.AutoFill Destination:=Range("B2:AC2"), Type:=xlFillDefault
Range("B2:AC2").Select
je voudrais me servir de la recopie mais dans des cellules aléatoires qui seraient
données par une combobox , j'ai crée ce code , mais sans résultats:
If ComboBox1.Value = "lun" Then adresse = "b2:h2"
If ComboBox1.Value = "lun" Then adresse1 = "b2:m2"
Range(adresse).Select
Selection.AutoFill Destination:=Range(adresse1), Type:=xlFillDefault
Range(adresse1).Select
avez vous une solution pour se servir de la poignée de recopie dans vba , mais sans que les cellules soient figées?
merci pour vos astuces.
en me servant de la poignée de recopie , si je selectionne ("b2:h2") et que je recopie en b2:ac2
cela génere le code suivant:
Range("B2:H2").Select
Selection.AutoFill Destination:=Range("B2:AC2"), Type:=xlFillDefault
Range("B2:AC2").Select
je voudrais me servir de la recopie mais dans des cellules aléatoires qui seraient
données par une combobox , j'ai crée ce code , mais sans résultats:
If ComboBox1.Value = "lun" Then adresse = "b2:h2"
If ComboBox1.Value = "lun" Then adresse1 = "b2:m2"
Range(adresse).Select
Selection.AutoFill Destination:=Range(adresse1), Type:=xlFillDefault
Range(adresse1).Select
avez vous une solution pour se servir de la poignée de recopie dans vba , mais sans que les cellules soient figées?
merci pour vos astuces.