Страницы: 1
RSS
Работа с xml
 
Есть екселевский файл,в котором есть данные по компам в сети (их много, поэтому и хочу автоматизировать). Есть прога которая собрала все данные по конфигурации железа и ПО, и сохранила для каждого компа свой xml файл, файл называется как комп. Можно ли как то сделать связку, чтобы например сначала значение ячейки где забито имя ПК сверялось с именем файла, и если совпадает, в эту строчку добавлялись нужные данные их этого XML файла, но не все, а именно определенные, такие как процессор, память и т.п.
 
можно
 
xml отлично открывается экселем. Как список. Получаете лист. Потом тяните из него все что душе угодно.  
Тема "как собрать из разных книг данные в одну" неоднократно обсуждалась на форуме.
Bite my shiny metal ass!      
 
можно и по другому  
данные-xml-и тд  
тоже обсуждалось
 
понятно что можно открыть в екселе xml файл, но был бы он один.... их штук 300 таких файлов. подскажите кто знает как связать имя файла со значением в ячейке екселя))) и подтянуть именно нужные данные из xml, а не все вподряд
 
Вот пример, перебирает все файлы папки. Добавь поиск нужных позиций в своём сводном файле.  
 
Sub tt()  
Const fldr = "C:\temp\"         ' Путь к папке с файлами  
strFile = Dir(fldr & "*.xls")  
Do While strFile <> ""          'Цикл по файлам  
   Set wb = Workbooks.Open(fldr & strFile, ReadOnly:=True)  
   For Each ws In wb.Worksheets    'цикл по рабочим листам файла  
       ws.UsedRange.Copy  
       wsSum.Range(ws.UsedRange.Address).PasteSpecial xlPasteValues, xlPasteSpecialOperationAdd, False, False  
   Next  
   wb.Close False  
   strFile = Dir  
Loop  
 
End Sub
 
{quote}{login=dm}{date=10.03.2010 02:12}{thema=}{post}понятно что можно открыть в екселе xml файл, но был бы он один.... их штук 300 таких файлов. подскажите кто знает как связать имя файла со значением в ячейке екселя))) и подтянуть именно нужные данные из xml, а не все вподряд{/post}{/quote}  
так я про это и писал  
ищущий да обрящет
Страницы: 1
Читают тему
Наверх