I have the following (very abbreviated macro)

Sub AllSummary()
Dim Tabname As String
Tabname = "SUMMARY (A)"
Call SheetSummary
End Sub

What do I need to do within SheetSummary so that it recognizes the Tabname
defined here?

Give this a whirl...

Sub AllSummary()
Dim Tabname As String
Tabname = "SUMMARY (A)"
Call SheetSummary(Tabname)
End Sub

Sub SheetSummary(ByVal strSheetName as string)
msgbox strSheetName
end sub

--
HTH...

Jim Thomlinson


"Barb Reinhardt" wrote:

I have the following (very abbreviated macro)

Sub AllSummary()
Dim Tabname As String
Tabname = "SUMMARY (A)"
Call SheetSummary
End Sub

What do I need to do within SheetSummary so that it recognizes the Tabname
defined here?