Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Поиск информации в документе

Ответить
Настройки темы
VBS/WSH/JS - Поиск информации в документе

Новый участник


Сообщения: 26
Благодарности: 0

Профиль | Отправить PM | Цитировать


Вложения
Тип файла: xls инв.xls
(21.0 Kb, 5 просмотров)
Здравствуйте!
Помогите с написанием скрипта или bat.
Задача:
в файле xls необходимо найти данные с листа "инв" в листе "ALL" по 4-му столбцу (инвентарный номер), при совпадении номеров отметить их цветом (в обоих листах), и затем данные ячейки из столбца №8 страници "инв" скопировать в аналогичную ячейку страницы "ALL" (фамилии).

ЗЫ: объем информации очень большой поэтому прошу помощи.

Отправлено: 08:10, 08-06-2011

 

Новый участник


Сообщения: 26
Благодарности: 0

Профиль | Отправить PM | Цитировать


Есть решение с помощью макроса Exсel, но хотелось бы сделать унифицированный обработчик, (выбор файла, кол-во строк проверки, указание какие данные искать):

Sub ìàê1()
'
'
For i = 1 To 405 Step 1
j = "D" + LTrim(Str(i))
For c = 1 To 423 Step 1
j1 = "D" + LTrim(Str(c))
If Worksheets("èíâ 2009").Range(j).Value = Worksheets("ALL").Range(j1).Value Then
Worksheets("ALL").Range("H" + LTrim(Str(c))).Value = Worksheets("èíâ 2009").Range("H" + LTrim(Str(i))).Value
Sheets("èíâ 2009").Select
Worksheets("èíâ 2009").Range(j).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = -0.499984740745262
.PatternTintAndShade = 0
End With
Sheets("ALL").Select
Worksheets("ALL").Range(j1).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = -0.499984740745262
.PatternTintAndShade = 0
End With
End If
Next c
Next i
End Sub

Отправлено: 05:59, 09-06-2011 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Новый участник


Сообщения: 26
Благодарности: 0

Профиль | Отправить PM | Цитировать


Так никто и не подскажет?

Отправлено: 14:18, 14-06-2011 | #3



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Поиск информации в документе

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Законы | Новая редакция ФЗ "Об информации, информатизации и защите информации" ArtemD Защита компьютерных систем 2 31-07-2006 11:58
гиперссылки в XML-документе unknown Вебмастеру 3 22-06-2006 15:09
Поиск потерянной информации в ХР Kel2 Microsoft Windows 2000/XP 4 06-06-2006 16:22
Ненужные строки в документе.... Maxximus Хочу все знать 11 21-04-2003 19:50




 
Переход