Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Перевести Range в массив vba ?
 
#1
28.11.2012 12:31:31
Научите пожалуйста, как правильно поместить значения диапазона с листа excel в массив?  
 
Думала, что это должно как-то так выглядеть, но так не работает:  
 Dim arr()  
 arr = Sheets("искл").Range("a1:a25")  
 MsgBox arr(7)
 
 
 
#2
28.11.2012 12:37:12
Почти:  
 
Dim arr()  
arr = Sheets("искл").Range("a1:a25").Value  
MsgBox arr(7, 1)  
 
 
или  
 
Dim arr  
arr = Sheets("искл").Range("a1:a25")  
MsgBox arr(7, 1)
 
 
 
#3
28.11.2012 12:37:41
Dim arr()  
Dim r As Range  
Set r = Sheets("искл").Range("a1:a25")  
ReDim arr(1 To r.Rows.Count, 1 To r.Columns.Count)  
arr = r  
MsgBox arr(7, 1)
 
 
 
#4
28.11.2012 13:01:17
Спасибо! Вы мне очень помогли!
Работать надо не 12 часов, а головой.
 
 
 
Страницы: 1
Читают тему
Наверх