簡體   English   中英

如何將變量插入期望的字符串中,從而引起問題? Excel的VBA

[英]How do I insert a variable into an expected string, delimiting issue? Excel-VBA

我正在嘗試通過WEBSERVICE函數從Yahoo Finance檢索數據,然后通過循環填充數據。 我知道問題在於撇號,因為有兩個變量我不確定如何定界它們。 我試過了“&symbol&”,雙撇號的組合,沒有任何效果。

任何幫助,不勝感激,謝謝!

代碼是:

Sub marketdata()

    Dim symbol As String
    Dim parameter As String
    Dim rows As Long
    Dim cols As Long

    For rows = 2 To 5700
        For cols = 3 To 20
            symbol = Cells(rows, 2).Value
            parameter = Cells(1, cols).Value
            Cells(rows, cols).Value = "=WEBSERVICE _
            (""https://download.finance.yahoo.com/d/quotes.csv?s=SYMBOL&f=PARAMETER"")"
        Next cols
    Next rows

End Sub

這是我的第一篇文章,如果需要澄清,請告訴我。

我將使用兩次替換操作將單元格值放入字符串中。

Dim sp As String
Dim rows As Long
Dim cols As Long

For rows = 2 To 5700
    For cols = 3 To 20
        sp = "=WEBSERVICE(""https://download.finance.yahoo.com/d/quotes.csv?s=%1%&f=%2%"")"
        sp = Replace(Replace(sp, "%1%", Cells(rows, 2).Value), "%2%", Cells(1, cols).Value)
        Debug.Print sp
        Cells(rows, cols).Value = sp    'should this be .Formula?
    Next cols
Next rows

您可能還希望開始包括父級工作表引用。

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM