Есть текст в одной ячейке (одно или несколько предложений). Нодо подсчитать количество тех или иных букв с учетом регистра. Т.е. букв А = 3 шт, а = 52 шт, Б = 5 шт, б = 62 шт. и т.д.

Имею проблему: надо переписать массив в столбик по шаблону ""№ строки_значение_№ столбца"" (см. пример). Как сие это сделать? (и возможно ли)  
Заранее БЛАГОДАРЕН!!!  
Егор.

Уффф! Вопрос разрешен. Ответ лежит в использовании функции ГПР. Не сильно рационально, но работает. Изучение доп. средств не потребовалось.

{quote}{login=VovaK}{date=26.12.2009 07:17}{thema=}{post}Хорошо, я попытаюсь Вам помочь. Но последним файлом Вы меня запутали - в первом варианте все было понятно - опросить все файлы с указанными именами дат и скопировать A17. Теперь у Вас в одном месте A17 в другом B17.    
Для отладки нужны файлы дат - выложите их пожалуйста (достаточно 2 шт).  
Задача для меня новая, полагаю быстро не получится, наберитесь терпения.  
Владимир.{/post}{/quote}  
ПАСИБО ЗА УЧАСТИЕ!  
Вопрос решился! Если есть интерес, могу поделиться результатами. Пишите:

{quote}{login=VovaK}{date=25.12.2009 09:44}{thema=}{post}Пожалуйста сохраните файлы в формате 2003.    
И ответьте пожалуйста на вопрос - это Вам для работы или из спортивного интереса?{/post}{/quote}  
Для работы. Притомился руками лазить и копировать данные. И без того много другой бухгалтерской работы имеется. Но имею и "спортивный интерес" (люблю разбираться в непонятном)

Приношу ИЗВИНЕНИЯ за некорректную подачу данных. Исправился.

Доброго времени суток! Имею проблему: в разных директориях(“1й склад”, “2й склад”, “3й склад”, “4й склад”, “5й склад”) находятся c одинаковым именем (по дате) файлы. Требуется : в единый файл (all.xlsm) скопировать данные из определенных ячеек из фалов (находящихся в подкаталогах) за определенный период дату (который вводится в ячейки “B1” и “С1” файла “all.xlsm”) . Полагаю, что решение лежит в поле макросов. Но как ??? Заранее благодарен за помощь. Егор Третеков. <BR><STRONG>Файл удален</STRONG> - велик размер. [Модераторы]

{quote}{login=Марчук}{date=14.12.2009 09:01}{thema=}{post}Sheets().COPY After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count){/post}{/quote}  
А как же ж быть со вторым-с пунктом-с??? ;(((

Из нескольких EXCEL Документов(файлов) надо копировать определенные листы полностью в общий Документ, а некоторые (листы) на определённую позицию общего Документа. Как поступить???  
НАДО:  
1. из файлов 1й склад.xlsm и 2й склад.xlsm в файл ALL.xlsm скопировать на листы “1й склад”  и “2й склад” листы “1й склад”  и “2й склад” соответственно ( со всей структурой листа исходника).  
(см. Прилоджение)  
2. из файлов 1й склад.xlsm и 2й склад.xlsm в файл ALL.xlsm скопировать на листы “Отгруженный товар ” и “Оприходованный товар ” соответствующие таблицы (из  1.xlsm и 2.xlsm). Причем, количество строк в таблице “Отгруженный товар ” (“Оприходованный товар ”) в исходных файлах (1.xlsm и 2.xlsm) может меняться (т.е. много записей или мало)  
(см. Прилоджение)  
3. Требуется реализовать окно выбора фалов, т.к. имена файлов ежеквартально меняются.    
Маска имени файла: “2й склад_(ДАТА).xlsm”  (“1й склад_(ДАТА).xlsm”).  
(см. Прилоджение)  
Решая подобную задачу, нашел макрос (http://www.planetaexcel.ru/tip.php?aid=111), но не совсем подходит. Он (макрос) после выбора нужных файлов для выбора просто переносит листы (порождая новые),  а надо чтобы копировал. Проблему №2 он вообще не решает.  
Ниже привожу указанный выше макрос. Изменил лишь маску файлов на *.xlm.  
Sub CombineWorkbooks()      
   Dim FilesToOpen      
   Dim x As Integer      
   On Error GoTo ErrHandler      
   Application.ScreenUpdating = False      
   FilesToOpen = Application.GetOpenFilename _      
                 (FileFilter:="Microsoft Excel Files (*.xlm), *.xlm", _      
                  MultiSelect:=True, Title:="Files to Merge")      
   If TypeName(FilesToOpen) = "Boolean" Then      
       MsgBox "Не выбрано ни одного файла!"      
       GoTo ExitHandler      
   End If      
   x = 1      
   While x <= UBound(FilesToOpen)      
       Workbooks.Open Filename:=FilesToOpen(x)      
       Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)      
       x = x + 1      
   Wend      
ExitHandler:      
   Application.ScreenUpdating = True      
   Exit Sub      
ErrHandler:      
   MsgBox Err.Description      
   Resume ExitHandler      
End Sub

Знатоки, подскажите:  
Есть ли в EXCEL какие-либо функции позволяющие записывать значения в фильтр (по даты) для формирования запросов в КУБ. Все функции КУБа (КУБЭЛЕМЕНТКИП, КУБЭЛЕМЕНТ, КУБСВОЙСТВОЭЛЕМЕНТА, КУБПОРЭЛЕМЕНТ, КУБМНОЖ, КУБЧИСЛОЭЛМНОЖ, КУБЗНАЧЕНИЕ) только ВОЗВРАЩАЮТ то или иное значение.  
Подробно: есть таблица (отчет продаж товара), построенная на основе КУБа (КУБЭЛЕМЕНТА). В качестве фильтра выбрана ДАТА. При обновлении этой таблицы (отчета) приходится каждый раз выбирать нужную ДАТУ (сдвигать её на один день вперед).    
Вопрос: имеется ли возможность в EXCELе просто с клавиатуры записывать дату в какую-нить ячейку и тем самым перестраивать фильтр по ДАТЕ (в КУБЕ)    
С Уважением.  
Егор Третеков.