VBA Excel：如何将单元格区域分配给另一个单元格区域？

Question

New Excel VBA user here. I feel like I made a silly syntax mistake.

I am trying to copy some vertical cells in one worksheet, to horizontal cells in another worksheet.

Worksheets("Master").Range("D14:F14").Value = Worksheets("Temp").Range("B12:B14").Value

However, the above command seems to only paste the value of B12 to cells D14:F14. Is there a way to paste the cells of B12, B13, and B14 to D14:F14?

Answer 1

Use Application.Transpose() :

Worksheets("Master").Range("D14:F14").Value = Application.Transpose(Worksheets("Temp").Range("B12:B14").Value)

Or PasteSpecial :

Worksheets("Temp").Range("B12:B14").Copy
Worksheets("Master").Range("D14").PasteSpecial xlPasteAll, , , True

If you only want values then the first is best. When transposing with PasteSpecial one must use the xlPasteAll . It will throw an error if one tries to paste values only with transpose as true.