Can I rewrite a Javascript function using Excel VBA?

Question

Hi, Don't know how to do this at all, but if the onclick of a button is similar to below:

onclick="ConfirmAvailable();"
function ConfirmAvailable()
{
 if (document.getElementById("AvailableCB").checked)
 {
  return YesNoDialog("'Are you sure?'");
 }
 else
 {
  return true;
 }
}

Is it possible, if I set ConfirmAvailable()="" using Excel VBA, to reset it to what is above, or even to set the output to =true all the time? The results are passed to another function, so I need it to return true, but ideally, I'd like to change it to nothing, then return it to its original state, if possible. Any help would be appreciated, as I'm not good with this stuff.

Answer 1

Assuming the Checkbox's name is AvailableCB, and the name of the button is ConfirmAvailable, the VBA version of what you're looking to do should look something like this.

   Public Function ConfirmAvailable_Click()
       ConfirmAvailable_Click = False ' default value = false '
       If AvailableCB.Value = True Then ConfirmAvailable_Click = True ' if checked, true '
   End Function

If the button name is something else, just call this function from its _Click() method.

Answer 2

Simple answer: try turning off JavaScript in the browser. An onclick macro that returns true or false often controls whether a link should be followed or not. If JavaScript is off then the link should be followed regardless. Whether this works will depend on how much of the rest of the site requires JavaScript to be enabled

Answer 3

Hi, I've found this seems to work if I save the page to my C drive, but this does not accept the changes on the "live" page, and I don't have permission to make the change on the "live" page.

WebBrowser1.document.btnwhatever.attachEvent "onclick", WebBrowser1.document.parentWindow.next_clicked()

I still don't know how to change the function next_clicked(), or the format to pass it back to the page, but as I don't have access on the "live" page I can't do it anyway.

Thanks all for the help and for looking into this for me.