Saberexcel - o site das macros
Esta macro do Aplicativo Microsoft Excel VBA, pergunta se voce deseja ou não inserir uma planilha
personalizada com o nome formatado com data e hora atual
Sub Adicionar_planilha_com_dia_hora()
Dim Resposta As VbMsgBoxResult
Dim sht As Worksheet
Resposta = MsgBox("Deseja inserir nova planilha com o nome da data e hora atual?" _
, vbQuestion + vbYesNoCancel)
If Resposta = vbYes Then
Set sht = Worksheets.Add
sht.Name = Format(Now, "ddd-dd-mmm-yyyy_hhmmss")
ElseIf Resposta = vbNo Then
Worksheets.Add
Else
Exit Sub
End If
MsgBox "Planilha inserida com sucessso!! [ " & ActiveSheet.Name & "]", vbInformation, "http://www.saberexcel.com"
End Sub
Aplicativo Microsoft Excel VBA --(SaberExcel)--
Baixe o exemplo de planilha com a macro acima
vba horas adiciona nova planilha com nome formato dia horas (15.31 kB 2010-11-21 17:41:50)