Coller juste les valeurs

Résolu/Fermé
Feudora Messages postés 81 Date d'inscription mardi 5 juillet 2016 Statut Membre Dernière intervention 2 décembre 2016 - 25 juil. 2016 à 16:49
Feudora Messages postés 81 Date d'inscription mardi 5 juillet 2016 Statut Membre Dernière intervention 2 décembre 2016 - 26 juil. 2016 à 08:27
Bonjour,

J'ai une macro qui va chercher les valeurs d'un fichier pour les coller dans un autre qui fonctionne très bien, cependant je me suis aperçu en l'adaptant dans un autre cas qu'elle me copit la cellule entière et s'il y a une formule cela me copie la formule. Je voudrais que cela me copie uniquement la valeur de la cellule sans prendre la formule.

J'ai vu sur les forum qu'il suffit de rajouter un
.Value
dans ma formule cependant je ne sais pas où le rajouter.

mon code de copie est le suivant:


derligK = Workbooks(FichierSource).Sheets("summary").Range("K" & Rows.Count).End(xlUp).Row
Workbooks(FichierSource).Sheets("summary").Range("K10:K" & derligK).Copy Workbooks(FichierCible).ActiveSheet.Range("A2").Resize(derligK - 10)


A l'âme charitable qui s'y connait plus que moi(ce qui n'est pas difficile), merci d'avance :)


1 réponse

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
25 juil. 2016 à 17:18
Bonjour,

With Workbooks(FichierSource).Sheets("summary")
DerLigK = .Range("K" & Rows.Count).End(xlUp).Row
Workbooks(FichierCible).ActiveSheet.Range("A2").Resize(DerLigK - 9) = .Range("K10:K" & DerLigK).Value
End With


A+
0
Feudora Messages postés 81 Date d'inscription mardi 5 juillet 2016 Statut Membre Dernière intervention 2 décembre 2016
26 juil. 2016 à 08:27
Top !! Merci beaucoup
0