註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Excel程式區
» 求選取整欄並刪除的方式
返回列表
下一主題
上一主題
發帖
[發問]
求選取整欄並刪除的方式
momowu
發短消息
加為好友
momowu
當前離線
UID
643
帖子
37
主題
10
精華
0
積分
176
金錢
176
點名
0
作業系統
windows 7
軟體版本
office 2007
閱讀權限
20
性別
男
在線時間
60 小時
註冊時間
2010-6-22
最後登錄
2014-1-16
中學生
帖子
37
主題
10
精華
0
積分
176
點名
0
作業系統
windows 7
軟體版本
office 2007
閱讀權限
20
性別
男
註冊時間
2010-6-22
最後登錄
2014-1-16
1
#
跳轉到
»
倒序看帖
打印
字體大小:
t
T
發表於 2010-7-27 17:51
|
只看該作者
[發問]
求選取整欄並刪除的方式
hi dear all
以下我寫了個小
巨集
lastcolumn
目的是sheet2的a1輸入數值後
複製
至
sheet1最後沒有資料的一欄(e1),執行OK
因為資料來源會創造出F欄,
所以需要有第二個小巨集是要刪除sheet1有資料的倒數第二欄"整欄"(e欄)
下載
(17.02 KB)
2010-7-27 17:47
下載
(11.76 KB)
2010-7-27 17:47
因為目前VBA僅能找到最後一欄的那一個cell但無法是整欄,
請問有其他辦法可以選取整欄並刪除嗎
謝謝~
ps.此為第一個小巨集
Sub lastcolumn()
Sheets("Sheet2").Activate
Sheets("Sheet2").Select
Range("a1").Copy
With Sheets("Sheet1")
.Paste .Range("a1").End(xlToRight).Offset(0, 1)
End With
End Sub
樓主熱帖
if條件式可否改變顏色呢?
圖表製作日期部分與座標對齊的問題
excel可否自動判斷加總月資料
excel是否可以輸入代碼或文字後,自動帶出後
不同sheet間欄位的轉換
收尋儲存格的問題
請問不同分頁,可否在新分頁輸入而改變其他分
儲存格間的挑選,是否有特定指令,範例如下
選取整列的問題
收藏
分享
jackdream
發短消息
加為好友
jackdream
(Jack)
當前離線
UID
12
帖子
133
主題
9
精華
0
積分
147
金錢
147
點名
0
作業系統
Win10
軟體版本
Office 2010
閱讀權限
20
性別
男
來自
高雄
在線時間
183 小時
註冊時間
2010-5-1
最後登錄
2024-11-11
暱稱:
Jack
中學生
帖子
133
主題
9
精華
0
積分
147
點名
0
作業系統
Win10
軟體版本
Office 2010
閱讀權限
20
性別
男
來自
高雄
註冊時間
2010-5-1
最後登錄
2024-11-11
2
#
發表於 2010-7-27 18:42
|
只看該作者
像這樣嗎?
'刪除倒數第二欄
Columns([IV1].End(xlToLeft).Column - 1).EntireColumn.Delete
TOP
momowu
發短消息
加為好友
momowu
當前離線
UID
643
帖子
37
主題
10
精華
0
積分
176
金錢
176
點名
0
作業系統
windows 7
軟體版本
office 2007
閱讀權限
20
性別
男
在線時間
60 小時
註冊時間
2010-6-22
最後登錄
2014-1-16
中學生
帖子
37
主題
10
精華
0
積分
176
點名
0
作業系統
windows 7
軟體版本
office 2007
閱讀權限
20
性別
男
註冊時間
2010-6-22
最後登錄
2014-1-16
3
#
發表於 2010-7-27 20:08
|
只看該作者
沒錯就這樣測試OK
jackdream大大
又受到你的幫助
感謝再感謝!!
這書本上會教嗎,我怎麼一直查不到....
TOP
jackdream
發短消息
加為好友
jackdream
(Jack)
當前離線
UID
12
帖子
133
主題
9
精華
0
積分
147
金錢
147
點名
0
作業系統
Win10
軟體版本
Office 2010
閱讀權限
20
性別
男
來自
高雄
在線時間
183 小時
註冊時間
2010-5-1
最後登錄
2024-11-11
暱稱:
Jack
中學生
帖子
133
主題
9
精華
0
積分
147
點名
0
作業系統
Win10
軟體版本
Office 2010
閱讀權限
20
性別
男
來自
高雄
註冊時間
2010-5-1
最後登錄
2024-11-11
4
#
發表於 2010-7-27 20:34
|
只看該作者
本帖最後由 Hsieh 於 2010-7-27 22:25 編輯
這書本上會教嗎,我怎麼一直查不到....
momowu 發表於 2010-7-27 20:08
在 VBA 的編輯畫面,按下 F1 會有很多相關說明文件
TOP
momowu
發短消息
加為好友
momowu
當前離線
UID
643
帖子
37
主題
10
精華
0
積分
176
金錢
176
點名
0
作業系統
windows 7
軟體版本
office 2007
閱讀權限
20
性別
男
在線時間
60 小時
註冊時間
2010-6-22
最後登錄
2014-1-16
中學生
帖子
37
主題
10
精華
0
積分
176
點名
0
作業系統
windows 7
軟體版本
office 2007
閱讀權限
20
性別
男
註冊時間
2010-6-22
最後登錄
2014-1-16
5
#
發表於 2010-7-27 20:55
|
只看該作者
了解,感謝了,畢竟懂了要用比較方便
TOP
靜思自在 :
站在半路,比走到目標更辛苦。
返回列表
下一主題
上一主題
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 ‧ 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