VBA刪除固定列數 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » VBA刪除固定列數

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

VBA刪除固定列數

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

1^# 跳轉到 »

發表於 2013-10-31 09:36 | 顯示全部帖子

刪除固定列，
1~16列
59~74列
117~132列
.
.
.
資料前面16列要刪除，58列為一個區間，請問VBA如何寫
samwang 發表於 2013-10-31 08:54

Sub Ex()
With Sheets(1)
.Range("A117:A132").EntireRow.Delete
.Range("A59:A74").EntireRow.Delete
.Range("A1:A16").EntireRow.Delete
End With
End Sub

複製代碼

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

2^#

發表於 2013-10-31 10:16 | 顯示全部帖子

回復 3# samwang
先說說你對此案的處理方案！

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

3^#

發表於 2013-10-31 12:56 | 顯示全部帖子

回復 c_c_lai

我從我們的server download 資料，資料會有上千筆，但是前面的16列是沒有用的，接著 ...
samwang 發表於 2013-10-31 11:06

你的意思是說，在每一次從 server download 資料，資料會有上千筆，但是前面的16列是固定沒有用的，接著42列 (17 ~ 58) 是有用的？
如此不停地以此原則固定去處理 download 的資料錄？

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

4^#

發表於 2013-10-31 20:19 | 顯示全部帖子

回復 c_c_lai
是的，只能手動逐一刪除資料
samwang 發表於 2013-10-31 15:57

只要將以下程式碼套入到你的程式內就 OK 了！

With Sheets(1)
' 由最底逐步往上刪除 Rows 便不會亂掉了！
.Range("A117:A132").EntireRow.Delete
.Range("A59:A74").EntireRow.Delete
.Range("A1:A16").EntireRow.Delete
End With

複製代碼

靜思自在 : 人生最大的成就是從失敗中站起來。

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