Copier/Coller d'une cellule Résolu/Fermé

Question

Bonjour, 

Je souhaite copier une cellule d'un classeur dans un autre classeur. Pour une raison qui m'est inconnue, la valeur dans la cellule à copier est écrite sur 4 colonnes. Je voudrais toutefois faire mon collage dans une seule colonne. Actuellement, avec le code ci-dessous, le collage garde le format de cellule initial. Comment coller sous une seule colonne ?
Voici le code :
wbk.Activate
Range("U338").Select 
Application.CutCopyMode = False
Selection.Copy
Windows(classeur).Activate
Range("D4").Select
ActiveSheet.Paste

J'imagine que c'est dans les options mais je ne m'y connais pas trop...
Merci d'avance,
titouf


Configuration: Windows 7 / Chrome 46.0.2490.80

diablo13800 · Answer

Bonjour,

Essaie avec ce code, il faut juste Inserer l'option de retour a la ligne automatique normalement:)

wbk.ActivateRange("U338").Select Application.CutCopyMode = FalseSelection.CopyWindows(classeur).ActivateRange("D4").SelectActiveSheet.PasteSelection.WrapText=True

titouf · Answer

J'ai "trouvé" une méthode pour le faire sans copier de cellule...
Il suffit de prendre la valeur de la cellule et non la copier, puis d'affecter cette valeur à la cellule destinataire :)

wbk.Activate
valeur_copiee = Range("U338").Value
Windows(classeur_pvc).Activate
Range("D4").Value = valeur_copiee

Copier/Coller d'une cellule

2 réponses

Discussions similaires