Macro do Aplicativo Microsoft Excel VBA, faz uma soma através do Visual Basic Application, inserindo a fórmula na célula(A1)
sendo a soma de determinado range (A2:A18), e em A1 adicione a soma o Texto "SOMA TOTAL", texto precedido da soma.

Sub Inserir_Formula()
Range("A1").Select
Range("A1").Formula = "=SUM(A2:A18)"
Selection.Formula = " Soma Total = R$ " & Range("A1").Value
End Sub



Aprenda Microsoft Excel VBA --(SaberExcel)--

Saberexcel - o site das macros
vba arquivo texto copiando fórmulas existente criando arquivo txt
Esta macro do Aplicativo Microsoft Excel VBA, copia as fórmulas para a planilha (Plan2) e salva e salva o arquivo.txt com as todas as fórmulas fórmulas inseridas na planilha(Plan1) Cria um Arquivo Texto chamado "Salvar_Formulas.txt"
Redirecione o Caminho do Diretorio

Sub Copia_formula()
Dim txtFormula As String

txtFormula = Sheets("Plan1").Range("B14").Formula

Sheets("Plan2").Range("B1").Formula = txtFormula

Sheets("Plan2").Range("B2").Formula = _
Sheets("Plan1").Range("B14").Formula

'salva as formulas no txt
Open "C:\VBA\Salvar_Formula.txt" For Output As 1

Write #1, txtFormula
Write #1, Sheets("Plan2").Range("B1").Formula
Close 1

End Sub

Macro do Aplicativo Microsoft Excel VBA Selecione células com fórmulas
na folha de Planilha.

voce poderá também selecionar, vá à Caixa de Diálogo ou também (Tecle (F5),
e Especial) aparecerá a caixa de diálogo da imagem ao lado.

Essa macro seleciona todas as células com fórmulas na folha de planilha
Sub SelectFormulaCells()
Selection.SpecialCells(xlCellTypeFormulas, 23).Select
End Sub

Primeiro:
Observe "SpecialCells" nos arquivos de Ajuda de VBE assim vê o que outras
espécies de Células Especiais são disponíveis (espaços em branco, comentários etc.) "as Constantes" são outro modo de referenciar "Valores"

Segundo:
Se só uma célula for selecionada, todas as células na folha ativa serão procuradas. Se duas ou mais células forem selecionadas, só a seleção será procurada.

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com SaberExcel

Saberexcel - o Site das Macros
Essa planilha do Aplicativo Microsoft Excel VBA, procura aleatóriamente a palavra do Senhor para você na planilha e retorna com auxílio de macros e e Fórmulas

Fórmula usada ......: =ÍNDICE(Plan1!$A$2:$B$300;CORRESP($G$1;Plan1!$A$2:$A$300;0);2)

Sub ALE()
Application.SendKeys ("{DEL}")
End Sub

Sub cont()
For i = 1 To Range("G1")
ALE
Next i

If Range("g1") = 0 Then
ALE
End If

End Sub

Sub começo()
[c2] = "estou fazendo a busca do que servirá para você"
End Sub

Sub fim()
[c2] = "Eis a palavra de Deus para você!"
End Sub



Aprenda Aplicativo Microsoft Excel VBA

SaberExcel VBA Estudos - o site das macros
Essas Funções do Aplicativo Microsoft Excel VBA, calculam descontos de acordo com o valor de compra, aqui fiz dois exemplos com as mesmas instruções, porém, usando duas estruturas de decisão (Instruções condicionais) diferentes. Estrutruras de decisão de instrução IF...THEN... ELSE.. END IF e SELECT CASE , que executam condicionalmente um grupo de instruções, dependendo do valor de uma expressão.

Function CalcPreço(quantidade As Integer)
If quantidade < 101 Then
CalcPreço = 10
ElseIf quantidade < 301 Then
CalcPreço = 9
ElseIf quantidade < 701 Then
CalcPreço = 8
Else: CalcPreço = 7
End If
End Function

Function CalcPreço(quantidade As Integer)
Select Case quantidade
Case 0 To 100: CalcPreço = 10
Case 100 To 300: CalcPreço = 9
Case 300 To 700: CalcPreço = 8
Case Is >= 701: CalcPreço = 7
End Select
End Function



Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com SaberExcel




Publicidade
Compre com segurança, garantia e ótimos preços