...()     '判斷是否已複製     If Sheets ( Sheets .Count).Name = Format(Date, "yyyymmdd...
分類:電腦與網際網路 > 程式設計 2006年11月05日
For i = 1 To 12 Sheets (" Sheet " & i).Select '...i = 0 To UBound(SheetList) Sheets (SheetList(i)).Select '這裡做...
分類:電腦與網際網路 > 程式設計 2011年08月03日
你要將 Cells(i, 2) = Sheets (i).Name 改成 Cells(1+ i, 2) = Sheets (i).Name 就...
分類:電腦與網際網路 > 程式設計 2009年09月07日
....ScreenUpdating = False Set S1 = Sheets ("結果表") S1.Cells.Clear For Each...
分類:電腦與網際網路 > 程式設計 2013年08月07日
caption只是顯示的文字,有可能重複,你要記錄的話 可以改用名稱,名稱才有獨一性! 而 由名稱去控制物件 要這樣: data(1)="CB_51" Sheet1.Shapes(data(1)).Visible = False
分類:電腦與網際網路 > 程式設計 2012年12月18日
...039;開舊檔 xlSheet1 = xlApp1.ActiveWorkbook. Sheets (2) '選擇第2個工作表單 ' xlSheet1.Cells()....
分類:電腦與網際網路 > 程式設計 2014年12月14日
Sub mysheetrename() Dim mysheetname As Variant Dim myMsg As String, myTitle As String myMsg = "請輸入名稱" myTitle = "Data base" mysheetname...
分類:電腦與網際網路 > 程式設計 2007年09月28日
...這一系列文章要說明的玩意兒啦! CSS是「Cascading Style Sheets 」的縮寫,Cascading是串接、連接之意;Style則是風格、款式之意...
分類:電腦與網際網路 > 程式設計 2005年05月03日
http://www.FunP.Net/869140 :P ~ 什 麼 都 不 會 ~ 來 亂 的 ~ 快 跑 ~ 2012-07-23 07:52:48 補充: http://www.FunP.Net/869140 :P ~ 什 麼 都 不 會 ~ 來 亂 的 ~ 快 跑 ~
分類:電腦與網際網路 > 程式設計 2012年07月23日