Как выгрузить котировки акций в excel

как в excel вывести котировки мосбиржи?

ВНИМАНИЕ! КОММЕНТАРИИ ПЕРВОГО УРОВНЯ В ВОПРОСАХ УПОРЯДОЧИВАЮТСЯ ПО ЧИСЛУ ПЛЮСИКОВ, А НЕ ПО ВРЕМЕНИ ПУБЛИКАЦИИ.

Почитайте статью на habr.com/ru/post/498268/, есть еще новые возможности в Excel для Microsoft 365. Если нужно могу то же скинуть пример получение котировок и много чего другого.

• 12 июня 2022, 09:46
• Ответить

Андрей, страница не найдена(

• 12 июня 2022, 09:56
• Ответить

Сергей Кузнецов, в ссылку добавилась запятая. Попробуйте так:

• 12 июня 2022, 10:16
• Ответить

Yury Agasiev, спасибо, открылось!

• 12 июня 2022, 10:31
• Ответить

Yury Agasiev, затрахали ссылки давать дайте формулу видел все эти ссылки открывается гугл страница по ссылкам там другая формула

• 12 июня 2022, 11:44
• Ответить

Андрей, Страница не найдена

• 12 июня 2022, 11:41
• Ответить

импортируйте туда csv файл, или вам онлайн надо ??

• 12 июня 2022, 02:01
• Ответить

квик умеет экспортировать в excel

• 12 июня 2022, 06:42
• Ответить

Проще простого)) конкретизируйте источник и состав данных, и половина задачи уже будет решена

• 12 июня 2022, 10:18
• Ответить

• 12 июня 2022, 12:01
• Ответить

В excel есть шикарный инструмент, power query. А у мосбиржи есть инструкция по api. Формируя разные ссылки, в соответствии с инструкцией по api и скармливая эти ссылки в качестве источника в power query можно добиться многого.

• 12 июня 2022, 23:18
• Ответить

в виде тьекста есть у когонить эта формула

• 12 июня 2022, 11:48
• Ответить

Только зарегистрированные и авторизованные пользователи могут оставлять ответы.

Как выгрузить котировки акций в excel

Очень интересно посмотреть на ваш файл, если он очень большой — залейте на файлообменик и дайте ссылку.

Sub GetData()
‘ thanks to Ron McEwan :^)

Dim QuerySheet As Worksheet
Dim DataSheet As Worksheet
Dim EndDate As Date
Dim StartDate As Date
Dim Symbol As String
Dim Period As Integer
Dim qurl As String
Dim nQuery As Name

Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.Calculation = xlCalculationManual

Set DataSheet = ActiveSheet

StartDate = DataSheet.Range(«C2»).Value
EndDate = DataSheet.Range(«C3»).Value
Symbol = DataSheet.Range(«C1»).Value
If DataSheet.Range(«C4»).Value = «H» Then
Period = 7
ElseIf DataSheet.Range(«C4»).Value = «D» Then Period = 8
Else: Period = 9
End If
Range(«C7»).CurrentRegion.ClearContents

‘construct the URL for the query
qurl = «http://export.finam.ru/» & Symbol & «?d=d&m=1&em=16842»
qurl = qurl & «&df=» & Day(StartDate) & «&mf=» & Month(StartDate) — 1 & «&yf &dt=» & Day(EndDate) — 1 & «&mt=» & Month(EndDate) — 1 & «&yt &p=» & Period & «&f=» & Symbol & «&e=.csv&cn &dtf=1&tmf=1&MSOR=0&sep=1&sep2=1&datf=4&at=1»

‘qurl = «http://chart.yahoo.com/table.csv?s &a=» & Month(StartDate) — 1 & «&b &c=» & Year(StartDate) & «&d=» & Month(EndDate) — 1 & «&e &f=» & Year(EndDate) & «&g=» & Range(«E3») & «&q=q&y=0&z &x=.csv»
Range(«c5») = qurl

QueryQuote:
With ActiveSheet.QueryTables.Add(Connection:=»URL;» & qurl, Destination:=DataSheet.Range(«C7»))
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With

Range(«C7»).CurrentRegion.TextToColumns Destination:=Range(«C7»), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=True, Space:=False, other:=False

