關於複製資料, "略過空格" - 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

靜思自在 : 【時間無法遮擋】怕時間消逝，花了許多心血，想盡各式方法要遮擋時間，結果是：浪費了更多時間，且一無所成！