在列中显示行值

在Excel中，上午试图显示C1中的A1单元格值和C2中的B1单元格值，反之亦然。 不知道如何做到这一点。 有没有办法在VBA中做到这一点？ 请帮忙！

Answer 1

尝试下面的代码

Public Sub program() Dim i As Long Dim j As Long i = 1 j = 1 Do While Cells(i, "A").Value <> "" Cells(j, "C").Value = Cells(i, "A").Value j = j + 1 Cells(j, "C").Value = Cells(i, "B").Value i = i + 1 j = j + 1 Loop End Sub 

Answer 2

用公式： =IF(MOD(ROW();2)=1;INDEX(A:B;(1+ROW())/2;1);INDEX(A:B;ROW()/2;2)) 。 只要把它放在C1然后拖动它。

Answer 3

复制并粘贴特殊 – 粘贴到单元格C1中，勾选转置框

快捷键：Ctrl + C（一起）然后Alt，E，S，E（连续）