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?