Анализ данных одного файла Excel другим с помощью VB.

← →
Cheaterr (2005-08-24 00:19) [0]

Есть 2 файла: заказы и склад. В "заказах" мы записываем заказы наших клиентов. В "складе" уже есть информация по готовым моделям. В обоих файлах есть столбцы "Модель", "Комплектация", "Цвет". Необходимо сделать такую вещь! Заполняя файл заказы мы последовательно записываем Модель, затем Комплектацию и в самую последнюю очередь цвет. Необходимо, чтобы после того, как пользователь записал данные в столбце цвет, макрос залез в файл "склад" и там пробежался по столбцам модель и комплектация проверив нет ли такой же модели и комплектации уже готовой. Если такая модель и комплектация есть в файле склад, то необходимо проинформировать пользователя. Такую задачу можно выполнить средствами VB в Экселе? Если можно посдкажите код...

← →
TStas © (2005-08-24 00:31) [1]

Лет семь назад я вел бухгалтерию в связанных файлах экселя. ТО есть такую задачу ИМХО можно реализовать в экселе, но есть ексес

← →
Cheaterr (2005-08-24 00:34) [2]

Аксес есть, но нужно решить эту задачу в Экселе. Очень нужен код, хотя бы основные моменты.

← →
TStas © (2005-08-24 01:01) [3]

Этот макрос ищет в столбце начинающимся на А1 число 10 и
пишет в соседней с ней ячейке "Нашел"
Range("A1").Select
10 ActiveCell.Offset(rowOffset:=1, columnOffset:=0).Activate
x = ActiveCell.Value
If x = 10 Then GoTo 20
GoTo 10
20 ActiveCell.Offset(rowOffset:=0, columnOffset:=1).Activate
ActiveCell.Value = "Нашел"
End Sub

А этот открывает файл 1.xls вставляет содержимое буфера обмена и закрывавет его

Workbooks.Add
Workbooks.Open FileName:="C:\WINDOWS\Рабочий стол\file1.xls"
ActiveSheet.Paste
ActiveWorkbook.Save
ActiveWindow.Close

Больше ничего не подскажу, не помню просто

← →
TStas © (2005-08-24 01:12) [4]

Понимаю, что Вам нужно решить задачу, но для меня подобные эксеременты закончились изучением нормальных языков программирования к которым, ИМХО, visual basic не относится

← →
TUser © (2005-08-24 06:09) [5]

> Такую задачу можно выполнить средствами VB в Экселе?

Можно. Открыть второй файл (или он уже открыт) Workbooks.Add(), там сделать AutoFilter.

← →
Cheaterr (2005-08-24 21:29) [6]

2 TStas
Спасибо за код. Задача выполнена не совсем как я первоначалально описывал, но ваш код помог решить задачу несколько иначе.

Для таких вещей, мне кажется лучше посещать специализированные сайты. Например: http://am.rusimport.ru/MSAccess/default.aspx максимум информации!

>Cheaterr
На Visial basic"е я очень давно ничего не пробовал писать, пришлось искать в старом компьютере. Вообще Делфи позволяют подключить эксель как объект автоматизации и управлять им.

Анализ данных одного файла Excel другим с помощью VB. Найти похожие ветки