Boa tarde , tudo bem?
preciso de uma ajuda de vocês, estou apreendendo um pouco de VBA e estou com uma dificuldade numa expressão quando eu coloco a data retirada e depois colocoa data devolução, ele mostra a qtde de diárias e me mostra no campo "tipo" a mensagem "VIAGEM"
quando for < que 14 dias e se for > mostra " COLABORADOR NOVO"
ele faz e visualiza normal a quantidade das diárias e a mensagem "VIAGEM" ou "Colaborador Novo", mas quando salvo o registro ele mostra erro de depuração na linha "<14".
Private Sub txtdiarias_Change()
Dim tipo As String
tipo = txtdiarias.Value
If tipo < 14 Then
txttipo = "VIAGEM"
End If
If tipo > 15 Then
txttipo = "COLABORADOR NOVO"
End If
End Sub
onde estou errando?
Abs,
Kpastre