Các bác giúp em co cách nao ko. Em muốn khi mở file excel của em ra thi tự động nhảy ra pop up - mở ra trang web theo đường dẫn của e. Có làm đượcKhông các bác giúp em với
Sub GoToWebSite()
Dim appIE As Object ' InternetExplorer
Dim sURL As String
Application.ScreenUpdating = False
Set appIE = GetIE
sURL = "http://www.giaiphapexcel.com"
With appIE
.Navigate sURL
.Visible = True
End With
Application.ScreenUpdating = True
Set appIE = Nothing
End Sub