как обратиться к объединенной ячейке

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

olgao

Дата: Четверг, 18.04.2013, 15:08 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 20% ±

Подскажите пожалуйста, у меня есть столбец А и в нем несколько объединенных ячеек, например, А3:А7, А8:А15 и т.д. (они разного размера), как обращаться к ячейке А4, А5 и т.д., чтобы в переменную записывалось содержание этой объединенной ячейки; у меня в цикле из ячейки А3 все нормально присваивается, а при следующих значениях выдает ошибку.

Ответить

Serge_007

Дата: Четверг, 18.04.2013, 15:10 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата (olgao)

в переменную записывалось содержание этой объединенной ячейки

В объединённых ячейках нет содержимого, кроме как в левой верхней ячейке диапазона объединения

ЮMoney:41001419691823 | WMR:126292472390

Ответить

olgao

Дата: Четверг, 18.04.2013, 15:14 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 20% ±

Цитата (Serge_007)

В объединённых ячейках нет содержимого, кроме как в левой верхней ячейке диапазона объединения

ну что мне теперь отменять объединение и в каждой ячейке подряд одно и тоже писать, чтобы программа считать нормально могла? как-то же это можно обойти

Сообщение отредактировал olgao - Четверг, 18.04.2013, 15:14

Ответить

M73568

Дата: Четверг, 18.04.2013, 15:18 | Сообщение № 4

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 197

Репутация: 46 ±

Замечаний: 0% ±

2007-2013

Цитата (olgao)

Без примера как-то сложно сказать

Ответить

Serge_007

Дата: Четверг, 18.04.2013, 15:21 | Сообщение № 5

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата (olgao)

как-то же это можно обойти

Нет

Цитата (olgao)

мне теперь отменять объединение?

Естественно. И зачем было его вообще использовать?!

Цитата (olgao)

в каждой ячейке подряд одно и тоже писать, чтобы программа считать нормально могла

А вот это зависит от того что там у Вас за данные на листе, как именно они расположены, что делает Ваш код и от кучи других факторов

ЮMoney:41001419691823 | WMR:126292472390

Ответить

olgao

Дата: Четверг, 18.04.2013, 15:26 | Сообщение № 6

Группа: Пользователи

Ранг: Новичок

Сообщений: 11

Репутация: 0 ±

Замечаний: 20% ±

Цитата (M73568)

Без примера как-то сложно сказать

While Worksheets("Íàãðóçêà").Cells(N + 3, 6).Value <> ""
Prepod = Worksheets("Íàãðóçêà").Cells(N + 3, 1).Value 'Здесь как раз исследуется этот столбец с объединенными ячейками, в них фамилии
Workbooks.Open ("C:\Documents and Settings\Àëåêñåé\Ðàáî÷èé ñòîë\VBA\äèïëîì\Âûïèñêè\" & Prepod & ".xls")
Wend
N = N + 1
[admin]
Оформляйте коды тегами![/admin]