• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1476
  • Last Modified:

VLOOKUP and folder name from another cell

Hi,

I have this formula:

VLOOKUP(A1,'C:\[file.xlsx]ExportWorksheet'!$A$1:$B$65536,2,FALSE)

Open in new window

I want other users to download the file.xlsx and have it in whatever folder they want. Using VBA I can get a current folder and put it in another cell like this:

Private Sub Workbook_Open()

Dim path As String
path = Application.ActiveWorkbook.path
Worksheets("AnotherSheet").Range("A1") = path & "\"

End Sub

Open in new window

Then I wanted to do something like this:

VLOOKUP(A1, AnotherSheet!$A$1&'[file.xlsx]ExportWorksheet'!$A$1:$B$65536,2,FALSE)

Open in new window

It doesn't work no matter where I put or omit those ' .

Is there a way to do it? If not using a formula then maybe through VBA? I don't know how to search a worksheet and replace part of a string in all cells that are affected.

Thanks!
0
Carbonecz
Asked:
Carbonecz
  • 2
  • 2
  • 2
  • +1
1 Solution
 
Saqib Husain, SyedEngineerCommented:
Try

Private Sub Workbook_Open()
    Dim wb As Workbook
    Dim path As String
    For Each wb In Application.Workbooks
        If LCase(wb.Name) = "file.xlsx" Then
            path = wb.path
            Exit For
        End If
    Next wb
    Worksheets("AnotherSheet").Range("A1") = path & "\"
End Sub
0
 
Rob HensonFinance AnalystCommented:
With a formula you need to use the INDIRECT function to create the file path and name string. However, INDIRECT does not work when the source file is closed.

Thanks
Rob H
0
 
Saqib Husain, SyedEngineerCommented:
does not work when the source file is closed.
Same applies to my comment. I assume that the file is open which is why you used

path = Application.ActiveWorkbook.path
0
The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

 
CarboneczAuthor Commented:
The file isn't opened. I need to put its full path there. It works without the file being opened when it's like this:

'C:\[file.xlsx]ExportWorksheet'!$A$1:$B$65536

Open in new window


I need to replace C:\ with the path I get from my script and then probably recalculate all affected cells?
0
 
Rob HensonFinance AnalystCommented:
How about doing a Find and Replace?

Have your formula setup with a spurious filename (eg TempFile.xlsx) then you can do a Find on "C:\Path\TempFile.xlsx" and Replace with File Name generated/found in existing routine.

Do a Find and Replace manually and use the VB Recorder to get the syntax. When recorded, the script will show "Find:=Text" and "Replace:=Text", the two blocks of Text can be replaced with a Variable generated within the script.

Thanks
Rob H
0
 
Ejgil HedegaardCommented:
Perhaps you are making it too complicated.
The open file is the file with the formulas, linking to file.xlsx.
In that file you search for the path, and that must mean you expect file.xlsx to be in the same folder as the file with the formulas linking to file.xlsx.

If the 2 files are saved in the same folder when created, and both are copied to another folder, then when opening the file with the formulas, the links will point to the folder the file is in now, and not to where it was.

So if both files are in the same folder, you don't have to search and replace anything.
0
 
CarboneczAuthor Commented:
Thanks! Should've thought about that. I recorded FIND and REPLACE macro and edited it to do what I needed.
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

  • 2
  • 2
  • 2
  • +1
Tackle projects and never again get stuck behind a technical roadblock.
Join Now