Tirer Formule mais sans la mise en forme

Résolu/Fermé
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 - 20 déc. 2013 à 10:03
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 - 26 déc. 2013 à 13:58
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
A voir également:

1 réponse

f894009 Messages postés 17217 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 27 décembre 2024 1 712
20 déc. 2013 à 10:54
Bonjour,

Sub Macro1()

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

End Sub
-1
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 1
26 déc. 2013 à 13:58
Merci beaucoup,
0