Fórmula do Aplicativo Microsoft Excel, retorna o endereço da primeira célula usada na coluna(A)

Fórmula usada......: {=CÉL("address";ÍNDICE(A1:A100;CORRESP(VERDADEIRO;A1:A100<>"";0)))}
Retorno..............: Endereço da primeira célula usada na coluna(A) Ex: $A$7


Concatenando dados para uma mensagem na célula:
Mensagem .....: " O endereço da primeira célula usada na coluna(A) é : [$A$7] e o valor é: [ 234 ] "

Fórmula usada para concatenação de dados:
=" O endereço da primeira célula usada na coluna(A) é : "&"["&F12&"] e o valor é: [ "&INDIRETO(F12)& " ]"




Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com Saberexcel

Função personalizada verifica se valores são iguais
Saberexcel - Exemplo de Função personalizada

Funçao iVerifica, verifica se os valores da Célula(B1) e Célula(A1) são íguais
Função retorna valores: VERDADEIRO ou FALSO
Equivalente a Função do Excel SUBSTITUIR()

Function iVerifica(cel1 As Range, cel2 As Range) As Boolean
If Application.WorksheetFunction.Substitute(cel1, cel2, "") <> cel1 Then iVerifica = True
End Function

ou

Function iVerifica2(cel1 As Range, cel2 As Range) As Boolean
iVerifica2 = cel1 Like "*" & cel2 & "*"
End Function


Célula(A1)= 234
Celula(B1) = 456

FALSO - retornará (FALSO) se os valores forem diferentes
VERDADEIRO - retornará (VERDADEIRO) se os valores forem iguais

Função Personalizada
E6 = iVerifica(B1;A2)

Função Personalizada
E8 = iVerifica2(B1;A2)

Função do Excel
E10 = SUBSTITUIR(A1;B1;"")<>A1

A Função personalizada iVerifica(B1,A2) e iVerifica2(B1,A2)
é equivalente à Função SUBSTITUIR() do Excel

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com Saberexcel






Lojas Submarino - compras pela internet com segurança e garantia.

Última atualização em Dom, 25 de Julho de 2010 19:30

Saberexcel - o site das macros
excel planilhas funçao personalizada do aplicativo microsoft excel retorna o número da cor do interior de determinada célula na folha de planilha excel
Saberexcel - Funções personalizada exemplos do ms excel

Function Retorna_cor(cell As Range) As Long
Retorna_cor = cell.Interior.ColorIndex
End Function


Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com Saberexcel

Lojas Submarino - compras pela internet com segurança e garantia.

Funçao personalizada retorna a fórmula em determinada célula
Saberexcel - Dicas de Funções Personalizada

Essas funções retornam a Fórmula usada em determinada célula
a segunda retorna a função local, isto é na lingua pt_BR

Esta função retorna a célula usada em uma determinada célula
porém o código Cell.Formula, retorna a fórmula na língua inglesa.

Function Retorna_Formula(Cell As Range) As String
Retorna_Formula = Cell.Formula
End Function

Esta função retorna a célula usada em uma determinada célula
porém o código Cell.FormulaLocal, retorna a fórmula na pt_BR

Function Retorna_Formula_Local(Cell As Range) As String
Retorna_Formula_Local = Cell.FormulaLocal
End Function

Lojas Submarino - compras pela internet com segurança e garantia.