Excel planilha vba cria planilha formato dia e hora

Sáb, 29 de Janeiro de 2011 09:21 Expedito Marcondes
Imprimir

Saberexcel - site das macros


Essa macro do Aplicativo Microsoft Excel VBA, verifica se existe uma planilha com o começo do  do nome desejado, se existir emite uma mensagem se deseja ou não deletar, caso sim ou não,caso  exista uma planilha com o nome Pagamento_2011_hora_min_seg, cria uma nova planilha com o nome determinado mais a formatação de nome(Pagamento_dia_mes_ano_hora_min_seg)
contará as 14 primeiras letras  do nome da planilha ativa, se exitir deleta
 Sub Nome_Planilha_data_hora_min_seg()
'essa linha de código é para impedir a mensagem do sistema "deseja excluir..."
'Application.DisplayAlerts = False
If Left(LCase(ActiveSheet.Name), 14) = "pagamento_2011" Then
   MsgBox "existe uma planilha que começa com 'pagamento_2011'", vbCritical, "Saberexcel - site das macros"
  
ActiveSheet.Delete
   End If
 
'Criar uma nova planilha
    Sheets.Add After:=ActiveSheet
 
'Renomear a planilha ativa como data e hora minutos e segundos
    ActiveSheet.Name = "pagamento_" _
               & Format(Now, "yyyy-dd-mmm-hhmms")
  Range("A1").Value = "Data"
  Range("B1").Value = "Nome"
  Range("C1").Value = "Endereço"
  Range("D1").Value = "Cidade"
  Range("E1").Value = "Bairro"
  Range("G1").Value = "Alterado para estudos por Excel VBA Estudos Escola"
  Range("G2").Value = "se for criar outra planilha e nome da plan ativa for igual a
'pagamento_2011...'emite mensagem deleção"
  Range("G3").Value = "Planilha exemplo retirada do DVD - 14.000 Planilhas Microsoft Excel VBA - Saberexcel"
 ' Application.DisplayAlerts = True
End Sub




Aprenda tudo sobre o pAplicativo Microsoft Excel VBA (Visual Basic Application),
sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel



 Baixe o exemplo de planilha contendo a macro acima
vba worksheets cria planilha formato dia e hora (17.76 kB)
Tags:
Última atualização em Sex, 26 de Agosto de 2011 09:10