Veja se seria isto, no anexo estão os dois tipos, na V2 a coluna "G" Notas s celulas estão bloqueadas, então se for ter de digitar nela, des...

Precisa ser com VBA, não pode ser por Formula ? =TEXTO(A1;"0000") ou =REPT(0;4-NÚM.CARACT(A1))&A1 ou pode formatar a celula com o tipo...

Só ajustando a rotina do leonardo e do Marcelo, sem precisar do "On Error" : Sub InverteNumTexto() Dim linha As Long Dim ulinha As...

jmcneto Você deve ter alterado alguma coisa, pois não tem nenhum problema de referência circular na planilha enviada. Quanto ao problema de placas r...

A rotina disponibilizada, apena lê o arquivo, sem importa-lo para planilha. Para ler, eliminando o valor desejado experimente Public Sub LeArquivoTex...

jmcneto Uni os teus 2 tópicos sobre o mesmo assunto. Quando tiver qualquer dúvida sobre procedimentos do fórum, mande uma MP para mim. Se você tive...

Vonzuben Você não esta interpretando corretamente a parte de pontuação do fórum. Por exemplo o Trindade te ajudou, portanto, ele merece o ponto. (Nã...

Boa tarde bdemeo, Segue minha contribuição com a 2. Option Explicit Public Function Comissao(ByVal Valor As Currency) As Currency Dim Final A...

Só pela definição do jeito que está fazendo é um pouco vago, deveria colocar a rotina completa que utiliza, não sei se está enviando a imagem do formu...

Não vou poder responder agora, mas já vou adiantando, isso não é uma anomalia, isso é um recurso do Excel, e a pessoa que monta a planilha pode optar ...

Cara, vou falar o que entendi. A planilha "PLANILHA OFICIAL MÓVEIS" será alimentada e você quer exportar as informações no layout da planil...

Bom que atendeu, vamos tentar entender a sistematica "Atraso". Como e considerado a tolerancia? 10 minutos o turno, ou 10 na entrada + 10 Sa...

Cara, agora estou no pc. Vou ver o seu caso e te dou um retorno.

Eu passei algumas horas ontem, tentando... não consegui. Que fique claro, não estou dizendo que não tem como, eu só não consegui chegar na fórmula ain...

Bom dia, Veja se atende: Sub Limpar() If Range("I4").Value < 0 Then OutPut = MsgBox("Seu saldo é insuficiente !&q...