anh em cho em xin code vba với, em xin cám ơn

[phantu93]

Sub TEST()
Dim chromePath As String
Dim i As Long
Dim lastRow As Long
chromePath = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"
lastRow = Cells(Rows.Count, "D").End(xlUp).Row
For i = 33 To lastRow
Dim link As String
link = Cells(i, "D").Value
If link <> "" Then
Shell (chromePath & " -new-tab " & link)
End If
Next i
End Sub

đây là code mở hàng loạt link trong excel , em đã test mở thành công, giờ vấn đề là em cần gán mở theo 1 tài khoản/profie đăng nhập = 1 gmail đã đăng nhập sẵn trên trình duyệt, anh em cho xin code với, xin cám ơn, link bài gốc có code: https://www.giaiphapexcel.com/diend...-mình-về-vấn-đề-hyperlink-trong-excel.164790/

 

[Hoàng Tuấn 868]

đây là code mở hàng loạt link trong excel , em đã test mở thành công, giờ vấn đề là em cần gán mở theo 1 tài khoản/profie đăng nhập = 1 gmail đã đăng nhập sẵn trên trình duyệt, anh em cho xin code với, xin cám ơn, link bài gốc có code: https://www.giaiphapexcel.com/diend...-mình-về-vấn-đề-hyperlink-trong-excel.164790/

Sao đăng nhiều bài cùng nội dung thế bạn, như vậy là vi phạm Nội quy diễn đàn và sẽ bị xóa.

 

[phantu93]

View attachment 300683
Sao đăng nhiều bài cùng nội dung thế bạn, như vậy là vi phạm Nội quy diễn đàn và sẽ bị xóa.

em ko biết xóa bài chỗ nào anh ạ, em ko có ý spam