Создание макросов - Microsoft Office Excel

Женечка2607 · 23.04.2009, 14:02

Нужно создать макрос, который ведет подсчет количества повторений текста в определенном столбце листа MS Excel

Женечка2607 · 23.04.2009, 14:08

Это все данные, которые есть...
Допустим есть столбец А, в нем текст:
Привет
Привет
Пока
Пока
Привет
Привет
Привет и т.д.

И нужно сосчитать колличество повторений, к примеру, слова привет. Ответ чтобы был внизу столбца...

EducatedFool · 23.04.2009, 15:55

Для таких случаев разработчики Excel придумали функцию СЧЁТЕСЛИ

Вставьте в ячейку формулу

Код:

=СЧЁТЕСЛИ(R[-8]C:R[-2]C;"Привет")

Или, что то же самое,

Код:

=СЧЁТЕСЛИ(A3:A9;"Привет")

Зачем макрос?

(добавлено)
Впрочем, если уж так надо, пожалуйста:

Код:

Sub СложнейшийМакрос()
    [a65000].End(xlUp).Offset(1) = WorksheetFunction.CountIf([a:a], "Привет")
End Sub

Женечка2607 · 23.04.2009, 21:17

Огромное спасибо

23.04.2009, 14:02	#1
Женечка2607 Регистрация: 23.04.2009 Сообщений: 4	Создание макросов Нужно создать макрос, который ведет подсчет количества повторений текста в определенном столбце листа MS Excel

23.04.2009, 15:55	#3
EducatedFool Программист VBA СуперМодератор Регистрация: 13.07.2008 Сообщений: 6,856	Для таких случаев разработчики Excel придумали функцию СЧЁТЕСЛИ Вставьте в ячейку формулу Код: `=СЧЁТЕСЛИ(R[-8]C:R[-2]C;"Привет")` Или, что то же самое, Код: `=СЧЁТЕСЛИ(A3:A9;"Привет")` Зачем макрос? (добавлено) Впрочем, если уж так надо, пожалуйста: Код: `Sub СложнейшийМакрос() [a65000].End(xlUp).Offset(1) = WorksheetFunction.CountIf([a:a], "Привет") End Sub` __Полезные надстройки для Excel. Парсинг сайтов и файлов. Макросы любой сложности на заказ. Мониторинг цен конкурентов Последний раз редактировалось EducatedFool; 23.04.2009 в 16:02.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Панель для макросов	shadowbeast	Microsoft Office Word	6	18.03.2009 21:09
Автоматический запуск макросов с листа на котором указан перечень макросов с параметрами и без	Neoli	Microsoft Office Excel	2	09.03.2009 14:31
Создание комплекта макросов для WORD	DrManual	Фриланс	4	14.02.2009 18:53
Сравнение макросов	valerij	Microsoft Office Excel	24	09.06.2008 00:57

23.04.2009, 14:08	#2
Женечка2607 Регистрация: 23.04.2009 Сообщений: 4	Это все данные, которые есть... Допустим есть столбец А, в нем текст: Привет Привет Пока Пока Привет Привет Привет и т.д. И нужно сосчитать колличество повторений, к примеру, слова привет. Ответ чтобы был внизу столбца...

23.04.2009, 21:17	#4
Женечка2607 Регистрация: 23.04.2009 Сообщений: 4	Огромное спасибо