Alias for Workbook in called Macro

[HWL]

Okay this one is annoying.

I have a call to another macro but I can't seem to reference a workbook in the second macro.

In the first macro I have:
Set Newbook = Workbooks.Add
ThisWorkbook.Sheets(1).Range("R18") = Newbook.Name


In the second macro I have:
Set Newbook = Workbooks(ThisWorkbook.Sheets(1).Range("R18"))

I even tried
Set Newbook = ActiveWorkbook.FullName

But had an error about not having an object.
grrrrrrrrrrrr This one should be simple.

What am I doing wrong that I can refer to this new workbook in the second macro?

 

[Joe4]

Where are you trying to save the Name to, cell R18 of your new workbook, or your oiginal one?

 

[HWL]

Where are you trying to save the Name to, cell R18 of your new workbook, or your oiginal one?

Thisworkbook is the macro launcher, so I am saving to cell R18 of the original. (Thisworkbook)

But shouldn't I be able to assign an alias anytime I want? such as:

Newbook = ActiveWorkbook.Name

 

[Joe4]

If you capture the workbook name in a variable, you can pass it between different macros (include it as a paramter in your second macro).

 

[HWL]

If you capture the workbook name in a variable, you can pass it between different macros (include it as a paramter in your second macro).

Explain a bit more please.
In the first macro, it is a variable, called NewBook
How do I pass that to the second macro?
Call macro2(NewBook)

???

 

[Joe4]

Here is one example: http://support.microsoft.com/kb/153307

There are lots of others if you Google something like "Excel Procedures with Parameters".