| 0
- 05.07.2012 - 10:12
|
Задача: в обработке выгрузки в эксель необходимо определенную строку скопировать полностью и вставить ее ниже. Код не могу найти, помогите!
    | |
| 1
- 05.07.2012 - 10:28
| через "запись макроса" проделай все необходимые действия, останови запись макроса, глянь его код... | |
| 2
- 05.07.2012 - 10:39
| Если строка "определенная", что мешает её дважды выгрузить? | |
| 3
- 05.07.2012 - 10:41
|
Гляжу: Rows("17:17").Select Selection.Copy Rows("19:19").Select Selection.Insert Shift:=xlDown в 1С я соответственно пишу: ТекЛистКниги.Rows("17:17").Select(); ТекЛистКниги.Selection.Copy(); ТекЛистКниги.Rows("19:19").Select(): ТекЛистКниги.Selection.Insert(); выдает ошибки "Обнаружено логическое завершение исходного текста модуля" | |
| 4
- 05.07.2012 - 10:45
| 2 - Валерий, дело в том, что эксель - это шаблон, в котором есть подвал (его трогать нельзя), подвал начинается, допустим, с 25-й строки. Мне нужно сдвигать строки подвала на столько, сколько строк буду заполнять, т.е. если строк 30, значит подвал пойдет с 31-й строки. | |
| 5
- 05.07.2012 - 10:49
| http://www.sql.ru/forum/actualthread.aspx?tid=328159 | |
| 6
- 05.07.2012 - 10:50
|
3 - у меня косяк в строке ТекЛистКниги.Selection.Insert(); Как правильно закодировать Selection.Insert Shift:=xlDown ? | |
| 7
- 05.07.2012 - 11:06
|
(6) При редактировании макроса есть справка по VBA. И поиск по ней. Это - константа. Значение xlDown = -4121 В коде все имена констант подменяешь их числовыми значениями (не "xlDown", а "-4121"). | |
| 8
- 05.07.2012 - 11:13
| Спасибо! | |
Интернет-форум Краснодарского края и Краснодара |
