Change a Macro - Copy in Columns instead of copy in Rows
On 8 Mai, 18:47, joel wrote:
OK OK , I'll work , but only this part solve my problem :
Absolute all my code work perfect , except this part :
With DestWks
NextColumn = .Cells("1", .Columns.Count).Column + 1
myCell.EntireColumn.Copy
.Cells("1", NextColumn).PasteSpecial , Paste:=xlPasteValues
End With
It is OK and without Add-ing another sheets , only to paste in
DestWks ,
Worksheet("1") , in Columns .
Thank you so much
|