Início
Planilheiro 10/10/2018, 14:55Olá a todos,
Tenho um formulário que registra o tempo de estudo em uma tabela no Excel, porém, de vez em quando, ao clicar para registrar o tempo que se passou, o código retorna o seguinte erro:
"Erro em tempo de execução 1004"
"Não é possível definir a propriedade NumberFormat da classe Range
A parte do código que fica em destaque é essa
.Range("E" & LastRow).NumberFormat = "[hh]:mm;@"
Como posso resolver esse problema?
Tenho um formulário que registra o tempo de estudo em uma tabela no Excel, porém, de vez em quando, ao clicar para registrar o tempo que se passou, o código retorna o seguinte erro:
"Erro em tempo de execução 1004"
"Não é possível definir a propriedade NumberFormat da classe Range
A parte do código que fica em destaque é essa
.Range("E" & LastRow).NumberFormat = "[hh]:mm;@"
Como posso resolver esse problema?
- Código:
Private Sub btn_TimeStamp_Click()
Application.ScreenUpdating = False
Dim TempoEstudado As Variant
Dim PlanilhaHoras As Worksheet
Dim LastRow As Long
Dim Rng As Range
Set PlanilhaHoras = ThisWorkbook.Sheets("Horas")
Set Rng = Sheets("Horas").Cells
LastRow = Last(1, Rng) + 1
If Me.ComboBox1.Text = ("< Selecione uma matéria >") Then
MsgBox "Antes de gravar as horas estudadas, você precisa selecionar uma matéria", vbInformation, "Aviso"
Me.ComboBox1.SetFocus
ElseIf Me.txt_assunto = ("< Digite um assunto >") Then
MsgBox "Você precisa digitar um assunto", vbInformation, "Aviso"
Me.txt_assunto.SetFocus
Else
With PlanilhaHoras
.Range("E" & LastRow).NumberFormat = "[hh]:mm;@"
End With
