Нумерация объединенных ячеек
Olena
Дата: Понедельник, 28.11.2022, 16:06 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 68
Всем доброго времени. Подскажите правильно ли я делаю запись значений в объединенные ячейки с помощью USERFORM. И подскажите пожалуйста, как реализовать нумерацию объединенных ячеек. Благодарю
Всем доброго времени. Подскажите правильно ли я делаю запись значений в объединенные ячейки с помощью USERFORM. И подскажите пожалуйста, как реализовать нумерацию объединенных ячеек. Благодарю Olena
Ответить
Сообщение Всем доброго времени. Подскажите правильно ли я делаю запись значений в объединенные ячейки с помощью USERFORM. И подскажите пожалуйста, как реализовать нумерацию объединенных ячеек. Благодарю Автор - Olena Дата добавления - 28.11.2022 в 16:06
gling
Дата: Понедельник, 28.11.2022, 23:50 |
Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2557
Репутация:
695
±
Замечаний:
0% ±
2010
реализовать нумерацию объединенных ячеек
попробуйте так [vba]Код
Cells(LRow, 3) = Application.Max(Range("c2:c" & LRow - 1)) + 1
[/vba]По поводу правильно или нет, если результат вас удовлетворяет, то наверно правильно.
реализовать нумерацию объединенных ячеек
попробуйте так [vba]Код
Cells(LRow, 3) = Application.Max(Range("c2:c" & LRow - 1)) + 1
[/vba]По поводу правильно или нет, если результат вас удовлетворяет, то наверно правильно.gling
ЯД-41001506838083
Ответить
Сообщение реализовать нумерацию объединенных ячеек
попробуйте так [vba]Код
Cells(LRow, 3) = Application.Max(Range("c2:c" & LRow - 1)) + 1
[/vba]По поводу правильно или нет, если результат вас удовлетворяет, то наверно правильно.Автор - gling Дата добавления - 28.11.2022 в 23:50
Olena
Дата: Вторник, 29.11.2022, 09:29 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 68
Огромное спасибо, работает замечательно. Вы не могли бы объяснить как это работает, что бы я потом вопросы больше не задавала)
Огромное спасибо, работает замечательно. Вы не могли бы объяснить как это работает, что бы я потом вопросы больше не задавала)Olena
Ответить
Сообщение Огромное спасибо, работает замечательно. Вы не могли бы объяснить как это работает, что бы я потом вопросы больше не задавала)Автор - Olena Дата добавления - 29.11.2022 в 09:29
gling
Дата: Вторник, 29.11.2022, 18:27 |
Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2557
Репутация:
695
±
Замечаний:
0% ±
2010
Значение в ячейке в 3 столбце, строке LRow -(последняя на момент работы макроса), Цитата
=Application.Max(Range("c2:c" & LRow - 1)) + 1
= равно максимальному значению диапазона С2:С LRow, т.е. до последней ячейки и +1. По другому объяснить не могу.
Значение в ячейке в 3 столбце, строке LRow -(последняя на момент работы макроса), Цитата
=Application.Max(Range("c2:c" & LRow - 1)) + 1
= равно максимальному значению диапазона С2:С LRow, т.е. до последней ячейки и +1. По другому объяснить не могу.gling
ЯД-41001506838083
Сообщение отредактировал gling - Вторник, 29.11.2022, 18:29
Ответить
Сообщение Значение в ячейке в 3 столбце, строке LRow -(последняя на момент работы макроса), Цитата
=Application.Max(Range("c2:c" & LRow - 1)) + 1
= равно максимальному значению диапазона С2:С LRow, т.е. до последней ячейки и +1. По другому объяснить не могу.Автор - gling Дата добавления - 29.11.2022 в 18:27
Olena
Дата: Среда, 30.11.2022, 15:09 |
Сообщение № 5
Группа: Пользователи
Ранг: Участник
Сообщений: 68
По другому объяснить не могу.
Благодарю)
По другому объяснить не могу.
Благодарю)Olena
Ответить
Сообщение По другому объяснить не могу.
Благодарю)Автор - Olena Дата добавления - 30.11.2022 в 15:09