Диаграмма на основе глобальных переменных

Привет всем. Вопрос: можно ли на основе глобальных переменных построить график - Гистограмму? Канечно есть вариант создать временную табличку и записать переменные туда, но может есть другой вариант попроще??

Global_Diagram
Привет всем. Вопрос: можно ли на основе глобальных переменных построить график - Гистограмму? Канечно есть вариант создать временную табличку и записать переменные туда, но может есть другой вариант попроще??

1
можно источник сделать на запросе "из ничего" (по типу запроса Digits)
2
тоже самое, что и 1, только с использованием функций - тогда запрос можно НЕ переписывать, а создать один раз сохранённый
3
можно диаграмму строить на данных находящихся в ячейках MS Office Spreadsheet

qwerty112, хотел бы тебя попросить показать как это сделать - с использование временной таблицы я сделал - работает вроде.

Global_Diagram
Привет всем. Вопрос: можно ли на основе глобальных переменных построить график - Гистограмму? Канечно есть вариант создать временную табличку и записать переменные туда, но может есть другой вариант попроще??

Не для подкалывания, а из любопытства: почему табличек так пугаетесь?

вопрос открыт

UP (sorry)

qwerty112
2 тоже самое, что и 1, только с использованием функций - тогда запрос можно НЕ переписывать, а создать один раз сохранённый

Dim a(10) As Long
Dim b(10) As Long

Function get_a(num As Byte) As Variant
  If num > UBound(a) Then
    get_a = Null
  Else
    get_a = a(num)
  End If
End Function

Function get_b(num As Byte) As Variant
  If num > UBound(b) Then
    get_b = Null
  Else
    get_b = b(num)
  End If
End Function

Sub test()
  Dim i As Byte
  For i = LBound(a) To UBound(a)
    a(i) = Int(100 * Rnd())
    b(i) = Int(100 * Rnd())
    Debug.Print i, a(i), b(i)
  Next
  DoCmd.OpenQuery "QQ"
End Sub

QQ

SELECT id, get_a(id) AS a, get_b(id) AS b
FROM MSysAccessObjects
WHERE get_a(id) Is Not Null And get_b(id) Is Not Null;

Immediate

test
 0             5             59 
 1             46            29 
 2             62            64 
 3             26            27 
 4             82            82 
 5             58            98 
 6             91            22 
 7             69            98 
 8             24            53 
 9             10            99 
 10            67            1 

QQ

id a b 0 5 59 1 46 29 2 62 64 3 26 27 4 82 82 5 58 98 6 91 22 7 69 98 8 24 53 9 10 99 10 67 1

Как вариант, строить диа в Excel.
Пример лайт:

В Аксессе "вариант попроще" - это именно таблицы.