option button op yes klikken automatisch formulier openen

[bjornesto]

Ik heb een formulier gemaakt waarin option buttons verwerkt zijn om een soort van dossier te maken voor evenementen.

Echter wil ik nu als ik op yes klik bij optionbutton extra facilities dat deze een formulier opent op hieronder vermeld.

Deze staat op de C:\SHARE\alcohol policy.doc

Private Sub OptionButton_extra_facilities_Yes_Click()
'Label komt tevoorschijn bij onderdeel are there extra facilities comming to the event
Label_extra_facilities_work_permit.Visible = True
End Sub

 

[Warme bakkertje]

    With CreateObject("word.Application")
        .documents.Open "C:\SHARE\alcohol policy.doc"
        .Visible = True
    End With

 

[bjornesto]

beste

dit werkt perfect dank u