Filepath to reference cell value

Hi All,

I am running a macro from Excel, part of which opens a specified word document.

At the moment, the filepath for the said word document reads:

C:\Users\jeremy.watson\*****\*****\*****\*****.docm

The document exists as a shared document and therefore if sarah Jennings wants to run the macro, Jeremy.watson would need to be replaced with sarah.jennings!

I hope that makes sense... The half solution I have come up with is asking the user to enter their username into a cell - and then having the filepath refer to that cell to inform the filepath.

If the above makes any sense, could someone tell me if it is possible, and if so, what should my filepath look like if I want it to incorporate the value in cell D2 instead of having a fixed path that reads name.surname?

Thanks in advance for anyone's time!

Total Noob.

Try:

Code:

---

Sub test()
    Dim fPath As String, oShell As Object
    Set oShell = CreateObject("Shell.Application").BrowseForFolder(0, "Please pick a folder", 0)
    fPath = oShell.self.Path & "\*****\*****\*****\*****.docm"
    MsgBox fpath
End Sub

---

Quote:

---

Originally Posted by paulked

Try:

Code:

---

Sub test()
    Dim fPath As String, oShell As Object
    Set oShell = CreateObject("Shell.Application").BrowseForFolder(0, "Please pick a folder", 0)
    fPath = oShell.self.Path & "\*****\*****\*****\*****.docm"
    MsgBox fpath
End Sub

---

---

Hi Paulked,

Thank-you for your response!

Am I right in assuming you cannot refer to a cell when writing a path?

e.g. "C:\home" & "D2" & "\word.docm"

Thanks,

Erinc

Maybe

Code:

---

"C:\home" & [D2] & "\word.docm"

---

--Okami

Quote:

---

Originally Posted by 大灰狼1976

Maybe

Code:

---

"C:\home" & [D2] & "\word.docm"

---

--Okami

---

Ah, it worked! So simple, thank-you!

Resolved.