knappen virker ikke, når jeg har gemt som webside

Jeg har lavet en præsentation i Powerpoint.
Jeg har indsat en knap som skal åbne en mappe på C-drevet.
knappen bruger denne kode.
Private Sub CommandButton1_Click()
Dim Mappesti As String
Dim retval
    Mappesti = "C:\Dokumenter\Undervisning"
    retval = Shell("EXPLORER " & Mappesti, 1)
End Sub

Men, når jeg gemmer præsentationen som webside, virker knappen ikke, kan det samme evt. gøres med et hyperlink.