使用vba列表中的鏈接

Question

我想使用容器中的鏈接：一個接一個。我不知道這樣做的正確方法。我下面試圖做的方式有點奇怪，但它會給你一個想法，我想實現。

Sub Iterating_links() 
    Dim str As String, vault As String 

    vault = "https://www.yify-torrent.org/search/1080p/, https://yts.ag/browse-movies" 

    For Each str In vault 
     MsgBox str 
    Next str 
End Sub 

有容器vault兩個環節，我想通過一個看到的msgbox一個結果。謝謝。

Answer 1

假設你的鏈接通過,被分隔嘗試

Sub Iterating_links() 
    Dim str As String, vault As String 
    Dim arr() As String, items 

    vault = "https://www.yify-torrent.org/search/1080p/, https://yts.ag/browse-movies" 
    arr() = Split(vault, ",") 

    For Each items In arr 
     MsgBox items 
    Next items 
End Sub