關於複製資料, "略過空格" - Excelㄧ般區

[發問] 關於複製資料, "略過空格"

11^# 跳轉到 »

發表於 2015-12-19 10:46 | 只看該作者

試試VBA，只要Ａ表及Ｂ表即可：

Sub TEST()
Dim xR As Range, N&
For Each xR In [D3:G6]
　　N = N + 1
　　If xR <> "" Then [J3:M6].Item(N) = xR
Next
End Sub

靜思自在 : 人的眼睛長在前面，只看到別人的缺點，絲毫看不到自己的缺點。