""というリンクでWebクエリを使用して財務諸表をExcelにインポートすることができました。インポートプロセスをマクロに記録し、それを実行させるためにvbaコードを少し修正しました。今、私はA1のセルにある株価情報に基づいて輸入財務諸表を更新したいと考えています。しかし、私は下付き文字が範囲外のエラーであり、私は理由を理解できないようです。可能であれば、以下のコードを見て、洞察を与えてください。ウェブクエリによる収入勘定/貸借対照表/キャッシュフローの引き落としを促進する
ありがとうございました！
私は入力シートからティッカー値を読み取っていますが、アクティベートシートに書き込もうとしているようです。 その可能性以外は、私のためにうまく動作していたようです。
私は現在のワークシートの変数とテストを追加しました。一緒の最初の行はちょっと変わった。
sTicker = Range("A1").Value
If sTicker = "" Then
MsgBox "No value to look up"
Exit Sub
End If
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.advfn.com/stock-market/NASDAQ/" & sTicker & "/financials?btn=annual_reports&mode=company_data" _
, Destination:=Range("B2"))
ご回答いただきありがとうございました。コードは現在実行中ですが、「http://www.advfn.com/stock-market/NASDAQ/msft/financials?btn=annual_reports&mode=company_dataを開くことができません」というエラーが表示されます。情報をダウンロードできませんあなたが要求しました"。なぜこれが起こっているのかについての手がかりは？ –
ちょうど私のために試して働いた。 多分ラッピングを試してくださいsTicker = Range（ "A1"）。UCaseの値 –
ありがとう！以前はインターネットエクスプローラ設定のために動作していなかったが、今は完全に機能している。 –