Este fórum está sendo desativado

[DaviLima]

Olá, pessoal boa tarde!

Estou com um grande problema, eu criei uma planilha com banco de dados que ao colocar o CPF da pessoa retorna todos os valores de notas fiscais encontrados para esse CPF, porém eu queria jogar essa formula em VBA para que fizesse a mesma coisa da planilha. Gostaria da ajuda de vocês!!

A formula em que utilizo é a seguinte.

={SEERRO(ÍNDICE($A$2:$C$98490;MENOR(SE($A$2:$C$98490=$I$3;LIN($A$2:$C$98490)-1);LIN(A1));1);"")}

$I$3 = O campo aonde é colocado o CPF.

[alexandrevba]

Boa tarde!

Tente...

Código: Selecionar todos

Sub teste()
    Range("I3").FormulaArray = "sua formula aqui"
End Sub

Att

[osvaldomp]

Experimente:

Código: Selecionar todos

Sub InsereFórmula()
 ActiveCell.FormulaArray = _
    "=IFERROR(INDEX($A$2:$C$98490,SMALL(IF($A$2:$C$98490=$I$3,ROW($A$2:$C$98490)-1),ROW(A1)),1),"""")"
End Sub

[DaviLima]

No caso eu gostaria de criar um programa em VBA, como eu colocaria a formula para retornar nas textbox?

Por exemplo:

TextBox CPF -> Aonde colocaria o CPF da pessoa.

TextBox Resultado -> Aonde retornaria os valores
TextBox Resultado 2 -> Aonde retornaria os valores

No caso na formula "=IFERROR(INDEX($A$2:$C$98490,SMALL(IF($A$2:$C$98490=$I$3,ROW($A$2:$C$98490)-1),ROW(A1)),1),"""")"

I3 que faz o papel do TextBox CPF, como eu colocaria o textbox CPF na formula?

[osvaldomp]

No caso, eu sugiro que você disponibilize uma amostra do seu arquivo.

[DaviLima]

Segue no anexo a planilha

[osvaldomp]

No caso eu gostaria de criar um programa em VBA, como eu colocaria a formula para retornar nas textbox?

No caso, eu não encontrei qualquer TexBox no arquivo que você disponibilizou