PTT數位生活區 / Office

[算表] excel錄製巨集，無法正常執行

看板Office作者 (@@)時間6年前 (2019/10/08 00:43), 編輯推噓0(0推 0噓 6→)
留言6則, 2人參與, 6年前最新討論串1/3 (看更多)
軟體:EXCEL 版本:2010 軟體:Excel 版本:2010 excel裡有83個工作表 第一個為目錄，在B1至B83設定超連結[開啟] 點選到會連到每個工作表 當初日期與數字格式沒有設定好 導致有些欄位混淆 希望透過重複執行巨集 修正每個工作表格式 使欄位有正確日期與數字格式 一直無法成功 想了解問題出在哪邊 ------------------------------- Sub 巨集1() For i = 1 To 10 ' ' 巨集1 巨集 ' ' Range("B3").Select Application.Goto Reference:="'2'!R1C1" Cells.Select Selection.NumberFormatLocal = "0.00_);[紅色](0.00)" Selection.NumberFormatLocal = "0.0_ ;[紅色]-0.0 " Columns("E:E").Select Selection.NumberFormatLocal = "yyyy/mm/dd" Range("E1").Select Selection.NumberFormatLocal = "0.0_);[紅色](0.0)" Sheets("目錄").Select Range("B4").Select Next End Sub ----------------------------------------------------------- -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.229.26.27 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1570466583.A.7AD.html
→
10/08 06:59, 6年前 , 1F
看巨集有迴圈，但goto方面都是到"2"的這個工作表
10/08 06:59, 1F
→
10/08 07:00, 6年前 , 2F
內文所寫無法成功是指除這個工作表外其他工作表都沒有修改
10/08 07:00, 2F
→
10/08 07:00, 6年前 , 3F
到的意思嗎？
10/08 07:00, 3F
→
10/08 07:02, 6年前 , 4F
如果是且工作表名稱為1-10的話，就改為 i & "!r1c1"方式
10/08 07:02, 4F
→
10/10 13:20, 6年前 , 5F
對，其他工作表都無法成功沒有修改
10/10 13:20, 5F
→
10/10 13:21, 6年前 , 6F
工作表名稱的確都是數字命名，我趕緊試看看，謝謝你
10/10 13:21, 6F
‣ 更多 quirrky 的文章
文章代碼(AID): #1TcsiNUj (Office)
Office 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
11
22
[情報] iOS 26.4 RC
[ iOS ]
hn9480412
11小時前, 03/19
更多 即時熱門文章 >>
‣ 更多 quirrky 的文章
文章代碼(AID): #1TcsiNUj (Office)