|
|
|
вроде простенький макрос в Excel
|
|||
|---|---|---|---|
|
#18+
Помогите, плз новичку. Надо написать макрос, с помощью которого: 1. Найти слово"итого" (именно найти его т.к оно может оказаться совсем не в 25 строке, но всегда в столбце С) 2. Выше слова "итого"вставить 2 пустые строчки 3. Скопировать 13 и 14 строчки в эти пустые. 4. Скрыть строки с 11 по 18. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.09.2006, 10:52:47 |
|
||
|
вроде простенький макрос в Excel
|
|||
|---|---|---|---|
|
#18+
macrosSub macro1() Dim i As Integer Cells.Find(What:="Итого", LookAt:=xlPart).Activate i = ActiveCell.Row Rows(i + 1 & ":" & i).Insert Shift:=xlDown Rows("13").Copy Rows(i).Select ActiveSheet.Paste Rows("14").Copy Rows(i + 1).Select ActiveSheet.Paste Application.CutCopyMode = False Rows("11:18").EntireRow.Hidden = True End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.09.2006, 11:17:14 |
|
||
|
вроде простенький макрос в Excel
|
|||
|---|---|---|---|
|
#18+
Можно циклом по столбцу на поиск значения в ячейке, после того как нашли - стандартная процедура ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.09.2006, 11:21:24 |
|
||
|
вроде простенький макрос в Excel
|
|||
|---|---|---|---|
|
#18+
Если слово "Итого" встречается один раз, то имхо find'ом будет быстрее. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.09.2006, 11:29:53 |
|
||
|
|
start [/forum/topic.php?fid=61&msg=34014916&tid=2184215]: |
0ms |
get settings: |
8ms |
get forum list: |
19ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
38ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
59ms |
get tp. blocked users: |
2ms |
| others: | 218ms |
| total: | 363ms |
| 0 / 0 |
