抓取最後30筆欄位的資料 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 抓取最後30筆欄位的資料

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

抓取最後30筆欄位的資料

中學生 Rank: 2

帖子: 227
主題: 3
精華: 1
積分: 273
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
性別: 女
註冊時間: 2011-3-22
最後登錄: 2013-1-29

1^# 跳轉到 »

發表於 2011-5-10 21:34 | 顯示全部帖子

data有90欄位12列
就這樣？
能否透露一下在什麼位置？
你不說很不好猜的

中學生 Rank: 2

帖子: 227
主題: 3
精華: 1
積分: 273
點名: 0
作業系統: XP
軟體版本: XP
閱讀權限: 20
性別: 女
註冊時間: 2011-3-22
最後登錄: 2013-1-29

2^#

發表於 2011-5-10 22:14 | 顯示全部帖子

Sub copy30()
With Sheets("1")
n = .[iv1].End(1).Column - 29
.Cells(1, n).Resize(12, 30).Copy Sheets("sheet1").[a8]
End With
End Sub

靜思自在 : 要批評別人時，先想想自己是否完美無缺。

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