Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Pesquisa resultou em 101 ocorrências
- Qui Fev 23, 2012 10:22 pm
- Fórum: VBA Básico
- Tópico: Dúvida em VBA
- Respostas: 1
- Exibições: 1847
Re: Dúvida em VBA
Boa noite, Veja se este código atende: Sub simula() For i = 1 To 40 FileCopy "D:\usuarios\Daniel\Teste\" & i & ".dat", "D:\usuarios\Daniel\Pasta\" & i & ".dat" Name "D:\usuarios\Daniel\Pasta\" & i & ".dat" As "I...
- Ter Fev 14, 2012 10:04 pm
- Fórum: VBA Básico
- Tópico: Executar automaticamente macro ao selecionar célula
- Respostas: 1
- Exibições: 20189
Re: Executar automaticamente macro ao selecionar célula
Boa noite, Você poderia colocar a chamada à sua macro no evento "Activate" da sua planilha e toda vez que ela for seleciona a macro vai ser executada: Private Sub Worksheet_Activate() macroA End Sub Se faz questão de ser ao clicar numa célula, o código pode ser colocado no evento "Sel...
- Ter Jan 31, 2012 11:38 am
- Fórum: VBA Básico
- Tópico: Confirmar janela de atualização de vínculos
- Respostas: 5
- Exibições: 17374
Re: Confirmar janela de atualização de vínculos
Boa tarde,
A minha sugestão é utilizar "Aplication.DisplayAlerts":
Desta forma, o Excel não emitirá avisos durante a execução da macro.
Veja se atende.
Abraço
A minha sugestão é utilizar "Aplication.DisplayAlerts":
Código: Selecionar todos
Sub Macro()
Application.DisplayAlerts = False
'
'
'
Application.DisplayAlerts = True
End Sub
Veja se atende.
Abraço
- Seg Jan 23, 2012 1:32 pm
- Fórum: VBA Básico
- Tópico: Excel 2007
- Respostas: 2
- Exibições: 2304
Re: Excel 2007
Boa tarde, Vai depender dos recursos que as suas macros utilizam. Eu, por exemplo, nunca tive problema, pois todas as macros do 2003 rodaram normalmente no 2007/2010. Talvez haja algum recurso que cause problema, mas para ter certeza só testando. Eu acho que há grandes chances de funcionar normalmen...
Re: EXCEL
Boa tarde,
Veja se esta fórmula ajuda, supondo que a quantidade presenças esteja em "A1":
=SE(A1/36>=75%;1;SE(A1/36>=35%;0,5;0))
Abraço
Veja se esta fórmula ajuda, supondo que a quantidade presenças esteja em "A1":
=SE(A1/36>=75%;1;SE(A1/36>=35%;0,5;0))
Abraço
Re: Excel
Boa noite, Pelo que entendi, você coloca "1f" se houver 1 falta. Se for isso, sugiro que faça uma fórmula para calcular as presenças (p) e outra para as faltas (f): =SE(DIREITA(A1;1)="p";VALOR(ESQUERDA(A1;NÚM.CARACT(A1)-1));0) =SE(DIREITA(A1;1)="f";VALOR(ESQUERDA(A1;NÚM...
- Seg Jan 16, 2012 10:35 pm
- Fórum: Geral
- Tópico: calculo formula local[Resolvido]
- Respostas: 2
- Exibições: 2156
Re: calculo formula local
Boa noite, Veja se atende: Plan5.Cells(i, 39).FormulaLocal = "=DN" & i & "*DI" & i & "/DO" & i 'empativo" Os parênteses são desnecessários, porém caso queira incluí-los: Plan5.Cells(i, 39).FormulaLocal = "=(DN" & i & "*DI&...
- Sex Jan 13, 2012 8:38 am
- Fórum: Geral
- Tópico: Cálculo de Intervalo de Dias/Horas
- Respostas: 6
- Exibições: 4144
Re: Cálculo de Intervalo de Dias/Horas
Bom dia, Testei o código e funcionou. Criei um formulário com 2 caixas de texto e um botão e utilizei o seguinte código: Private Sub CommandButton1_Click() Dim DataInicial As Date Dim DataFinal As Date DataInicial = TextBox1.Text DataFinal = TextBox2.Text MsgBox Fix(DateDiff("n", DataInici...
- Qua Jan 11, 2012 5:00 pm
- Fórum: Geral
- Tópico: Cálculo de Intervalo de Dias/Horas
- Respostas: 6
- Exibições: 4144
Re: Cálculo de Intervalo de Dias/Horas
Boa tarde,
A minha sugestão é a seguinte:
Abraço
A minha sugestão é a seguinte:
Código: Selecionar todos
DifHoras = Fix(DateDiff("n", DataInicial, DataFinal) / 60) & ":" & Format(DateDiff("n", DataInicial, DataFinal) Mod 60, "00")
- Sex Jan 06, 2012 5:46 pm
- Fórum: VBA Básico
- Tópico: Colocar traço com Array
- Respostas: 4
- Exibições: 3154
Re: Colocar traço com Array
Boa noite,
Então tente assim:
Abraço
Então tente assim:
Código: Selecionar todos
TextBox = Replace(testeArray(1) & " - " & testeArray(2) & " - " & testeArray(3), "--", "-")