[Résolu] Copier formule mais pas donnéees

Alza

XLDnaute Junior
Bonjour à tous !
Je viens vers vous car j'ai une question toute bête, j'ai un tableau de données avec certaines colonnes de données brut et certaines colonnes de formules (tableau de 40 000 lignes voué à s'agrandir encore).

Je cherche à boucler sur chaque colonne de mon tableau et dans le cas ou la 2nde ligne de la colonne est une formule la recopier sur chaque ligne de la colonne (mais pas si c'est une valeur brute, uniquement dans le cas ou une formule est présente !!)

J'ai donc fais ce petit code qui ne contient pas encore la boucle mais soit :

Code:
firstligne = d.Range("U" & Rows.Count).End(xlUp).row
derligne = d.Range("A" & Rows.Count).End(xlUp).row
d.Range("U" & firstligne & ":U" & derligne).FormulaR1C1 = d.Range("U2").FormulaR1C1

Seulement j'ai un problème, malgré la précision "FormulaR1C1", si il n'y a pas de formule mais une valeur cela copie quand même la valeur dans toute la colonne, écrasant toutes les autres valeurs !

Comment puis-je remédier à cela ?

Merci d'avance de vôtre aide


Edit : Problème résolu avec un If Left(d.Range("U2").FormulaR1C1, 1) = "=" Then
Cependant si quelqu'un avait une solution + propre à proposer je suis preneur !
 
Dernière édition:

Discussions similaires

Réponses
1
Affichages
1 K

Statistiques des forums

Discussions
311 735
Messages
2 082 023
Membres
101 873
dernier inscrit
excellllll