1. 
   Загрузить данные с сервера за этот год (адрес сервера в файле приложения)
   

При загрузке выбрать Преобразовать и поставить фильтр по дате больше 01.01.2023

Использовать файл КР_1

2. Написать макрос 1 для расчета комбинированного идентификатора Инструмент_Дата

3.   Если нет справочника инструментов, то сформировать справочник финансовых инструментов компаний ( поле CompanyInstrument) лист Ref_ CompanyInstrument

2. 
   На листе 2 ( уже сделано на КР)
   
   1. 
      поле со списком на основе справочника финансовых инструментов 
      
   2. 
      таблицу 1 с результатами выбора итогов торгов по одному финансовому инструменту (поля LegalClosePrice) по датам
      
   3. 
      Написать макрос 2 для формирования списка уникальных дат
      
   4. 
      Написать макрос 3 для обновления ряда цен (расширить на новые даты)
      
   5. 
      Адаптировать макрос задания 13 для оценки параметров тренда и построения графика
      

Справочные материалы
Объявление переменных

Sub Getdata2()

Dim row1, row2

Dim adr1, adr2 As String

Присвоение переменным значений

Range(Selection, Selection.End(xlDown)).Select

row1 = Selection.Rows.Count
Использование значений переменных в адресе

adr1 = "rz1!R1C1:R" & row1 & "C5"

adr2 = "A1:E" & row1

ActiveCell.Range(adr2).Select

Selection.Copy
Организация цикла



i = 1
While Not i > row1
Cells(i + 5, 3).FormulaR1C1 = "=RC[-2]-R5C1"
i = i + 1
Wend
Определение параметров через InputBox
Application.InputBox ( Prompt , Title , Default , Left , Top , HelpFile , HelpContextID , Type )

---

Смотрите также файлы

• Название культуры, история открытия и изучения арх. Памятников.docx

• Тест по теме Getting about town.docx

• Наша страна Россия.docx

• Стратегии развития Рунета Подготовила Пчелина Варвара, студентка группы Ю0322б.pptx

• Внеооротные активы нематериальные активы.docx