Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Господа всем добрый вечер! / 4 сообщений из 4, страница 1 из 1
27.02.2007, 20:09:31
    #34358903
Lenus
Lenus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Господа всем добрый вечер!
как можно выполнить задачу след. содержания:
произвести статистику учета товара. вот мой макросик, но кол-во строк в накл. может меняться и к тому же макросик записывает данные в строку, а хотелось бы чтобы сумма и кол-во шт были бы напротив друг друга.
вот мой пример, но как то криво выполнен.
всем заранее спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.02.2007, 11:42:16
    #34360010
Lenus
Lenus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Господа всем добрый вечер!
ГОСПОДА ! КАК МОЖНО ИСПРАВИТЬ ОШИБКУ В ЭТОМ КОДЕ ?
№ ОШИБКИ 1004

Sub dfsdfds()
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name <> "Tabelle3" Then
ws.Range("D24:P34").Copy Destination:=Worksheets("Tabelle3").Range("A1").End(xlDown).Offset(1, 0)
End If
Next
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.02.2007, 12:32:43
    #34360218
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Господа всем добрый вечер!
LenusГОСПОДА ! КАК МОЖНО ИСПРАВИТЬ ОШИБКУ В ЭТОМ КОДЕ ?
№ ОШИБКИ 1004

Sub dfsdfds()
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name <> "Tabelle3" Then
ws.Range("D24:P34").Copy Destination:=Worksheets("Tabelle3").Range("A1").End(xlDown).Offset(1, 0)
End If
Next
End Sub
плиз дайте подсказку!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.02.2007, 12:34:04
    #34360225
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Господа всем добрый вечер!
лист пустой, наверное
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Господа всем добрый вечер! / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 307ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2183367]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 54ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 24ms
get tp. blocked users:
 1ms
others: 198ms
total:  307ms
x
x
Закрыть


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