關於複製資料, "略過空格" - Excelㄧ般區 - 麻辣家族討論版版

麻辣家族討論版版 » Excelㄧ般區 » 關於複製資料, "略過空格"

返回列表下一主題上一主題發帖

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

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

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

靜思自在 : 太陽光大、父母恩大、君子量大，小人氣大。

返回列表下一主題上一主題