Изменение/разбиение диапазона в Range
Nikolay86
Дата: Среда, 13.04.2016, 10:12 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
В примере при клике в диапазон ячеек B8:B888 появляется TextBox, как изменить/разбить диапазон, например, на B8:B34, B45:B56 (чтобы TextBox появлялся только этих диапазонах). Я не знаю синтаксис(, подскажите. Спасибо.
В примере при клике в диапазон ячеек B8:B888 появляется TextBox, как изменить/разбить диапазон, например, на B8:B34, B45:B56 (чтобы TextBox появлялся только этих диапазонах). Я не знаю синтаксис(, подскажите. Спасибо. Nikolay86
Сообщение отредактировал Nikolay86 - Среда, 13.04.2016, 10:29
Ответить
Сообщение В примере при клике в диапазон ячеек B8:B888 появляется TextBox, как изменить/разбить диапазон, например, на B8:B34, B45:B56 (чтобы TextBox появлялся только этих диапазонах). Я не знаю синтаксис(, подскажите. Спасибо. Автор - Nikolay86 Дата добавления - 13.04.2016 в 10:12
Pelena
Дата: Среда, 13.04.2016, 10:24 |
Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19162
Репутация:
4412
±
Замечаний:
±
Excel 365 & Mac Excel
Используйте Union [vba]Код
Union(Range("B8:B34"), Range("B45:B56"))
[/vba]
Используйте Union [vba]Код
Union(Range("B8:B34"), Range("B45:B56"))
[/vba] Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Используйте Union [vba]Код
Union(Range("B8:B34"), Range("B45:B56"))
[/vba] Автор - Pelena Дата добавления - 13.04.2016 в 10:24
Nikolay86
Дата: Среда, 13.04.2016, 10:36 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
При использовании Union(Range("B8:B34"), Range("B45:B56"), открывает TextBox в диапазоне В8:В56. Приложил пример [moder]Не надо цитировать пост целиком. Это нарушение Правил форума[/moder]
При использовании Union(Range("B8:B34"), Range("B45:B56"), открывает TextBox в диапазоне В8:В56. Приложил пример [moder]Не надо цитировать пост целиком. Это нарушение Правил форума[/moder]Nikolay86
Сообщение отредактировал Pelena - Среда, 13.04.2016, 10:48
Ответить
Сообщение При использовании Union(Range("B8:B34"), Range("B45:B56"), открывает TextBox в диапазоне В8:В56. Приложил пример [moder]Не надо цитировать пост целиком. Это нарушение Правил форума[/moder]Автор - Nikolay86 Дата добавления - 13.04.2016 в 10:36
KuklP
Дата: Среда, 13.04.2016, 10:38 |
Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация:
486
±
Замечаний:
0% ±
2003-2010
Так попробуйте: [vba]Код
If Not Intersect(Target, Range("B8:B34,B45:B56")) Is Nothing Then
[/vba]
Так попробуйте: [vba]Код
If Not Intersect(Target, Range("B8:B34,B45:B56")) Is Nothing Then
[/vba] KuklP
Ну с НДС и мы чего-то стoим! kuklp60@gmail.com WM Z206653985942, R334086032478, U238399322728
Ответить
Сообщение Так попробуйте: [vba]Код
If Not Intersect(Target, Range("B8:B34,B45:B56")) Is Nothing Then
[/vba] Автор - KuklP Дата добавления - 13.04.2016 в 10:38
Pelena
Дата: Среда, 13.04.2016, 10:41 |
Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 19162
Репутация:
4412
±
Замечаний:
±
Excel 365 & Mac Excel
открывает TextBox в диапазоне В8:В56
У меня в В40, например, не открывает
открывает TextBox в диапазоне В8:В56
У меня в В40, например, не открываетPelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение открывает TextBox в диапазоне В8:В56
У меня в В40, например, не открываетАвтор - Pelena Дата добавления - 13.04.2016 в 10:41
KuklP
Дата: Среда, 13.04.2016, 10:42 |
Сообщение № 6
Группа: Проверенные
Ранг: Старожил
Сообщений: 2369
Репутация:
486
±
Замечаний:
0% ±
2003-2010
У меня в В40, например, не открывает
У меня тоже. Имею ввиду твой вариант, Лен.
У меня в В40, например, не открывает
У меня тоже. Имею ввиду твой вариант, Лен.KuklP
Ну с НДС и мы чего-то стoим! kuklp60@gmail.com WM Z206653985942, R334086032478, U238399322728
Сообщение отредактировал KuklP - Среда, 13.04.2016, 10:43
Ответить
Сообщение У меня в В40, например, не открывает
У меня тоже. Имею ввиду твой вариант, Лен.Автор - KuklP Дата добавления - 13.04.2016 в 10:42
Pelena
Дата: Среда, 13.04.2016, 10:51 |
Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 19162
Репутация:
4412
±
Замечаний:
±
Excel 365 & Mac Excel
А я так пыталась [vba]Код
Range("B8:B34","B45:B56")
[/vba] не вышло
А я так пыталась [vba]Код
Range("B8:B34","B45:B56")
[/vba] не вышло Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение А я так пыталась [vba]Код
Range("B8:B34","B45:B56")
[/vba] не вышло Автор - Pelena Дата добавления - 13.04.2016 в 10:51
Nikolay86
Дата: Среда, 13.04.2016, 12:45 |
Сообщение № 8
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
If Not Intersect(Target, Range("B8:B34,B45:B56")) Is Nothing Then
Вот это работает как надо!)), странно, я вроде так пробовал и до открытия темы , но видимо где-то ошибся синтаксисе. Спасибо большое, задача решена.
If Not Intersect(Target, Range("B8:B34,B45:B56")) Is Nothing Then
Вот это работает как надо!)), странно, я вроде так пробовал и до открытия темы , но видимо где-то ошибся синтаксисе. Спасибо большое, задача решена.Nikolay86
Ответить
Сообщение If Not Intersect(Target, Range("B8:B34,B45:B56")) Is Nothing Then
Вот это работает как надо!)), странно, я вроде так пробовал и до открытия темы , но видимо где-то ошибся синтаксисе. Спасибо большое, задача решена.Автор - Nikolay86 Дата добавления - 13.04.2016 в 12:45