'Primer 24a: Poziv formulara iz Primera 24 
 
Option Explicit

Sub testForme24()
    If Application.Documents.Count = 0 Then
        MsgBox "Niste otvorili nijedan dokument"
    Else
        FormaKonvertor.Show vbModeless
    End If
End Sub