Range(Range(«E7»), Range(«E7»).End(xlDown)).NumberFormat = «mmm d/yy»
Range(Range(«D7»), Range(«G7»).End(xlDown)).NumberFormat = «0.00»
Range(Range(«H7»), Range(«H7»).End(xlDown)).NumberFormat = «0,000»
Range(Range(«I7»), Range(«I7»).End(xlDown)).NumberFormat = «0.00»

With ThisWorkbook
For Each nQuery In Names
If IsNumeric(Right(nQuery.Name, 1)) Then
nQuery.Delete
End If
Next nQuery
End With

‘turn calculation back on
Application.Calculation = xlCalculationAutomatic
Application.DisplayAlerts = True
Range(«C7:I2000»).Select
Selection.Sort Key1:=Range(«C8»), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range(«B4»).Select

Загрузка истории торгов акций, ETF, индексов и валюты: новая функция EXCEL

В 2021 году EXCEL 365 получил полезное изменение. К существовавшей ранее возможности получать текущую информацию по валютам и биржевым тикерам добавили функцию загрузки исторических данных.

Новая функция ИСТОРИЯАКЦИЙ

Работает новая функция очень просто.

В любой ячейке пишем =ИСТОРИЯАКЦИЙ (или =STOCKHISTORY в англоязычной версии EXCEL) и заполняем несколько полей функции.

Обязательными полями являются «Акции» и «Кон-дата».

Акции — тикер ценной бумаги или название

Нач_дата — дата начала истории

По умолчанию «Кон_дата» равна «Нач_дата». В случае пропуска «Кон_дата» показывается информация только для одной даты, что может быть удобно для отображения исторических данных сразу для нескольких тикеров.

ИСТОРИЯАКЦИЙ может показывать исторические данные на месячных, дельных и дневных интервалах. По умолчанию данные ежедневные. За это отвечает параметр:

Интервал: 0 – ежедневные, 1 – недельные, 2 – месячные

Последний параметр помогает выбрать заголовки в отображаемой таблице исторических данных:

Заголовки: 0 – не показывать заголовки, 1 — показывать заголовки, 2 – показывать тикер и заголовки.

Вариант с отображением тикеров удобен, когда показываются данные сразу нескольких ценных бумаг.

Другие данные

EXCEL умеет показывать кроме истории цен закрытия и другие данные: открытие, объем, high, low.

Для отображения нужного типа данных необходимо после параметра «Заголовки» указать соответствующие цифры:

Список доступных фондовых рынков доступен на сайте Microsoft.
Реклама. ООО «МБК Развитие» ИНН 7719849050 Erid:2VtzqxSyAag

История значений биржевых индексов

Кроме отдельных ценных бумаг теперь можно загрузить историю биржевых индексов.

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

Правда, с индексами не всё так «гладко», как с отдельными ценными бумагами. У биржевых индексов нет единой общепринятой системы идентификаторов (тикеров). Поэтому, чтобы найти информацию по индексу желательно сначала выбрать его в отдельной ячейке, как это показано на рисунке. После этого формула =ИСТОРИЯАКЦИЙ может ссылаться на выбранную ячейку.

Ячейка с данными индекса должна быть в формате данных «Акции». Подробно, о том как работать с этим форматом данных рассказано в статье Автоматическая загрузка котировок акций и валюты: новые функции EXCEL.

Количество доступных биржевых индексов пока явно неудовлетворительное. Нет многих популярных индексов акций и облигаций.

История курсов валют и криптовалют

Третий тип данных, по которому можно загружать исторические данные – это валюта.

Тикер валюты указывается через «/» или «:».

Кроме обычных «фиатных» валют доступны все популярные криптовалюты. Например, для загрузки истории курса биткоина необходимо указать «BTC/USD».

Глубокие исторические данные

В базе данных существуют некоторые ценные бумаги, по которым глубина истории приближается к 100 лет.

Например, старейших из взаимных фондов США — Massachusetts Investors Trust (тикер — MITTX). Котировки доступны с июля 1924 года.

Несмотря на то, что MITTX – активно управляемый фонд, у него высокая корреляция с индексами акций США. На его примере можно отслеживать поведение рынка в такие критические моменты как «Великая депрессия», Вторая мировая война, кризис «Дот-комов» и др.

В базе данных так же доступны данные по первым в истории индексным фондам управляющей компании Vanguard:

