'Primer 22a: poziv forme koja na osnovu zadatog rednog broja pasusa aktivnog dokumenta 'ispisuje broj karaktera, reci i recenica tog pasusa (Label, ComboBox i CommandButton) Option Explicit Sub testForme22() If Application.Documents.Count = 0 Then MsgBox "Niste otvorili nijedan dokument" Else frmPrimer22.Show vbModeless End If End Sub