Sub OpenAndCloseIE()
Dim ie
Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "https://rfpro.ru"
ie.Visible = True
ie.Quit
Set ie = Nothing
End Sub
Если Вы уже зарегистрированы на Портале - войдите в систему, если Вы еще не регистрировались - пройдите простую процедуру регистрации.