Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Print "Ime ovog izvjestaja je:" & Me.Name
End Sub