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 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
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