sc/source/ui/vba/testvba/Logs/TestIntersection.log

   1 Test run started : 17/09/2009 12:18:03
   2 ----------------------------------------------------------------
   3 TestIntersection
   4  TEST START : TestIntersection
   5   ITEM Assertion OK : test1 Application.Intersect( Range('A2:D10'), Range('C4:E6'))
   6   ITEM Assertion OK : test2 Application.Intersect( Range('A2:D10'), Range('A4:G10'))
   7   ITEM Assertion OK : test3 Application.Intersect( Range('A2:c8,d2:f8,g2:i8'), Range('A4:G10'))
   8   ITEM Assertion OK : test4 Application.Intersect( Range('A4:G10'), Range('A2:c8,d2:f8,g2:i8'))
   9   ITEM Assertion OK : test5 Application.Intersect( Range('A2:c8,d2:f8,g2:i8'), Range('g4:i10,A4:G10'))
  10   ITEM Assertion OK : test6 Application.Intersect( Range('g4:i10,A4:G10'), Range('A2:c8,d2:f8,g2:i8'))
  11   ITEM Assertion OK : test7 Application.Intersect( Range('a2:d10,b5:e10'), Range('a5:i10'))
  12   ITEM Assertion OK : test8 Application.Intersect( Range('a2:c8,d2:f8'), Range('b6:e9,a6:f9'))
  13   ITEM Assertion OK : test9 Application.Intersect( Range('a2:c8,e2:f8'), Range('b6:e9,a6:f9'))
  14   ITEM Assertion OK : test10 Application.Intersect( Range('a1:a3,c1:c3'), Range('a2:c3'))
  15   ITEM Assertion OK : test11 Application.Intersect( Range('a1:a3,b1:b3'), Range('a2:c3'))
  16   ITEM Assertion OK : test12 Application.Intersect( Range('a2:d5,b3:f7,c1:g4'), Range('b2:e6'))
  17   ITEM Assertion OK : test13 Range(" a2:d10,b5:e10,g13:j32 "), Range(" a5:i10,b6:e9 "), Range("b2:r5,f10:h19")
  18 Test Results
  19 ============
  20
  21 Tests passed: 13
  22 Tests failed: 0
  23
  24 END 'TestIntersection
  25  TEST OK : TestIntersection
  26 Test run finished : 17/09/2009 12:18:03