PDA

Показать полную графическую версию : VBA Объект Collection


Vandheer
19-09-2016, 13:30
Как считать значения выделенных переменных. "a" это колекция
http://s8.hostingkartinok.com/uploads/images/2016/09/59322ad36d290091ebe97d58ae9fc664.gif

Iska
19-09-2016, 15:08
Что значит «считать»? И код покажите.

Vandheer
20-09-2016, 05:29
Цитата Iska:
Что значит «считать»? »
вывести значение переменой. К примеру первого a.item(1)

И код покажите.ну к примеру:

dim a as new collection
a.add (range(cells(1,1),cells(2,1)))

Iska
20-09-2016, 07:00
Vandheer, попробуйте использовать словарь вместо коллекции:
Option Explicit

Sub Sample()
Dim objDictionary As Variant

Set objDictionary = CreateObject("Scripting.Dictionary")

objDictionary.Add 1, Range(Cells(1, 1), Cells(2, 1))

Debug.Print objDictionary.Item(1).Item(1).Value
Debug.Print objDictionary.Item(1).Item(2).Value

objDictionary.RemoveAll

Set objDictionary = Nothing
End Sub

Можно и раннее связывание использовать.

А какую глобальную задачу Вы решаете таким образом?




© OSzone.net 2001-2012