ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Копировать часть активный строку в другой лист
6 сообщений из 6, страница 1 из 1
Копировать часть активный строку в другой лист
    #38620350
proqasd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
proqasd
Гость
Эта команда копирует вся активную строку в другой лист.
Код: vbnet
1.
ActiveCell.EntireRow.Copy Sheets("Bufer").Rows(2)


А мне надо не всю строку, а какой то часть (напирмер начиная с A до G)
копировать. Как можно делать такое?
...
Рейтинг: 0 / 0
21.04.2014, 13:23
| Ответить | Цитировать | Написать  
Копировать часть активный строку в другой лист
    #38620382
Фотография Surrogate
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Surrogate
Участник
можно попробовать так например
Код: vbnet
1.
Range("A1:G1").Copy Sheets("Bufer").Cells(21, 1)
...
Рейтинг: 0 / 0
21.04.2014, 13:44
| Ответить | Цитировать | Написать  
Копировать часть активный строку в другой лист
    #38620392
proqasd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
proqasd
Гость
Спасибо, но дело в том что я не знаю именно это 1-я строка или нет. Мне надо именно из активной строку копировать,
...
Рейтинг: 0 / 0
21.04.2014, 13:51
| Ответить | Цитировать | Написать  
Копировать часть активный строку в другой лист
    #38620412
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Код: vbnet
1.
Range(Cells(ActiveCell.Row,1),Cells(ActiveCell.Row,7)).Copy


как-то так, не проверял
...
Рейтинг: 0 / 0
21.04.2014, 14:01
| Ответить | Цитировать | Написать  
Копировать часть активный строку в другой лист
    #38620744
Казанский
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Казанский
Гость
Еще несколько вариантов
Код: vbnet
1.
2.
3.
4.
Cells(ActiveCell.Row, 1).Resize(, 7).Copy
Range("A1:G1").Offset(ActiveCell.Row - 1).Copy
Intersect(Range("A:G"), ActiveCell.EntireRow).Copy
i = ActiveCell.Row: Range("A:G " & i & ":" & i).Copy
...
Рейтинг: 0 / 0
21.04.2014, 18:01
| Ответить | Цитировать | Написать  
Копировать часть активный строку в другой лист
    #38620751
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
 
КазанскийЕще несколько вариантов
ты забыл вариант
Код: vbnet
1.
Msgbox "Пожалуста, выделите нужный диапазон и скопируйте в новое место"
...
Рейтинг: 0 / 0
21.04.2014, 18:07
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Копировать часть активный строку в другой лист
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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