- Код: Выделить всё
S1.Cells(1, 1).Copy S1.Cells(5, 5)
- Код: Выделить всё
S1.Range("A1:C2").Copy S1.Range("B5")
...Гм. Пять минут назад Range глючил, а сейчас запустил - всё работает. Не понял.
Спасибо

S1.Cells(1, 1).Copy S1.Cells(5, 5)S1.Range("A1:C2").Copy S1.Range("B5")

qwertyhp писал(а):И ещё, забыл: как скопировать ячейку (диапазон ячеек) из одной закрытой книги в другую?

ActiveSheet.Range(Cells(1, 1), Cells(2, 3)).SelectСейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3