如何在excel中使用vba添加既有指定名称又有日期戳的选项卡

如何在excel中使用vba添加既有指定名称又有日期戳的选项卡,vba,tabs,renaming,datestamp,Vba,Tabs,Renaming,Datestamp,我看到了如何为带有日期戳的宏添加选项卡,但我还没有弄清楚如何向其添加标签。例如,我希望能够创建一个标签,上面写着2016年12月的日志或2016年12月的日志 Option Explicit Sub addsheet() Sheets.Add ActiveSheet.Name = "Insert Name" End Sub 您是否需要在日期/名称等方面进行自我分配?将此作为起始基础 Option Explicit Sub addsheet() Sheets.Add ActiveSheet

我看到了如何为带有日期戳的宏添加选项卡,但我还没有弄清楚如何向其添加标签。例如,我希望能够创建一个标签,上面写着2016年12月的日志或2016年12月的日志

Option Explicit
Sub addsheet()

Sheets.Add
ActiveSheet.Name = "Insert Name"

End Sub

您是否需要在日期/名称等方面进行自我分配?

将此作为起始基础

Option Explicit
Sub addsheet()

Sheets.Add
ActiveSheet.Name = "Insert Name"

End Sub
您是否需要根据日期/名称等进行自我分配?

试试这个, 这将添加工作表并用日期日志命名。我已经输入了更多关于日期的信息,因为在同一个月内制作一张新的工作表可能会导致与工作表同名的冲突

sName = "My Sheet"
With ThisWorkbook
   .Sheets.Add(After:=.Sheets(.Sheets.Count)).Name = _
       sName & " " & Format(Now(), "mmm-yyyy hh-mm-ss")
End With
您可以更改格式以满足您的需要。如果您不需要小时、分钟和秒,只需将其从格式代码中删除即可。

试试这个, 这将添加工作表并用日期日志命名。我已经输入了更多关于日期的信息,因为在同一个月内制作一张新的工作表可能会导致与工作表同名的冲突

sName = "My Sheet"
With ThisWorkbook
   .Sheets.Add(After:=.Sheets(.Sheets.Count)).Name = _
       sName & " " & Format(Now(), "mmm-yyyy hh-mm-ss")
End With

您可以更改格式以满足您的需要。如果您不需要小时、分钟和秒,只需从格式代码中删除即可。

这有帮助吗?这有帮助吗??