Este fórum está sendo desativado

[yuricgy]

Oi,

Tenho um código VBA que cola toda uma série de valores de um determinado intervalo na última linha de outra aba.

Dentro desse intervalo eu tenho um PROCV dentro dela que é pra ser colado exatamente a formula, até porque ela só funciona na aba final.

O código é esse:

Código: Selecionar todos

Sub Nova_Doacao()

Dim resposta As Integer

'Faz nova doação

    If Sheets("Doar").Range("B3") = "" Then
        
        MsgBox "Por favor preecha todos os campos", vbExclamation, "Doação não efetuada"
        Exit Sub
    
    End If

    If Sheets("Doar").Range("D3") = "" Then
        
        MsgBox "Por favor preecha todos os campos", vbExclamation, "Doação não efetuada"
        Exit Sub
    
    End If

    If Sheets("Doar").Range("E3") = "" Then
        
        MsgBox "Por favor preecha todos os campos", vbExclamation, "Doação não efetuada"
        Exit Sub
    
    End If

    If Sheets("Doar").Range("F3") = "" Then
        
        MsgBox "Por favor preecha todos os campos", vbExclamation, "Doação não efetuada"
        Exit Sub
    
    End If

resposta = MsgBox("Você tem certeza que todas as informações estão corretas? Lembre que elas não poderão ser alteradas após a doação.", vbYesNo + vbQuestion, "Cuidado!")
    
    If resposta = vbYes Then

    Sheets("Doar").Range("A3:F3").Copy
    Sheets("Bco_Doacoes").Select
    Call LinhaVazia
    Selection.PasteSpecial Paste:=xlPasteValues
    Selection.End(xlUp).Select
    Sheets("Doar").Select
    Range("B2,D2:F2").ClearContents
    ActiveWorkbook.RefreshAll
    ActiveWorkbook.Save
    MsgBox "Doação realizada com sucesso!", vbInformation, ""
    
    Else
    
        'Não faça nada
        
    End If
    
End Sub

E a formula, é essa:

Código: Selecionar todos

=PROCV([@Matrícula];Padrinhos;2;0)

Já tentei a formula TEXTO, mas sem sucesso. Como posso fazer pra contornar essa situação, por favor?

[CursoDeExcelGratis]

parece que vc está colando valores nesta linha Selection.PasteSpecial Paste:=xlPasteValues .
Tem uma propridade da célula chamada Formula, acredito que o caminho seja por ahi

[mucascosta]

yuricgy,
Para que obtenha ajuda, seria melhor vc disponibilizar um exemplo de sua planilha, indicando, objetivamente, sua necessidade...