Run macros macro

[blazzzercat via OfficeKB.com]

I recorded the following macro to run three other macros. The code references
a particular workbook name. How do I change that so it will run in any
workbook

Thanks so much.

Sub CBRunMacros()
'
' CBRunMacros Macro
'

'
Application.CutCopyMode = False
Application.Run "'DFC MUSA AR Credit Balances 013107.xls'!CBcellformat"
Application.Run _
"'DFC MUSA AR Credit Balances 013107.xls'!mcrInsertTwoRowsOnEmpty"
Application.Run "'DFC MUSA AR Credit Balances 013107.xls'!CBSubtotal"
Columns("F:F").EntireColumn.AutoFit
Columns("G:G").EntireColumn.AutoFit
Columns("I:I").EntireColumn.AutoFit
Columns("J:J").EntireColumn.AutoFit
End Sub

 

[Guest]

try just taking out the workbook reference, i.e.
Application.Run "CBcellformat"

Hope this helps,
-Chad

 

[Don Guillett]

IF?? the macro is in the workbook try

CBRunMacros Macro()

CBcellformat
mcrInsertTwoRowsOnEmpty
CBSubtotal

range("f1,g1,i1,j1").EntireColumn.AutoFit
End Sub

 

[blazzzercat via OfficeKB.com]

Works great thanks!

try just taking out the workbook reference, i.e.
Application.Run "CBcellformat"

Hope this helps,
-Chad

I recorded the following macro to run three other macros. The code references
a particular workbook name. How do I change that so it will run in any

[quoted text clipped - 18 lines]

Columns("J:J").EntireColumn.AutoFit
End Sub