Board logo

標題: [發問] (已解決)工作表名稱的方式 [打印本頁]

作者: freeffly    時間: 2011-3-22 13:00     標題: (已解決)工作表名稱的方式

本帖最後由 freeffly 於 2012-2-22 17:05 編輯

我想問一下如果我想讓vba代日期近去工作表名稱要如何設
如0321資料  0322資料
資料名不動可是前面的日期會依當天去改
作者: GBKEE    時間: 2011-3-22 14:26

回復 1# freeffly
Sheet1.Name = Format(Date, "mmdd")
作者: freeffly    時間: 2011-3-22 17:34

回復 2# GBKEE


    答案好像快出來了
     後面如果要再加其他字眼
    如"資料"或是"總表" 要用什麼方式?
作者: freeffly    時間: 2011-3-22 17:35

回復 2# GBKEE


    試出來了
      謝謝喔
作者: freeffly    時間: 2011-3-22 18:45

回復 2# GBKEE

   還有一個問題
  一般我如果增加以支的工作表名稱
   如下面
   sheets.add.name="0322資料"
    就可以直接選取
   sheets("0322資料")
   那下面這各方式要怎麼選取?

    Sheet1.Name = Format(Date, "mmdd")&"資料"
   用這種方是新增工作表不只一個
  請問有什麼方式嗎
作者: GBKEE    時間: 2011-3-22 19:41

回復 5# freeffly
Sheet1.Name = Format(Date, "mmdd")&"資料"   是指定工作表名稱
要新增工作表如下
  1. Sub Ex()
  2.     With Sheets.Add   '新增工作表
  3.         .Name = Format(Date, "mmdd") & "資料"
  4.     End With
  5. End Sub
複製代碼

作者: freeffly    時間: 2011-3-22 19:49

回復 6# GBKEE


    我的意思是對該新增的工作表作業
    大大的意思是要將作業的程式碼弄到with裡面嗎
作者: GBKEE    時間: 2011-3-22 20:01

回復 7# freeffly
sheets.add.name="0322資料"   語法錯誤
用 WITH  是便於處裡  WITH 物件的屬性, 方法.
Sub Ex()
    With Sheets.Add
        .Name = "0322資料"
        .Range("A1:C1") = Array(1, 2, 3)
        .Range("A1:C1").Select
     End With
End Sub
同上
Sub Ex()
    Sheets.Add
    ActiveSheet.Name = "0322資料"
    ActiveSheet.Range("A1:C1") = Array(1, 2, 3)
    ActiveSheet.Range("A1:C1").Select
End Sub
作者: freeffly    時間: 2011-3-22 20:23

回復 8# GBKEE


    了解
   謝謝
作者: diabo    時間: 2011-3-22 20:44

sheets.add.name="0322資料"

這程式碼是最短的「新增工作表並命名」,唯須先檢查「0322資料」工作表是否存在

語法有無錯誤,我不知道,但一直以來都這樣用...
作者: GBKEE    時間: 2011-3-22 20:55

回復 10# diabo
sheets.add.name="0322資料"   真的可以, 你給我上了一課 謝謝你.
vba 的語法 說明
建立新工作表、圖表或巨集工作表。該工作表將成為使用中工作表。
expression.Add(Before, After, Count, Type)
expression     必選。該運算或會傳回上述其中一個物件。
Before     選擇性的 Variant。在新工作表被新增之前指定工作表的物件。
After     選擇性的 Variant。在新工作表被新增之後指定工作表的物件。
Count     選擇性的 Variant。要新增的工作表數目。預設值為一。
Type     選擇性的 Variant。指定工作表類型。可為下列 XlSheetType 常數之一:xlWorksheet、xlChart、xlExcel4MacroSheet 或 xlExcel4IntlMacroSheet。如果您根據現存的範本插入工作表,請指定路徑給該範本。預設值為 xlWorksheet。
作者: chin15    時間: 2011-3-26 22:53

這個語法沒問題的
問題在於無法如樓上說的:資料名不動可是前面的日期會依當天去改




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)