web（気象データ)を取得するプログラムを以前マクロで組んでいたのですが，これを今回諸事情によりVB2010で再構築していますが，どうすればいいか悩んでいます． 以下はマクロプログラムです． With ActiveSheet.QueryTables.Add(Connection:= _ "URL;http://www.data.jma.go.jp/obd/stats/etrn/view/hourly_s1.php?prec_no=" & AD2 & "&year=" & y & "&month=" & m & "&day=" & d & "&view=" , Destination:=Range("D" & R)) .RefreshStyle = xlOverwriteCells .AdjustColumnWidth = False .WebSelectionType = xlSpecifiedTables .WebFormatting = xlWebFormattingNone .WebTables = "10" '時々変更あり、最近は19 .Refresh BackgroundQuery:=False End With これを，どなたかVB版に変換して頂けませんでしょうか? 取得したデータはデータソースに格納する よろしくお願いいたします．
↧