ник: Гоблин
Ну-да. Не знаю что скажут юзеры, но получилось. В форме и в отчете рисунок в gif формате, в нужных местах прозрачность. Под отверстиями прямоугольники и далее в зависимости от цифры в ячейке соотсветствующий цвет. В форме - на после обновления, в отчете на форматирование области данных. Все по такому принципу:
...
For i = 1 To 6
Select Case Me("LAX" & i)
Case Is = 1
Me("Прямоугольник" & 179 + i).BackColor = 16777215
Me("LAX" & i).ForeColor = 0
Case Is = 2
....
и т.д. циклы на каждый из 5 рисунков. И все работает и раскрашивает 