Модераторы: mihanik
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> помогите написать скрипт поиска в Excel, чайник в этой области, нужна помощь 
V
    Опции темы
iPlay
Дата 19.10.2008, 14:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 23.9.2007

Репутация: нет
Всего: 1
Здраствуйте, короче есть проблема у меня есть ексель файл с таблицей маршрутов в ней мне нужно найти в этой таблице вхождения заданых мною маршрутов. Помогите плиз сделать на VBA я сам неочень в VBA разбираюсь просто очень нужно в отчет сделать а то замучаюсь пересчитывать.

Вот ссылка на Екселевский файл с небольшим пояснением скачать тут

Совмсем забыл мне нужно знать не значение этих ячеек а их адрес в текущей таблице.

Это сообщение отредактировал(а) iPlay - 19.10.2008, 14:52
PM MAIL   Вверх
Staruha
Дата 20.10.2008, 12:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1292
Регистрация: 1.2.2004
Где: Казань

Репутация: 13
Всего: 27
for each
  for i:=1 to lenght(string)
находишь что нужно
делаешь что нужно
next


--------------------
Возмездие настигнет
PM MAIL   Вверх
FINANSIST
Дата 20.10.2008, 14:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Статус: Жив
**


Профиль
Группа: Участник
Сообщений: 526
Регистрация: 11.4.2008
Где: Москва

Репутация: 13
Всего: 23
Пояснение:"потому что в этих ячейках присутствую числа 1-2 и 1-2-3  единички нету но единичка какбы берется из номера строки"
Расшифруй свой хеш, а то ничего непонятно.
Какбы единички какие-то, в чём проблема-то?

Код

dim massAddr as string
dim x as integer
for each cll in selection.cells
if cll.value = "КАКБЫ ЕДИНИЧКИ,ТОКА ИХ НЕТУ" then
x =x +1
'ЗАПОЛНЯЕМ МАССИВ АДРЕСАМИ
redim preserve massAddr (x)
massAddr (x) = cll.address
debug.print x & "-" & massAddr (x)
end if
next cll


Это сообщение отредактировал(а) FINANSIST - 20.10.2008, 14:50


--------------------
“...Брали корову рыжую одну, отдавать будем корову рыжую одну, чтобы не нарушать отчетности”
Эдуард Успенский, “Каникулы в Простоквашино”
PM MAIL ICQ   Вверх
iPlay
Дата 20.10.2008, 17:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 23.9.2007

Репутация: нет
Всего: 1
Всем спасибо за идеии, разобрался.
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела

Если Вам понравилась атмосфера форума, заходите к нам чаще!
С уважением mihanik и staruha.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программирование, связанное с MS Office | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0411 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.