|
|
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
Здравствуйте Подскажите плиз как проделать следующее: Нужно скопировать целиком активную строку в excel и присвоить её какой то переменной. после этого перейти на другой лист и вставить строку из этой переменной начиная с ячейки "A1" Если это делать обычным копированием и вставкой то всё замечательно получается: ActiveCell.Offset(0, 0).Rows("1:1").EntireRow.Copy ' копируем строку Sheets("33").Select Range("A1").Select ActiveSheet.Paste ' вставляем. , но нужно что бы вставлялось именно из переменной, а не из памяти. Какой переменной можно присвоить строку? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.11.2006, 14:19:35 |
|
||
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
Читай про параметр Destination у метода Copy. Не используй метод Select вообще. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.11.2006, 18:17:31 |
|
||
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
Dim str As String str = ActiveCell.Value Sheets("33").Range("A1") = str ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.11.2006, 18:17:42 |
|
||
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
ДмитDim str As String str = ActiveCell.Value Sheets("33").Range("A1") = str Всё не так просто... если если использовать вышепредложенный метод, то на лист "33" вставляется ТОЛЬКО ячейка "А1" а не вся строка целиком... как того бы хотелось:( ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2006, 08:08:02 |
|
||
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
jjj676 ДмитDim str As String str = ActiveCell.Value Sheets("33").Range("A1") = str Всё не так просто... если если использовать вышепредложенный метод, то на лист "33" вставляется ТОЛЬКО ячейка "А1" а не вся строка целиком... как того бы хотелось:( а что такое "вся строка целиком"?? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.11.2006, 06:37:12 |
|
||
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
Вся строка целиком это 256 ячеек начиная с "A" по "IV" Rows("1:1").Select ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.11.2006, 07:59:22 |
|
||
|
Скопировать строку в переменную
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. KL [MVP - Microsoft Excel] ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.11.2006, 10:36:45 |
|
||
|
|
start [/forum/topic.php?fid=61&msg=34131310&tid=2183911]: |
0ms |
get settings: |
8ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
208ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
29ms |
get tp. blocked users: |
1ms |
| others: | 206ms |
| total: | 474ms |
| 0 / 0 |
