How to make changes in the target file if the vba codes are in a different file

[Zain_inout]

My code is written in my macro workbook. I have to work on a different file every time with the same steps. So ideally I need a macro in a macro file and my target files will be different. Below is a code I have in my macro file.

Sub EEBalanceSummary()
On Error Resume Next
Dim FilePath As String
FilePath = Application.GetOpenFilename
Range("B6").Select

End Sub

I run this code from my macro file. It asks me to select the folder and then the file I need to work on. Now, instead of selecting "B6" cell in my newly opened target file, it selects "B6" in the same macro file. How can I get the code to work on my target file?

 

[bobsan42]

something along these lines:

Sub EEBalanceSummary()
On Error Resume Next
Dim FilePath As String
dim wb as workbook
FilePath = Application.GetOpenFilename
if not FilePath = "False" then set wb = Application.workbooks.open(Filepath)
if wb is nothing then exit sub
with wb
 .Activate
.Activesheet.Range("B6").Select
end with
End Sub

assign the newly opened workbook to a variable and then use it to refer to objects in it.

 

[Zain_inout]

something along these lines:

Sub EEBalanceSummary()
On Error Resume Next
Dim FilePath As String
dim wb as workbook
FilePath = Application.GetOpenFilename
if not FilePath = "False" then set wb = Application.workbooks.open(Filepath)
if wb is nothing then exit sub
with wb
 .Activate
.Activesheet.Range("B6").Select
end with
End Sub

assign the newly opened workbook to a variable and then use it to refer to objects in it.

It worked! Thank you so much

 

[bobsan42]

worked! Thank you so much

Glad I could help.
Please mark the solution for the sake of future readers (and statistics )