Talvez isso possa te ajudar... http://www.minhasplanilhas.com.br/procv-com-imagem-no-excel/

=SE(C2<>"ok";C2 & " - ";"") & SE(C3<>"ok";C3 & " - ";"") & SE(...

Olá colega jmcneto veja se isso ajuda... abrç!

dá pra fazer com fórmula assim: =ESQUERDA(A1;21)&"00"&DIREITA(A1;1)

Bem , eu uso o 2013. a opção está destacado no quadro vermelho...

Na verdade é bem simples que a camera. 1- Primeiro você seleciona e copia normalmente todas as células que deseja jogar na frente da imagem. 2- Depo...

Colega carlosrgs boa tarde! Será que isso ajuda?

Tenta isso: Private Sub Salvar_Click() intLinha = ThisWorkbook.Worksheets("Fornecedor").Range("A5000").End(xlUp)&...

Bacana! Não se esqueça de clicar no joinha e marcar o tópico como Resolvido. Abrç!

Colega dasaiev, seria possivel anexar uma cópia da sua planilha para gente verificar? Pois dessa forma poderiamos usar o depurador e ir direto no erro...

repare nessa parte do seu código que: LinhaFinal = Plan1.Cells(Rows.Count, 1).End(x1Up).Row ao invés de .End(xlup) está .End(...

Tente isso : Mude linha = Sheets("BASE").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).Row para: linha = ...

Talvez poderia ser resolvido com: On Error Resume Next, mas não dá pra saber seu ver seu cógido completo. Abrç!

Blz! Não se esqueça de clicar no joinha e marcar seu post como resolvido! Abrç!

Mude no seu código a seguinte linha de: Dim LData as Integer Para: Dim LData as Date Uma breve explicação... Integer = declara números inteiros Date =...