Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
2 / 2 / 0
Регистрация: 02.06.2016
Сообщений: 63
1

Использование значения ячейки Excel

08.12.2017, 17:41. Просмотров 556. Ответов 2
Метки нет (Все метки)

Доброго времени суток!
Подскажите пожалуйста, каким образом можно взять значение ячейки и записать в массив.
В приведённом коде в строке №3 значение ячейки адекватно записывается в указанный массив, а в строке №16 выдаёт ошибку "Общий член "Values" для типа "Range" не найден.", хотя Range указал; пробовал как и в третьей строке Cells - та же ошибка. В чём тут проблема?

vb.net
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 'Создать и изменить
        Dim a(0, 0)
        a(0, 0) = ActiveWorkSheet.Cells(1, 1).Value
        Dim CountX = 0
        For i = 0 To ActiveWorkSheet.UsedRange.Rows.Count - 1
            If ActiveWorkSheet.Cells(i + 1, 1).Value = "x" Then
                CountX = CountX + 1
            End If
        Next
        Dim r = 0
        Dim Massiv_Exporta(CountX, 0)
        For i = 0 To ActiveWorkSheet.UsedRange.Rows.Count - 1
            If ActiveWorkSheet.Cells(i + 1, 1).Value = "x" Then
                For c = 0 To ActiveWorkSheet.UsedRange.Columns.Count - 1
                    ReDim Preserve Massiv_Exporta(CountX, c)
                    Massiv_Exporta(r, c) = ActiveWorkSheet.Range(ActiveWorkSheet.Cells(i + 1, c + 2), ActiveWorkSheet.Cells(i + 1, c + 2)).Values
                    r = r + 1
                Next
            End If
        Next
    End Sub
Добавлено через 5 минут
Тьфу ты, я лошара. Value а не Values в 16 строке!
Пол часа голову ломал. Уже сюда вопрос задал.
Кстати такую левую тему можно удалить?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.12.2017, 17:41
Ответы с готовыми решениями:

Экспорт из ячейки Excel в TextBox
Доброго Всем дня! В ячейку А1 Excel поступают данные в режиме On-line по DDE. Не получается...

Как объединить ячейки в Excel?
как объединить ячейки A1 и B1 в excel через vb.net

Координаты ячейки Excel относительно экрана
Всем привет! Помогите. пожалуйста. Есть ли способ определить координаты ячейки Excel? Абсолютные...

Как вытащить данные из ячейки Excel
Ребята перехожу на новый уровень, то есть пересел на visual basic 2008 express Но проблем от...

2
Модератор
Эксперт .NET
3087 / 2779 / 438
Регистрация: 27.01.2014
Сообщений: 5,090
08.12.2017, 18:43 2
Garik_1993, тему удалять не будем. авось кому пригодиться...
0
SoftIce
08.12.2017, 18:52     Использование значения ячейки Excel
  #3

Не по теме:

Цитата Сообщение от Garik_1993 Посмотреть сообщение
Тьфу ты, я лошара. Value а не Values в 16 строке!
Пол часа голову ломал.
Я однажды написал for i = 0 to n = 1 ', промахнулся мимо клавиши "-", и часа два не мог понять почему не работает цикл :wall:

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.12.2017, 18:52
Привет! Вот еще темы с ответами:

Не считываются данные с ячейки excel 2010
Есть проект на vb 2010 express, цель автоматизировать рутину: копирование одних ячеек из одной...

Как прочитать значение ячейки Excel
Помогите пожалуйста разобраться. Я Открываю Эксель документ через OpenFileDialog1, могу вносить...

Как вывести содержимое ячейки Excel в TextBox
Подскажите пожалуйста, как ввести содержимое ячейки A1 Excel (текст) в TtxtBox1 (VB.NET) или VB6?

Взаимодействие с Excel: Получить цвет заливки ячейки
Каким образом можно получить цвет заливки ячейки в Excel? И сопутсвующий вопрос: присвоить цвет...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.