Macro to Activate Workbook

[Gaura215]

Hello

I have a requirement to to activate a workbook, with certain words in the name of that workbook.

It may be simple for you all excel gurus out there, but I have been straining my brain since morning on this.

I will explain a bit in detail. I have a template from which value in few cells (Fixed) needs to be copied to a seperate workbook. I know about this copy and paste thing. However the catch is that, this seperate workbook is not always of same name. However this seperate workbook definately contain "JE LOG" in its name. Is their a way, that my macro can consider my activeworkbook as "wb" or something else, and open the workbook containing "JE Log" in its name.

One thing is for sure, at a given time, only workbook with "JE Log" will be open.

Please help.

Thanks in advance.

 

[BiocideJ]

I just typed this in the forum window, but this is what I use to activate a workbook when all I know is its name.

Sub ActivateJELog()
     For Each JEwb in Workbooks
          If UCASE(JEwb.Name) Like "*JE LOG*" Then
               JEwb.Activate
               Exit For
          End If
     Next JEwb
'You can then reference the JE Workbook with calls such as JEwb.Sheets(1).Range("A5").Value = "Hello World."
End Sub