Nome do WB Alias para vlookup [closed]

0

Eu preciso atribuir um alias a um WB por causa do nome que está mudando e eu preciso usar esse alias em um vlookup. Eu usei alguns exemplos encontrados on-line sem sucesso.

Aqui está o que eu tenho neste momento:

' assigns an alias to the workbook since the file name changes
Set AllAcctsWB = ThisWorkbook
AllAcctsWB.Activate

' switches to the correct WB for the vlookup to occur
InfluencerWB.Activate

' counts the number of used rows in this sheet
LastRowA = Range("A1").End(xlDown).Row

' selects the starting point for the vlokup
Range("F2").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-5], '[" & AllAcctsWB & "]Filtered _
    data'!C1:C31,31,0)"

' fills the column to the length of column A
Selection.AutoFill Destination:=Range("F2:F" & LastRowA)

Qualquer conselho ou orientação útil é definitivamente bem-vindo.
De antemão, obrigado pela ajuda.

    
por RobertC 08.02.2018 / 15:04

1 resposta

1

ThisWorkbook retorna um objeto de pasta de trabalho correspondente à pasta de trabalho atual, não o nome da pasta de trabalho atual.

Para fazer referência ao nome da pasta de trabalho atual, use ThisWorkbook.Name

    
por 08.02.2018 / 23:27