1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
Dim arr(3,3) as string, x as string arr(1,1)="BLUE" arr(2,1)="YELLOW" arr(3,1)="RED" arr(2,1)="1" arr(2,2)="2" arr(2,3)="3" some code to make magic happen x = results of magic end sub