Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Разделить объединенные ячейки и автоматически заполнить их - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Разделить объединенные ячейки и автоматически заполнить их (Формулы/Formulas)
Разделить объединенные ячейки и автоматически заполнить их
kioki Дата: Вторник, 08.03.2016, 20:10 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте! Как разделить объединенные ячейки и автоматически заполнить их значениями (см. пример)?
К сообщению приложен файл: 6926087.xlsx(9Kb)


Сообщение отредактировал kioki - Вторник, 08.03.2016, 20:25
 
Ответить
СообщениеЗдравствуйте! Как разделить объединенные ячейки и автоматически заполнить их значениями (см. пример)?

Автор - kioki
Дата добавления - 08.03.2016 в 20:10
StoTisteg Дата: Вторник, 08.03.2016, 20:57 | Сообщение № 2
Группа: Авторы
Ранг: Ветеран
Сообщений: 541
Репутация: 45 ±
Замечаний: 0% ±

Excel 2010
[vba]
Код
    Range("A2:A7").UnMerge
    Range("A2").AutoFill Destination:=Range("A2:A4"), Type:=xlFillDefault
    Range("A5").AutoFill Destination:=Range("A5:A7"), Type:=xlFillDefault
[/vba]


Проверь всё. ThisWorkbook.Save. On Error Resume Next.

Сообщение отредактировал StoTisteg - Вторник, 08.03.2016, 20:59
 
Ответить
Сообщение[vba]
Код
    Range("A2:A7").UnMerge
    Range("A2").AutoFill Destination:=Range("A2:A4"), Type:=xlFillDefault
    Range("A5").AutoFill Destination:=Range("A5:A7"), Type:=xlFillDefault
[/vba]

Автор - StoTisteg
Дата добавления - 08.03.2016 в 20:57
kioki Дата: Вторник, 08.03.2016, 21:56 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
StoTisteg, Спасибо! Но есть ли более универсальный способ. Мне нужно проделать эту операцию вот с этим файлом...
К сообщению приложен файл: 2727831.xlsx(25Kb)
 
Ответить
СообщениеStoTisteg, Спасибо! Но есть ли более универсальный способ. Мне нужно проделать эту операцию вот с этим файлом...

Автор - kioki
Дата добавления - 08.03.2016 в 21:56
Pelena Дата: Вторник, 08.03.2016, 22:16 | Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 9846
Репутация: 2253 ±
Замечаний: 0% ±

Excel 2010 & Mac Excel 2011
kioki, выделяете диапазон -- снимаете объединение ячеек -- F5 -- выделить -- Пустые ячейки -- ОК -- нажимаете равно на клавиатуре и стрелку вверх (в строке формул должно получиться =А1) -- Ctrl+Enter


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщениеkioki, выделяете диапазон -- снимаете объединение ячеек -- F5 -- выделить -- Пустые ячейки -- ОК -- нажимаете равно на клавиатуре и стрелку вверх (в строке формул должно получиться =А1) -- Ctrl+Enter

Автор - Pelena
Дата добавления - 08.03.2016 в 22:16
kioki Дата: Вторник, 08.03.2016, 23:10 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Pelena, Спасибо, вы очень помогли!
 
Ответить
СообщениеPelena, Спасибо, вы очень помогли!

Автор - kioki
Дата добавления - 08.03.2016 в 23:10
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Разделить объединенные ячейки и автоматически заполнить их (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!