Copie de formule en VBA

[Quaisako]

Bonjour le Forum,

dans une plage 'A5:AExxxxxxx'
j'essaie d'insérer une zone de liste déroulante en 'A', puis de copier des formules en 'B:AE'.

J'arrive en partie à insérer la zone de liste, mais pour les formules, je sèche.

Votre aide serait la bienvenue.
Merci d'avance.
Jipé [file name=TestSuppX.zip size=19048]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/TestSuppX.zip[/file]

 

[Abel]

Bonjour Quaisako,

Essaie ce code :

Sub RecopieLigne()
Dim dl
dl = Range('a65536').End(xlUp).Row
Range('A' & dl & ':AE' & dl).Select
Selection.AutoFill Destination:=Range('A' & dl & ':AE' & dl + 1), Type:=xlFillDefault
Range('A' & dl + 1).ClearContents
End Sub

Et débranche le 'Private Sub worksheet_Change(ByVal Target As Range)'

Pour le bouton, prends celui de la 'Boite à outils contrôles' plutôt de celui du 'Formulaire'.

Abel.