Вот хороший пример для начала. Как я уже говорил в своем комментарии, вам нужно будет использовать VBA для достижения того, чего вы хотите. Основной метод - использовать VBA для запуска Internet Explorer, а затем вернуть HTML-код. Из этого кода вам нужно будет просмотреть текст, чтобы узнать, где находится ваш номер.
Ниже приведен метод для возврата HTML для страницы:
Sub getData() Dim url As String Dim ie As Object Dim state As Integer Dim text As Variant Set ie = CreateObject("InternetExplorer.Application") ie.Visible = 0 url = "http://www.eoddata.com/stockquote/NASDAQ/AAPL.htm" ie.Navigate url state = 0 Do Until state = 4 DoEvents state = ie.readyState Loop text = ie.Document.Body.innerHTML End Sub
Очевидно, вы измените URL на URL вашего сайта. Как только вы это настроите, переменный текст в конце будет содержать HTML, так что используйте любой творческий метод, который вы хотите пройти через этот код. Вы хотите знать, как использовать команды MID, FIND и TRIM.
Надеюсь, это, по крайней мере, поможет вам начать