Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Pesquisa resultou em 1559 ocorrências

por Mauro Coutinho
Ter Mai 16, 2017 2:01 pm
Fórum: Dicas
Tópico: Log com as Alterações nas Planilhas v 2003 - v 2007
Respostas: 39
Exibições: 38570

Re: Log com as Alterações nas Planilhas v 2003 - v 2007

Tem este modelo em excel 2003, veja se consegue adaptar.

Log Alteração na Aba
LogAlteracaonaAba.rar
(17.35 KiB) Baixado 296 vezes
[]s
por Mauro Coutinho
Sáb Dez 10, 2016 12:00 am
Fórum: VBA Básico
Tópico: Variavél Não definida
Respostas: 8
Exibições: 2847

Re: Variavél Não definida

Joocta, postei uma resposta no forum abaixo, veja se é isto. Procure sempre indicar os forum em que postou a mesma duvida e se foi resolvido informe em todos a solução aplicada, assim não ficam com tópicos em aberto pensando que ainda não foi solucionado. http://www.planilhando.com.br/forum/viewtopi...
por Mauro Coutinho
Qui Out 06, 2016 2:11 pm
Fórum: VBA Básico
Tópico: Colocar numeração da coluna A em sequecia
Respostas: 2
Exibições: 972

Re: Colocar numeração da coluna A em sequecia

Azevedo, podemos fazer de várias formas, e dependendo de sua aplicação só com formula : Como diz que a numeração inicia a partir da 3ª linha, você pode usar a formula : Em A3 coloque : =LIN()-2 o resultado será 1, arraste a formula até a celula desejada e pronto, mesmo que exclua linhas a numeração ...
por Mauro Coutinho
Qua Out 05, 2016 9:55 pm
Fórum: VBA Básico
Tópico: Procurar valor negativo!
Respostas: 2
Exibições: 1032

Re: Procurar valor negativo!

Veja se é isto, só ajuste a Coluna a verificar : Sub Find_Negativos() Dim sRg As Range Dim sValor Dim sUltLin As Long sUltLin = Sheets("Plan1").Range("A" & Rows.Count).End(xlUp).Row Set sRg = Range("A2" & ":" & "A" & sUltLin) For Each x In sRg If x < 0 Then MsgBox "O Valor :- " & x & " é Negativo" E...
por Mauro Coutinho
Qua Out 05, 2016 9:36 pm
Fórum: VBA Básico
Tópico: Passar dados do Listview para textbox sem clicar
Respostas: 1
Exibições: 832

Re: Passar dados do Listview para textbox sem clicar

Veja se o tópico abaixo ajuda :

Listview - Comando por teclas [RESOLVIDO]
viewtopic.php?f=6&t=866&hilit=listview1+teclado

[]s
por Mauro Coutinho
Seg Out 03, 2016 4:23 pm
Fórum: VBA Básico
Tópico: .Find encontrando somente números inteiros
Respostas: 2
Exibições: 951

Re: .Find encontrando somente números inteiros

Nesta situação para o VBA reconhecer um numero decimal ele tem de estar com ponto e não virgula :

troque "9,5*" por "9.5*"

[]s
por Mauro Coutinho
Qui Set 29, 2016 9:53 am
Fórum: VBA Básico
Tópico: Contar dados por semanas e simultaneamente por outras opções
Respostas: 2
Exibições: 988

Re: Contar dados por semanas e simultaneamente por outras opções

DSilva, se entendi corretamente, acredito que de para se fazer com formulas ou tabela dinâmica sem precisar de macros.
Mas para uma analise melhor o ideal é anexar um modelo com dados fictícios com a relação da forma que está e uma com os resultados que espera, assim ficará mais fácil ajudar.

[]s
por Mauro Coutinho
Ter Set 27, 2016 6:50 pm
Fórum: VBA Básico
Tópico: Converter Letras
Respostas: 4
Exibições: 1442

Re: Converter Letras

Luciano, em primeiro lugar enviei a Primeira advertência a sua pessoa por infringir as Regras do Forum, mais exepcificamente no item : 1.2 Não é permitido ofender, provocar, ameaçar ou ironizar nenhum participante e é estritamente proibido qualquer tipo de discussão pessoal . Também não é permitida ...
por Mauro Coutinho
Dom Set 25, 2016 12:34 pm
Fórum: VBA Básico
Tópico: Comando de decisão
Respostas: 1
Exibições: 841

Re: Comando de decisão

Está bem vago sua solicitação, faltam mais detalhes, tipo os nomes corretos dos controles e o que temos em " ...assim por diante ". Desta forma segue uma rotina básica com os nomes padrões dos controles e só om duas condições, veja se consegue ajustar ao que pretende : Private Sub ListBox1_Click() I...
por Mauro Coutinho
Sex Set 23, 2016 1:45 pm
Fórum: VBA Básico
Tópico: Ajuda com For Each
Respostas: 1
Exibições: 805

Re: Ajuda com For Each

A sua rotina já retorna os valores para a Sheets("Espelho"), agora se quer uma terceira aba e como não citou para quais ranges, estou supondo que irá retornar para uma coluna somente, se for isto utilize a rotina abaixo. Sub Find_Matches_Mauro() Dim CompareRange As Variant, x As Variant, y As Varian...