Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

VLOOKUP and folder name from another cell

Posted on 2014-04-15
7
Medium Priority
?
1,402 Views
Last Modified: 2014-04-18
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
Comment
Question by:Carbonecz
  • 2
  • 2
  • 2
  • +1
7 Comments
 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 40003377
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
 
LVL 34

Expert Comment

by:Rob Henson
ID: 40003396
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
 
LVL 43

Expert Comment

by:Saqib Husain, Syed
ID: 40003409
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
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 

Author Comment

by:Carbonecz
ID: 40003415
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
 
LVL 34

Accepted Solution

by:
Rob Henson earned 2000 total points
ID: 40003674
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
 
LVL 23

Expert Comment

by:Ejgil Hedegaard
ID: 40005098
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
 

Author Comment

by:Carbonecz
ID: 40008330
Thanks! Should've thought about that. I recorded FIND and REPLACE macro and edited it to do what I needed.
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

With its various features, Office 365 can not only help you with your day-to-day business tasks, it can also do wonders for your marketing campaign.
In this post, I will showcase the steps for how to create groups in Office 365. Office 365 groups allow for ease of flexibility and collaboration between staff members.
This Micro Tutorial demonstrates in Microsoft Excel how to consolidate your marketing data by creating an interactive charts using form controls. This creates cool drop-downs for viewers of your chart to choose from.
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

782 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question