• Vanguard 500 Index Fund , VFINX — первый индексный фонд акций (с 1976)
• Vanguard Total Bond Market Index Fund , VBMFX — первый индексный фонд облигаций ( с 1986)

Недостатки функции ИСТОРИЯАКЦИЙ

Новая функция – это явный шаг вперед. Но пока в общем доступе нет истории дивидендных выплат и нет истории полной доходности (adjusted close). Без этого полноценное использование данных для изучения статистики вряд ли возможно. Нет информации по товарным активам и спотовым ценам, например, на драгметаллы. Кроме того, пока выглядит недоделанным раздел биржевых индексов.

Бесплатная финансово-экономическая база данных доступна в рамках проекта okama и одноименной библиотеки для языка Python :

• Цены акций и фондов (ETF) для различных рынков (Россия, США, ЕС и др.)
• Стоимость пая и СЧА паевых инвестиционных фондов (ПИФ)
• Стоимость товарных видов активов (золото, серебро и т.д.)
• Котировки валют
• Значения индексов
• Инфляция различных стран
• Ставки ЦБ (Россия)
• Цены на недвижимость (Россия)
• История дивидендов ценных бумаг
• Значения adjusted close (полная доходность) для всех ценных бумаг

Файлы для скачивания

Пример использования функции ИСТОРИЯАКЦИЙ для загрузки данных в EXCEL
Файл: stockhistory.xlsx
Размер: 244244 байт

Для скачивания файлов необходимо зарегистрироваться или авторизоваться

Получение котировок акций

Чтобы вставить цену акций в Excel, сначала преобразуем текст в тип данных Stocks (Акции). Затем вы сможете извлечь в другой столбец нужные сведения из этого типа данных, такие как цены акций или их изменения.

Примечание: Тип данных Stocks (Акции) доступен толькоMicrosoft 365 или с бесплатной учетной записью Майкрософт. В языковых параметрах Office также должен быть добавлен английский, французский, немецкий, итальянский, испанский или португальский язык редактирования.

1. Введите текст в ячейки. Например, в каждой ячейке введите тикер, название компании или название фонда.
2. Затем выберем ячейки.
3. Хотя это необязательно, рекомендуем создать таблицу Excel. Это упростит получение сведений из Интернета. Чтобы создать таблицу, выберите Вставка >Таблица.
4. Выбирая ячейки, перейдите на вкладку Данные и нажмите кнопку Акции.
5. Если Excel обнаружит совпадение между текстом в ячейках и веб-источниками, текст будет преобразован в тип данных Stocks. Вы будете знать, что они преобразованы, если у них есть значок акций: .
6. Выберите одну или несколько ячеек с типом данных, и появится добавить столбец. Нажмите эту кнопку, а затем щелкните имя поля, чтобы извлечь дополнительные сведения. Например, для акций можно выбрать Price.
7. Нажмите кнопку Добавить столбец еще раз, чтобы добавить дополнительные поля. Если вы используете таблицу, введите имя поля в строке заглавных строк. Например, введите Change (Изменить) в строке колонок акций, и в столбце цен появится изменение. Или введите другие имена полей, такие как Last Trade Time (Время последней торговли),Previous Close(Предыдущее закрытия) и Exchange .

• Чтобы увидеть все поля, доступные для компании или фонда, щелкните значок акций ( ) или выберите ячейку и нажмите CTRL+SHIFT+F5.
• Если вы видите вместо значка, Excel не удается сопоставить текст с данными в веб-источниках. Исправьте орфографические ошибки и нажмите клавишу ВВОД, чтобы повторить попытку. Кроме того, вы можете щелкнуть , чтобы открыть область выделения. Выполните поиск по ключевым словам, выделите нужные данные, а затем нажмите кнопку Выбрать.
• Вы также можете писать формулы, ссылаясь на типы данных, или использовать функцию STOCKHISTORY.
• Данные об акциях задерживаются, предоставляются «как есть» и не являются торговыми целями или рекомендациями. Дополнительные сведения см. в сведениях об источниках данных.

Дополнительные материалы

• Подробнее о связанных типах данных
• Функция ИСТОРИЯАКЦИЙ
• Функция FIELDVALUE
• Ошибка #ПОЛЕ! #BUSY!