Страницы: 1
RSS
Накопление информации из Сети с помощью Excel
 
В Microsoft Excel существует возможность извлекать данные из таблиц, размещенных в Сети через Данные->Импорт внешних данных->Создать веб-запрос.    
 
Можно ли в Excel вместо простого обновления таблиц из Сети, накапливать информацию? То есть, вместо того, чтобы перезаписывать данные поверх предыдущих, программа записывала бы их на строку ниже, затем ещё ниже и т.д. Например для создания архива курсов валют за определенный период времени. Каким образом можно достичь в программе подобного результата?
 
Это реализуется при помощи макросов.  
 
К тому же, Вам даже делать ничего не придётся.  
Достаточно хорошо поискать по форумам Excel - и найдёте готовые варианты.  
 
Такие темы попадаются время от времени.  
И всем надо как раз курсы валют.
 
{quote}{login=EducatedFool}{date=09.08.2009 10:49}{thema=}{post}Это реализуется при помощи макросов.  
 
К тому же, Вам даже делать ничего не придётся.  
Достаточно хорошо поискать по форумам Excel - и найдёте готовые варианты.  
 
Такие темы попадаются время от времени.  
И всем надо как раз курсы валют.{/post}{/quote}  
 
К сожалению, я не умею ничего писать на VBA, a мое знакомство с макросами ограничивается их записью. На этом форуме я не смог найти готовых решений, связанных с накоплением информации.  
 
Непонятно, также, как здесь могут помочь функции. Ведь Excel просто вставляет данные в заданном диапазоне. Нельзя ли поконкретнее, как  всё это можно реализовать?
 
{quote}{login=EducatedFool}{date=09.08.2009 10:49}{thema=}{post}  
Достаточно хорошо поискать по форумам Excel - и найдёте готовые варианты.  
{/post}{/quote}  
 
Пардон, прочитал, как "поискать по формулам".
 
Господа, пожалуйста не игнорируйте мою тему ибо она интересная.  
 
На этом форуме действительно существует только темы, связанные с добыванием и обновлением информации, но не с её накоплением. В прикрепленном файле содержится запрос цен на нефть марки Brent. Нужно организовать постоянно обновляемый архив этих цен. Для этого нужно смещать обновляемую информацию вниз, вместе с каждым обновлением. Этот форум наиболее крупный в Сети, поэтому я возлагаю на него большие надежды.
 
Совершенно ничего интересного, т к задача как таковая не поставлена. Более того, тема обсуждалась уже неоднократно.  
То, что вы попросили в последнем сообщении, решается тупой записью макроса.  
Вот "решение" элементарным добавлением строк с копированием/обновлением, макрос записан секунд за 30 человеком, который в макросах вообще не в зуб ногой.  
 
Sub Макрос1()  
'  
' Макрос1 Макрос  
'  
 
'  
   Rows("2:2").Select  
   Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove  
   Rows("2:2").Select  
   Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove  
   Range("A4:D5").Select  
   Range("D5").Activate  
   Selection.Copy  
   Range("A2").Select  
   ActiveSheet.Paste  
   Range("G2").Select  
   ActiveSheet.Paste  
   Range("A4:D5").Select  
   Range("D5").Activate  
   Application.CutCopyMode = False  
   Selection.QueryTable.Delete  
   Selection.ClearContents  
   Range("B3").Select  
   Selection.QueryTable.Refresh BackgroundQuery:=False  
   Range("B2").Select  
   Selection.QueryTable.Refresh BackgroundQuery:=False  
End Sub
Страницы: 1
Читают тему
Наверх
Loading...