Execute VB Function with parameter from a Button

[#1]

Hi all,

i would like to run a VB function with parameters by click on a button.

The function is not running, can  someone help me?

The Action in my Button is: =SetVars('myVarName')

My VB Function is:

Function SetVars(s)
 Set v = ActiveDocument.Variables(s & "_v")
  If v.GetContent.String = "1" Then
   v.SetContent "0", true
  Else
   v.SetContent "1", true
  End If
End Function

[nagaiank]

If the requirement is to toggle the variable value between 1 and 0, you may implement using a button with action. There is no need for a VB macro. An example is attached.

[#3]

Thats perfect!
Thanks!!!