XL 2013 Copie-collage d'une colonne effectué à moitié

[Ananas94]

Bonjour,

J'ai un problème avec Excel : je souhaite copier une colonne qui a un nombre variable de lignes et la coller sur une autre feuille.
J'ai effectué ce code :

feuille_source = "Sauvegarde_suivi_mensuel_pilote"
feuille_cible = "Data_tableau_de_bord_P"
colonne_source = ("F8:F" & Range("F" & Rows.Count).End(xlUp).Row)
colonne_cible = "D11"
S_M_P_5 = Copie(feuille_source, feuille_cible, colonne_source, colonne_cible)


Ma fonction copie est la suivante :


Sheets(feuille_source).Range(colonne_source).Copy
Sheets(feuille_cible).Range(colonne_cible).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False




Tout fonctionnait parfaitement lorsque soudain, la colonne se copie/colle à moitié sans explication. Auriez-vous une idée ?

Je vous remercie vivement par avance,
Excellente journée,

Anna

 

[Staple1600]

Re,

Anna
Il y a une dernière réponse dans ton autre discussion.
Tu ne l'as point vue?
EDITION: Bonsoir jmfmarques

 

[jmfmarques]

Bonjour
Quelle est la feuille active lorsque tu exécutes ta première macro ?
Car si elle n'est pas la feuille "Sauvegarde_suivi_mensuel_pilote" , la plage copiée sera celle d'une autre feuille (celle active).

 

[Staple1600]

Re

Ananas94
Pour cette question, ton code ainsi modifié fonctionne sur mon PC

Sub test()
Dim fS As Worksheet, fC As Worksheet, P$
Set fS = Sheets("Sauvegarde_suivi_mensuel_pilote")
Set fC = Sheets("Data_tableau_de_bord_P")
P = fS.Range("F8:F" & fS.Cells(Rows.Count, "F").End(xlUp).Row).Address
copie fS, fC, P, "D11"
End Sub

Private Sub copie(feuille_source As Worksheet, feuille_cible As Worksheet, Rng_source$, col_cible$)
feuille_source.Range(Rng_source).Copy
feuille_cible.Range(col_cible).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub

 

[Ananas94]

Bonjour,
Je viens de tester votre algorithme, il fonctionne parfaitement, je vous remercie mille fois !! vous me sauvez la vie

Merci beaucoup

Excellente journée,

Anna

 

[Staple1600]

Re

vous me sauvez la vie

Et pourtant je ne suis ni un gel hydroalcoolique (bien que j'ai de l'alcool en dedans de moi assez régulièrement) et je ne suis pas un masque non plus.

PS: Et non je ne porte pas de masque dans certaines soirées libidineuses, non plus!
Je ne fréquente jamais ce genre d'endroits.

 

[Ananas94]

ahahha