Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Selection.Insert Shift:=xlDown - Странное поведение / 14 сообщений из 14, страница 1 из 1
07.02.2013, 19:41
    #38142442
RegisteredUser
RegisteredUser
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
У меня опредлен Range - это фактически ячейка "А44"

Код: vbnet
1.
2.
3.
4.
5.
Range(rgBo).Select ' активирую Range
Rows(Range(rgBo).Row & ":" & Range(rgBo).Row + 6).Select ' выделяю 6 строк ниже Range
Selection.Insert Shift:=xlDown ' делаю вствка 6 пустых строк
Range("B44").Select ' <--- дальше операторы не выполняются вообще
...



ошибки нет, строки вставляются, НО после Selection.Insert Shift:=xlDown ничего не выполняется.
ПОЧЕМУ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2013, 20:28
    #38142477
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
Все выполняется, но Вы, наверно, не видите, т.к. строки смещаются за видимую область.
После вставки строк ячейка А44 становится ячейкой А51.
Можно без селектов:
Код: vbnet
1.
Range(rgBo).Resize(7).EntireRow.Insert
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2013, 20:51
    #38142498
RegisteredUser
RegisteredUser
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
вот вы мне не верите
Код: vbnet
1.
2.
3.
        MsgBox "Before Insert"
        Range(rgBo).Resize(7).EntireRow.Insert
        MsgBox "After Insert"



а я вот второго MsgBox НЕ ВИЖУ.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2013, 20:56
    #38142501
RegisteredUser
RegisteredUser
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
вот мой тестовый файл
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2013, 21:50
    #38142537
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
Все работает, второй msgbox появляется.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2013, 22:31
    #38142574
RegisteredUser
RegisteredUser
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
КазанскийВсе работает, второй msgbox появляется.
прикалываетесь ??? )))
хоть бери и видео снимай
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.02.2013, 23:00
    #38142597
Казанский
Казанский
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
Тут правда все просто, нечему не работать :)
Вот мои скриншоты.
Перезагрузите комп, проверьте, нет ли каких хитрых надстроек в Excel, попробуйте на другом компе.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.02.2013, 00:44
    #38142704
RegisteredUser
RegisteredUser
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
на другом компе заработало, НО как-то нестабильно!
видать есть какая-то загогулина
если найду - отпишусь еще
спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.10.2013, 16:39
    #38441592
dio-sun
dio-sun
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
Коллеги, добрый день.
Подтверждаю проблему.
У меня Excel for Mac 14.3.7.
На прошлой неделе обновился до 14.3.8 и возникла проблема с макросом, где есть строка
Selection.Insert Shift:=xlDown
Макрос после выполнения данной строки просто прекращает работу без каких-либо ошибок.
До версии 14.3.6 все работало. Не уверен, после какого обновления (3.7 или 3.8) она появилась.
Но явно ошибка после обновления.
Криворуким, кто это сделал, хочется передать привет. Даже на MacOS меня достали :(
Подскажите, пожалуйста, какой другой синтаксис этой команды можно использовать (или аналог), чтобы попробовать избежать проблему?
Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.10.2013, 23:39
    #38441989
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
dio-sunУ меня Excel for MacЗдесь как-то больше мелкомягкие офисники собираются, о чем и говорится в названии раздела...

Впрочем, попробуйте сделать без Select/Selection (указав сам объект), и без параметра Shift (xlShiftDown по умолчанию подставляется).
С другой стороны, определитесь - вы вставляете целые строки или всё же ячейки со сдвигом? Иначе так - какая область в момент исполнения определена как Selection ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.10.2013, 09:42
    #38442109
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
 
AndreTMбольше мелкомягкие офисники
ты будешь смеяться, но экслель для мака тоже от мелкомягких
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.10.2013, 16:31
    #38443797
dio-sun
dio-sun
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
AndreTMdio-sunУ меня Excel for MacЗдесь как-то больше мелкомягкие офисники собираются, о чем и говорится в названии раздела...

Впрочем, попробуйте сделать без Select/Selection (указав сам объект), и без параметра Shift (xlShiftDown по умолчанию подставляется).
С другой стороны, определитесь - вы вставляете целые строки или всё же ячейки со сдвигом? Иначе так - какая область в момент исполнения определена как Selection ?
Да, Excel у меня самый что ни на есть от Microsoft. И ошибка касается всех, думаю. Они умудряются косячить на всех системах сразу.
Я вставляю часть строки (ячейки со сдвигом вниз). Не всю строку. То есть в момент вставки определена область в 6 колонок, одна строка.
Не работает вариант не указывать параметр. Все равно на нем делается halt. Макрос примитивный.

Range("A4:G4").Select
Selection.Copy
Range("A5").Select
Selection.Insert Shift:=xlDown
'строки ниже уже не исполняются.
Range("B5").Select
ActiveCell.FormulaR1C1 = Now()
Range("C5").Select
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.10.2013, 23:57
    #38444262
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
Ну, не знаю... Под Win - исполняются.

Тут, наверное, какое-то дело в особенностях взаимодействия Selected Range. Ведь .Copy без параметра - оставляет выделение для .CutCopyMode, и .Insert может не понять, к какой из областей относиться...
Может, всё-таки перепишете без Select/Selection?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.04.2014, 14:59
    #38606465
Sergij Gromov
Sergij Gromov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Selection.Insert Shift:=xlDown - Странное поведение
Колеги, подскажите плиз,

я выделяю строку, хочу добавить строку с содержанием (тексты, форматироание, цвета и пр.) идентичные выделенному диапазону.

Однако как ни стараюсь - добавляется строка идентичная до или после выделенной ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Selection.Insert Shift:=xlDown - Странное поведение / 14 сообщений из 14, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 465ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2174127]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 56ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 54ms
get tp. blocked users:
 2ms
others: 307ms
total:  465ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]