Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Pesquisa resultou em 1537 ocorrências

por Reinaldo
Sáb Jan 24, 2015 12:01 pm
Fórum: Geral
Tópico: Equação Trigonométrica em VBA
Respostas: 5
Exibições: 3177

Re: Equação Trigonométrica em VBA

Até onde sei a função Acos não é nativa no VBA, então deve ser "chamada" utilizando application.worksheetfunction.
Tambem no seu primeiro exemplo 1-2*h estava entre parenteses, no ultimo não, isso afetara o resultado, veja no anexo as duas situações
por Reinaldo
Sex Jan 23, 2015 10:50 pm
Fórum: Geral
Tópico: Equação Trigonométrica em VBA
Respostas: 5
Exibições: 3177

Re: Equação Trigonométrica em VBA

Experimente

Código: Selecionar todos

Sub cc()
Dim x As Single, h As Single, d As Single
h = 2
d = 8
x = 2 * Application.WorksheetFunction.Acos(CDec(((1 - 2 * h) / d)))
MsgBox x
End Sub
por Reinaldo
Qua Jan 21, 2015 9:45 am
Fórum: VBA Básico
Tópico: Problema Fechar Excel apos abri UserForm
Respostas: 8
Exibições: 8957

Re: Problema Fechar Excel apos abri UserForm

Acredito que o problema seja na rotina agregada ao Botão (Custon Control) Sair. Altere conforme abaixo e teste: Private Sub Sair(control As IRibbonControl) Application.ScreenUpdating = False Application.DisplayAlerts = False Sheets("CAPA").Activate Application.Quit End Sub Postagem similar...
por Reinaldo
Ter Jan 20, 2015 2:57 pm
Fórum: VBA Básico
Tópico: Inserir Dados com Data!
Respostas: 18
Exibições: 10292

Re: Inserir Dados com Data!

Teste/experimente, e veja se atende (alteração somente no formulário expedição)
por Reinaldo
Seg Jan 19, 2015 2:23 pm
Fórum: VBA Básico
Tópico: Impressão automatica via VBA (Resolvido)
Respostas: 6
Exibições: 7603

Re: Impressão automatica via VBA (Resolvido)

Como disse (ou escrevi), a rotina está acima, porem precisa adaptar a sua realidade. Como está dito em uma de suas imagens, não é difícil, mas tem que ser adaptada a sua realidade. Você também não mencionou se experimentou/tentou utilizar, então continuemos no eu acho Eu acho que assim: Application....
por Reinaldo
Sex Jan 16, 2015 11:39 am
Fórum: Geral
Tópico: Dúvida na Função
Respostas: 2
Exibições: 2721

Re: Dúvida na Função

Do help VBA/Excel "Marca uma função definida pelo usuário como volátil. Uma função volátil precisa ser recalculada sempre que ocorrem cálculos em qualquer célula da planilha . Um função não volátil só é recalculada quando as variáveis de entrada são alteradas. Este método não tem efeito quando ...
por Reinaldo
Qui Jan 15, 2015 8:29 pm
Fórum: VBA Básico
Tópico: Impressão automatica via VBA (Resolvido)
Respostas: 6
Exibições: 7603

Re: Impressão automatica via VBA (Resolvido)

Seria algo +/- assim, mas sem ver sua planilha voce precisará adaptar Sub imprimir() Dim lRow As Long, lLop As Long Application.ScreenUpdating = False 'Determina quantos registros na coluna A, para impressão lRow = Sheets("Plan1").Cells(Cells.Rows.Count, "A").End(xlUp).Row 'Alter...
por Reinaldo
Qua Jan 14, 2015 1:51 pm
Fórum: VBA Básico
Tópico: Formatar data com application.inputbox [RESOLVIDO]
Respostas: 2
Exibições: 3410

Re: Formatar data com application.inputbox

A variavel nData está definida como range, então não aceitará o formato data. Altere para Dim nData as Date e teste
por Reinaldo
Qua Jan 14, 2015 8:37 am
Fórum: VBA Básico
Tópico: Botão não obedece comando
Respostas: 2
Exibições: 2449

Re: Botão não obedece comando

Não há erro nessa rotina, o que pode ocorrer é Ao cadastrar o novo "cliente", se não for preenchido os dados da coluna 4 - Cargo, ao utilizar os botões de navegação para "passar" entre os registros, é questionado pela rotina se a celula está preenchida --> If Not IsEmpty(.Cells(i...
por Reinaldo
Seg Jan 12, 2015 2:13 pm
Fórum: Geral
Tópico: Formulário Busca RESOLVIDO
Respostas: 2
Exibições: 2089

Re: Formulário Busca

Veja se auxilia: Variavel Linha "transferida" para publica --> Public Total_Ocorrencias As Long, Linha As Long Na rotina de procura adicionado linha para definição do valor da variável linha se houver --> If SpinButton1.Enabled Then Linha = MatrizResultados(SpinButton1.Value) Rotina para g...