Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel & Макрос / 13 сообщений из 13, страница 1 из 1
13.09.2006, 21:58:36
    #33985582
Кризис жанра
Кризис жанра
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
как записать следующий макрос: изначально есть много однотипных экселевских файлов (их количество всегда меняется), в которых в одном и том же месте подводятся итоги (отдельной небольшой табличкой), эти итоги из каждого файла надо перенести в отдельный файл, в котором названия строк те же, что и в маленькой табличке , названия столбцов и исходных файлов совпадают, в этом отдельном файле планируется кнопка, при нажатии макрос начинает работать: открывает исходные файлы и записывает из них информацию.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.09.2006, 22:26:01
    #33985612
KL (XL)
KL (XL)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
задача резко упростится, если ты выставишь образцы исходного и конечного файлов, а также пояснишь как размещены файлы на диске(ах) и др. на твое усмотрение ;-)

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.09.2006, 08:34:13
    #33985891
vbapro
vbapro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
записать как и написал, по порядку - открыл, скопировал, вставил, закрыл. Код для открытия всех книг по очереди из папаки где-то в форуме есть. Если есть навык программирования, то задача несложная. Но одним макрорекордером не обойтись.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.09.2006, 10:35:00
    #33986216
Поиск на... !
Поиск на... !
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
Стабильно раз в неделю задается этот вопрос, мля...
Пользуйтесь поиском!

К модыратырам: мож в фак это запихать чтоб отсылать на него?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.09.2006, 10:39:20
    #33986226
Ivan33
Ivan33
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
Поиск на... !Стабильно раз в неделю задается этот вопрос, мля...
Пользуйтесь поиском!

К модыратырам: мож в фак это запихать чтоб отсылать на него?
так в фак надо статью писать, напишешь или ругаться будешь?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.09.2006, 11:47:28
    #33986484
Поиск на... !
Поиск на... !
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
Ivan33 Поиск на... !Стабильно раз в неделю задается этот вопрос, мля...
Пользуйтесь поиском!

К модыратырам: мож в фак это запихать чтоб отсылать на него?
так в фак надо статью писать, напишешь или ругаться будешь?Чего прям так писать? И куда ее потом засылать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.09.2006, 12:06:29
    #33986542
Поиск на... !
Поиск на... !
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
О! Типа нарыл... "Предложить факу" называеца...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.09.2006, 15:46:15
    #33987763
treiber
treiber
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
Поиск на... !О! Типа нарыл... "Предложить факу" называеца...Ну что - отправил?
Я правда в разделе FAQ не смог найти FAQ-Excel .
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.09.2006, 09:52:01
    #33989222
Ivan33
Ivan33
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
treiber Поиск на... !О! Типа нарыл... "Предложить факу" называеца...Ну что - отправил?
Я правда в разделе FAQ не смог найти FAQ-Excel . http://www.sql.ru/faq/faq.aspx?id=105000
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.09.2006, 10:32:12
    #33989338
Taranaga
Taranaga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
Кризис жанракак записать следующий макрос: изначально есть много однотипных экселевских файлов (их количество всегда меняется), в которых в одном и том же месте подводятся итоги (отдельной небольшой табличкой), эти итоги из каждого файла надо перенести в отдельный файл, в котором названия строк те же, что и в маленькой табличке , названия столбцов и исходных файлов совпадают, в этом отдельном файле планируется кнопка, при нажатии макрос начинает работать: открывает исходные файлы и записывает из них информацию.
Вот так перебирать файлы в директории:
Taranaga Нас часто спрашивают как открыть кучу файлов из дирректории...
Отвечаем.

В Екселевском VBA есть функция Dir - она нам помогает работать с файлами.
Хелп нам дает следующие примеры для работы:
help
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
' Display the names in C:\ that represent directories.
MyPath = "c:\"    ' Set the path.
MyName = Dir(MyPath, vbDirectory)    ' Retrieve the first entry.
Do While MyName <> ""    ' Start the loop.
    ' Ignore the current directory and the encompassing directory.
    If MyName <> "." And MyName <> ".." Then
        ' Use bitwise comparison to make sure MyName is a directory.
        If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
            Debug.Print MyName    ' Display entry only if it
            'ЗДЕСЬ РИСУЕМ ОБРАБОТЧИК ОТКРЫТИЯ ФАЙЛА И КОПИРОВАНИЯ ИНФОРМАЦИИ ИЗ НЕГО
        End If    ' it represents a directory.
    End If
    MyName = Dir    ' Get next entry.
Loop
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.09.2006, 00:39:39
    #33991654
Кризис жанра
Кризис жанра
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
KL (XL)
Есть файлы, допустим, в папке D:\Data\ , название и количество которых все время меняется (в папке находятся только нужные файлы). В каждом файле на листе " ИТОГИ " есть нужная таблица, допустим, ячейки A20:F25 .
Нужно из всех этих файлов итоги (ячейки A20:F25) скопировать в один файл на один лист, т.е. друг за другом в единую таблицу.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.09.2006, 02:21:38
    #33991693
KL (XL)
KL (XL)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
Вариант 1 (не открывая файлов):
http://www.rondebruin.nl/ado.htm#folder

Вариант 2:
http://www.rondebruin.nl/copy3.htm#Range

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.09.2006, 02:25:54
    #33991694
KL (XL)
KL (XL)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel & Макрос
P.S.: В кодах указанных выше надо лишь заменить путь к папке и координаты копируемого ранга.

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel & Макрос / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 277ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2184279]:
 0ms
get settings:
 5ms
get forum list:
 8ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 30ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 27ms
get tp. blocked users:
 1ms
others: 193ms
total:  277ms
x
x
Закрыть


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