ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Объединение
5 сообщений из 5, страница 1 из 1
Объединение
    #33541963
Guell
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Guell
Гость
Помогите, плиз.
Есть 3 файла xls. В каждом 2 столбца: названиие, сумма. Пример:
1) а 100 2) а 50 3) а 50
б 200 в 20 б 20
в 50 д 30 д 50
г 50 г 20
е 40
Нужно объединить все три, и чтобы у повторяющихся суммировался результат.
Спасибо зарание, уважаемые
...
Рейтинг: 0 / 0
13.02.2006, 20:07:27
| Ответить | Цитировать | Написать  
Объединение
    #33542106
Guell
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Guell
Гость
Извините, за поспешность

Есть 3 файла xls. В каждом 2 столбца: название, численное значение. Пример:
а-5, б-4, в-12, г-5, д-3
а-9, б-1, д-5, е-7
а-1, е-3, г-5, ж-16

Нужно объединить все три файла, и чтобы у повторяющихся суммировался результат.
Спасибо заранее, уважаемые
...
Рейтинг: 0 / 0
13.02.2006, 21:59:56
| Ответить | Цитировать | Написать  
Объединение
    #33542159
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
Склеиваешь через Ctrl+C, Ctrl+V все три диапазона, получишь один длинный список с повторениями. Потом делаешь по длинному списку сводную таблицу.
...
Рейтинг: 0 / 0
13.02.2006, 22:53:57
| Ответить | Цитировать | Написать  
Объединение
    #33542887
Guell
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Guell
Гость
White Owl, СПАСИБО. Но, это пример я привел. На самом деле значений очень много в каждом файле и надо каждый день такое действие производить. Руками перетаскивать замучиешься. Думаю без кода не обойтись. У самого не получается,- знаний мало. А времени нет. Помогите, плиз
...
Рейтинг: 0 / 0
14.02.2006, 11:13:25
| Ответить | Цитировать | Написать  
Объединение
    #33544630
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
сделай книгу в которой будут два листа, с именами CombinedRanges и Pivot. Наполняешь CombinedRanges вручную один раз. На листе Pivot делаешь сводную таблицу на основе колонок из CombinedRanges. Кладешь в эту же книгу макрос с примерно таким кодом:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
dim r as Range
ThisWorkbook.Worksheets("CombinedRanges").UsedRange.Clear
set r = ThisWorkbook.Worksheets("CombinedRanges").Range("A1")

Workbooks.Open("firstbook")
ActiveSheet.UsedRange.Copy Destination:=r
ActiveWorkbook.Close SaveCahnges:=false

set r = ThisWorkbook.Worksheets("CombinedRanges").Range("A1").End(xlDown).Offset( 1 , 0 )
Workbooks.Open("secondbook")
ActiveSheet.UsedRange.Copy Destination:=r
ActiveWorkbook.Close SaveCahnges:=false

set r = ThisWorkbook.Worksheets("CombinedRanges").Range("A1").End(xlDown).Offset( 1 , 0 )
Workbooks.Open("thirdbook")
ActiveSheet.UsedRange.Copy Destination:=r
ActiveWorkbook.Close SaveCahnges:=false

ThisWorkbook.Worksheets("Pivot").PivotTables( 1 ).RefreshTable
не проверял, так что может глючить. Бери напильник в руки и вперед.

Потом делаешь себе кнопку, подцепляешь ее к этому макросу и наслаждаешься.
...
Рейтинг: 0 / 0
14.02.2006, 18:47:47
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Объединение
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=33542106&tid=2185250]:
 0ms
get settings:
 11ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 45ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 37ms
get tp. blocked users:
 1ms
others: 203ms
total:  328ms
созд. / загр.: 328ms
x
x
Закрыть


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