加入 CodeStore VBA 模組

2026-08-18 00:39:40 +08:00
1 parent 9c5364f88e
commit 0e638bdd15
@@ -0,0 +1,7 @@
+Attribute VB_Name = "ThisWorkbook"
+Private Sub Workbook_Open()
+' 自動執行
+    Call XLS_init
+    Application.Caption = PYEAR & Worksheets("售價").Cells(3, 1)
+End Sub
+