Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Протяжка формулы до последней заполненной строки / 15 сообщений из 15, страница 1 из 1
05.10.2009, 14:52:54
    #36232912
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
Здравствуйте.
Помогите, пожалуйста, вопрос в файле.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 14:55:40
    #36232923
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
2 Sebastian ,
А зачем ее тянуть макросом ? Протяните мышкой...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 15:01:19
    #36232941
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
Shift+Ctrl+End выделяет диапазон до конца.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 15:17:31
    #36233008
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
MaximuS_G 2 Sebastian ,
А зачем ее тянуть макросом ? Протяните мышкой...

Надо макросом.
Пожалуйста.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 15:46:51
    #36233122
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
2 Sebastian ,
Код: plaintext
1.
2.
3.
Sub ZachemMakrosom()
Cells(Selection.Row, Selection.Column).Copy
Selection.PasteSpecial
End Sub
Выделяете диапазон протяжения вместе с ячейкой которую надо протягивать...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 16:49:21
    #36233333
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
MaximuS_G 2 Sebastian ,
Код: plaintext
1.
2.
3.
Sub ZachemMakrosom()
Cells(Selection.Row, Selection.Column).Copy
Selection.PasteSpecial
End Sub
Выделяете диапазон протяжения вместе с ячейкой которую надо протягивать...

нет. вот я нашла макрос, но он для протаскивания по нескольким столбцам, а мне надо только по одному. Как его переделать?

Код: plaintext
1.
2.
3.
4.
Sub Macros1()
With Range("H7:J7")
.AutoFill Destination:=Range("H7:J" & .End(xlToLeft).End(xlDown).Row)
End With
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 16:52:57
    #36233353
А я думаю что "Да&q
А я думаю что "Да&q
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
LOL
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 16:59:35
    #36233375
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
А я думаю что "Да&qLOL

ЛОЛ — (англ. lol — «Laugh[ing] out loud») — громко хохотать. Как правило, используется для выражения комплимента к чувству юмора у собеседника. Нередко используется в спорах, как выражение неуважения к аргументам оппонента.

Я - чайник.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 17:01:23
    #36233382
Тоже чайник
Тоже чайник
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
Если Вы чайник, как же Вы так категоричеки отвергли мой макрос ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 17:20:00
    #36233444
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
Тоже чайникЕсли Вы чайник, как же Вы так категоричеки отвергли мой макрос ?

Потому, что для его использования надо предварительно выделять диапазон вручную, а мне это не подходит, т.к. этот макрос только часть другого, большего.
Извините за отнятое время.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 17:28:41
    #36233468
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
Что ж Вы так быстро обижаетесь ?...
надо предварительно выделять диапазон вручную, а мне это не подходит
Как Вы хотите указать программе диапазон протягивания ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 19:31:36
    #36233763
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
MaximuS_G,
Я не обижаюсь, просто у меня не получается. Я думала сделать по аналогии с тем образцом (.AutoFill Destination:=Range("H7:J" & .End(xlToLeft).End(xlDown).Row)), а не выходит, ну и вообще интересно как это можно сделать. А про ручные протяжки я знаю.

Очень нужен макрос для протяжки формулы до последней заполненной строки; строк м.б.разное количество,
Вот это и не получается
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 21:26:27
    #36233883
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
2 Sebastian ,
Ясно, ну тогда хорошо... Давайте, опишите по-конкретней еще раз что Вам нужно сделать, и где ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2009, 23:35:39
    #36234008
MaximuS_G
MaximuS_G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
Минут 40 сидел пока разобрался с этим методом...
Оказывается вот здесь:
F1expression.AutoFill(Destination, Type)
expression (объект range) должен быть первой ячейкой в массиве destination

Вот код:
Код: plaintext
1.
2.
3.
4.
5.
Sub Razobralsya()
With Worksheets("1")
Set SourceRange = .Range(Cells( 6 ,  4 ), Cells( 6 ,  4 ))
SourceRange.AutoFill Destination:=.Range(Cells( 6 ,  4 ), Cells(Cells( 6 ,  4 ).End(xlToLeft).End(xlDown).Row,  4 ))
End With
End Sub

Заполняются все ячейки в колонке 4 (D) по количеству рядов в колонке 3...
Ну вообщем если что я думаю уже сами переделаете :)

Разбирался также как и Вы могли... Но Вам тоже спасибо за побудительную причину :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.10.2009, 20:16:43
    #36236076
Sebastian
Sebastian
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Протяжка формулы до последней заполненной строки
MaximuS_G, спасибо.
Разобралась. Всё получилось.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Протяжка формулы до последней заполненной строки / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 547ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2178992]:
 0ms
get settings:
 9ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 197ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 63ms
get tp. blocked users:
 2ms
others: 235ms
total:  547ms
x
x
Закрыть


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