I am not very familiar with the use of single quotation marks, and it seems that I will not bind Workbook with () passing. I want to pass at least two character parameters

`Sub 宏1()
S = 1
K = 2

Application.OnTime Now, "'宏2 (" & S & ")'": Exit Sub
'Application.OnTime Now, "'宏2 ("" & S & ""','"" & K & "")'": Exit Sub
'Application.OnTime Now, "'宏2 ("" & S & "","" & K & "")'": Exit Sub
'Application.OnTime Now, "'宏2 ("" & S & ""','"" & K & "")'": Exit Sub
'Application.OnTime Now, "'宏2 ('"" & S & ""','"" & K & ""')'": Exit Sub
'Application.OnTime Now, "'宏2 (" & S & "," & K & ")'": Exit Sub
'Application.OnTime Now, "宏2 ("" & S & ""','"" & K & "")": Exit Sub
'Application.OnTime Now, "宏2 (" & S & "','" & K & ")": Exit Sub

End Sub`

Sub 宏2(Optional ByVal A As String, Optional ByVal B As String) Debug.Print A, B Stop End Sub