請教 for Each ..... Next 用法
- 帖子
- 94
- 主題
- 10
- 精華
- 0
- 積分
- 114
- 點名
- 0
- 作業系統
- win 7
- 軟體版本
- office 2010
- 閱讀權限
- 20
- 性別
- 男
- 來自
- 桃園
- 註冊時間
- 2012-10-17
- 最後登錄
- 2014-1-3
|
有問題再發問吧!@@- Sub Macro1()
- [color=Red]On Error GoTo restart[/color]
- Dim mysheet As Worksheet
- For Each mysheet In Worksheets
- Application.DisplayAlerts = False
- mysheet.Delete
- Application.DisplayAlerts = True
- Next
- [color=Red]restart:[/color]
- End Sub
複製代碼 |
|
|
|
|
|
|
|
- 帖子
- 94
- 主題
- 10
- 精華
- 0
- 積分
- 114
- 點名
- 0
- 作業系統
- win 7
- 軟體版本
- office 2010
- 閱讀權限
- 20
- 性別
- 男
- 來自
- 桃園
- 註冊時間
- 2012-10-17
- 最後登錄
- 2014-1-3
|
回復 3# JOSH
COLO 這些事網頁不小心出現的 刪掉即可@@"
GB大大已回復您最好的答案@@ |
|
|
|
|
|
|
|