Tirer Formule mais sans la mise en forme [Résolu/Fermé]

Signaler
Messages postés
348
Date d'inscription
mardi 19 octobre 2010
Statut
Membre
Dernière intervention
15 avril 2021
-
Messages postés
348
Date d'inscription
mardi 19 octobre 2010
Statut
Membre
Dernière intervention
15 avril 2021
-
Bonjour,

j'ai un tableau très lourd avec plein de recherche V,
j'ai donc décidé de tirer la formule de la première ligne du tableau
jusqu'en bas et copier coller valeur le tableau mais a partir de la seconde ligne,
conservant ainsi ma première ligne de formule.

J'ai trouvé ce code qui génère deux problèmes

Sub Macro1()

With ActiveSheet.UsedRange
[C2:L2].AutoFill Range("C2:L2" & .Rows(.Rows.Count).Row)
End With

End Sub

Le premier c'est qu'il copie la mise en forme de la première ligne alors que seule
la formule m'intéresse

le second c'est qu'il étire plus bas que le tableau

Je vous remercie par avance de vos propositions

Cdt

1 réponse

Messages postés
15831
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
12 juillet 2021
1 512
Bonjour,

Sub Macro1()

With ActiveSheet.UsedRange
[C2:L2].AutoFill Range("C2:L2" & .Rows(.Rows.Count).Row), xlFillValues
End With

End Sub
Messages postés
348
Date d'inscription
mardi 19 octobre 2010
Statut
Membre
Dernière intervention
15 avril 2021
1
Merci beaucoup,