返回列表 上一主題 發帖

[發問] 如何在每當剪下一行時另一行會自動補上?

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
1# 跳轉到 »
發表於 2011-7-1 17:12 | 顯示全部帖子
拒絕vba會讓自己綁手綁腳
PP.gif

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
2#
發表於 2011-7-2 09:47 | 顯示全部帖子
用工作表activate事件
在你剪下儲存格貼到其他工作表後，回到表一時就會刪除空白格
如圖設置

TOP

oobird
　頭銜: 街友一族

超級版主Rank: 8Rank: 8

帖子
1572 
主題
16 
精華
2 
積分
1521 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
150 
性別
男 
註冊時間
2010-5-1 
最後登錄
2016-1-13 

論壇貢獻勳章
3#
發表於 2011-7-2 12:48 | 顯示全部帖子
SpecialCells(4).Delete(2) = SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp
excel幫助中並沒有數字代表的參數及相關說明或索引，只能在逐步執行時滑鼠放在參數中看顯示的數字，如放在xlCellTypeBlanks中會顯示4，自己記下來。如能記住參數倒不建議背數字。我個人不會認豆芽字，覺得背數字比背豆芽容易才會去背的！

TOP

        靜思自在 : 要用心，不要操心、煩心。
返回列表 上一主題