присвоить имя сектору / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / присвоить имя сектору

2 сообщений из 2, страница 1 из 1

присвоить имя сектору

#34870032

Suleyman

Гость

Я так понял что нужно присвоить имя сектору:
ActiveWorkbook.Names.Add Name:="ha", RefersToR1C1:= _
"='Sheet1'!R6C2:R8C7"
И потом возвращаться в этот сектор после копирования:
Application.Goto Reference:="ha"
Но ведь координаты R6C2:R8C7 все равно присутствуют, в этом то и проблема, одним
кодом, нужно в разные выделенные сектора вставлять данные из фиксированного
сектора, не присваивая каждый раз новое имя новому сектору перед копированием.

...

Рейтинг:

0 / 0

15.10.2007, 18:37

| Ответить | Цитировать | Написать

присвоить имя сектору

#34870260

White Owl

Участник

Сообщения: 12 726

Рейтинг: 0 / 0

Сектора это из другой области. То что ты имеешь в виду называют по русски областями или регионами. По английски Range.
"Возвращаться" в область не надо никогда, бессмысленно это.
Копировать из одной и той же области в разные места можно очень просто:

Код: plaintext

1.
2.
3.
4.

dim source_range as range
set source_range = worksheets("Sheet1").range("R6C2:R8C7")
source_range.copy destination:=worksheets("Sheet1).range("a1") ' первое копирование
source_range.copy destination:=worksheets("Sheet2).range("a1") ' второе копирование
source_range.copy destination:=worksheets("Sheet1).range("d100") ' третье копирование

Конечно знать адреса откуда и куда копировать все же нужно.

...

Рейтинг:

0 / 0

15.10.2007, 20:59

| Ответить | Цитировать | Написать

2 сообщений из 2, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / присвоить имя сектору

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&tid=2163257]:	0ms
get settings:	5ms
get forum list:	12ms
check forum access:	3ms
check topic access:	3ms
track hit:	136ms
get topic data:	10ms
get forum data:	2ms
get page messages:	43ms
get tp. blocked users:	1ms
others:	217ms

total:	432ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы