Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Объединить ячеек вышестоящими значениями
 
#1
29.12.2019 20:55:47
Добрый день, великие умы. Помогите пожалуйста решить такую задачу. Есть столбец в котором указаны кода, между кодами есть пустые ячейки(строки), в другом столбце присутствует информация по данному коду, нужно в столбце кода, объединить пустые ячейки в одну со значением вышестоящей.
 
 
 
#2
29.12.2019 21:03:00
nero1052019, Вы с правилами знакомились? О чём говорится в пункте 2.3? На какую помощь Вы надеетесь, не показав файл?
 
 
 
#3
29.12.2019 21:03:12
Цитата
nero1052019 написал:
столбец в котором указаны кода
как в прошлой вашей теме набросайте на скорую руку
и про желаемый результат не забудьте
 
 
 
#4
29.12.2019 23:52:07
Прошу прощения, забыл вложить
 
 
 
#5
29.12.2019 23:58:50
А условного форматирования не достаточно будет?
По вопросам из тем форума, личку не читаю.
 
 
 
#6
30.12.2019 00:05:44
Нет, я имел в виду именно объединение ячеек в одну, со значение которое находится выше
 
 
 
#7
30.12.2019 00:14:40
Код
Sub Tablica()
Dim i As Long
Dim iLastRow As Long
Dim first As Long
 iLastRow = Cells(Rows.Count, 2).End(xlUp).Row
  For i = 2 To iLastRow
    first = i
    Do
      i = i + 1
    Loop While Cells(i, "A") = "" And i <= iLastRow
      Range(Cells(first, "A"), Cells(i - 1, "A")).Merge
      i = i - 1
  Next
End Sub
 
 
 
#8
14.01.2020 15:40:09
Kuzmich, Спасибо большое!
 
 
 
Страницы: 1
Наверх