Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
andman
0 / 0 / 0
Регистрация: 24.04.2014
Сообщений: 15
1

Как перебрать ячейки строки

21.07.2015, 19:32. Просмотров 850. Ответов 4
Метки нет (Все метки)

Visual Basic
1
2
3
4
5
6
7
8
    For Each Myrow In workrange.Rows
        For Each c In Myrow
            If Not IsEmpty(c.Value) Then
                Debug.Print (c.Value.Text())
                
            End If
        Next c
    Next Myrow
Компилятор ругается на строку Debug... c вердиктом object required
Перебор мне нужен именно такой, с двумя вложенными for each.
Как получить значение ячейки?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.07.2015, 19:32
Ответы с готовыми решениями:

Как перебрать все непустые ячейки в Excel?
Вот собственно

В заданном диапазоне перебрать строки, ограниченные этим диапазоном
В заданном диапазоне получить Range каждой отдельной строки в пределах этого...

Как получит номер строки выделенной ячейки?
Подскажите как получит номер строки выделенной ячейки. Заранее благоларю за...

Как удалить те строки, в которых объедены ячейки
Здравствуйте! столкнулся со следующей проблемой: Во время работы этого цикла не...

Как копировать отдельные слова из ячейки в соседние строки
Подскажите пожалуйста как разбить содержимое ячейки по определенным ячейкам...

4
pashulka
2410 / 1231 / 500
Регистрация: 01.12.2010
Сообщений: 2,486
21.07.2015, 19:41 2
Visual Basic
1
2
3
4
5
6
7
8
9
For Each Myrow In workrange.Rows
    For Each c In Myrow.Cells
        If Not IsEmpty(c) Then
           Debug.Print c.Value   'Значение
           Debug.Print c.Text    'Текст
           Debug.Print c.Formula 'Формула
        End If
    Next c
Next Myrow
0
andman
0 / 0 / 0
Регистрация: 24.04.2014
Сообщений: 15
21.07.2015, 21:33  [ТС] 3
Debug.Print c.Value 'Значение
Debug.Print c.Text 'Текст
Debug.Print c.Formula 'Формула
Это всё не работет.
c.value : type mismatch
c.text : значение всегда null
0
pashulka
2410 / 1231 / 500
Регистрация: 01.12.2010
Сообщений: 2,486
21.07.2015, 21:37 4
Разницу видите ?

Цитата Сообщение от andman Посмотреть сообщение
For Each c In Myrow
Цитата Сообщение от pashulka Посмотреть сообщение
For Each c In Myrow.Cells
0
andman
0 / 0 / 0
Регистрация: 24.04.2014
Сообщений: 15
22.07.2015, 06:06  [ТС] 5
Прошу прощения, не заметил сразу.
0
22.07.2015, 06:06
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.07.2015, 06:06

Как по адресу ячейки определить номер соответствующей строки?
У меня программа выполняет поиск по заданному значению. Находит искомую ячейку....

Как узнать номер строки для активной ячейки?
Как узнать номер строки для активной ячейки? спасибо

Как из адреса ячейки получить просто номер строки?
Sub key() Dim rows As String Dim arr() As String rows =...


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

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

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