Public Function AddPageEx2( _
   ByVal theDocument As Object, _
   ByVal ResourceFilename As String, _
   ByVal Index As Long, _
   ByVal nBitmapID As Long, _
   ByVal Tooltip As String, _
   ByVal Title As String, _
   ByVal Caption As String, _
   ByVal nOptions As Long, _
   Optional ByVal Direction As Variant, _
   Optional ByVal InitialWidth As Variant, _
   Optional ByVal InitialHeight As Variant _
) As Long