Excel VBA /マクロで新しくなったWebページの特定のテーブル部分をExcelで抽出しますか?
ページ全体ではなく、特定の部分を取得する必要があります。 ベローズコードは完全なページで動作しますが、ページのすべての部分は必要ありません。 「当社のその他の情報は、」私が話していますということですページの下部にあるよう
Sub GrabOutStandingTable()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://dsebd.org/displayCompany.php?name=ABBANK", Destination:=Range(_
"$A$1"))
.CommandType = 0
.Name = "displayCompany.php?name=ABBANK"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = """company"""
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
Sheets.Add After:=ActiveSheet
End Sub
テーブル部分が向かいました。マクロはこの部分を抽出する必要があります。
他の方法でダウンロードできます。私は手動で行うと、300 +ページを参照して、同じ構造化データ(テーブル)を300 +企業プロフィール 手順も自動化する必要があります。 url "name = ABBANK"これはリンクの唯一の変数です。文字列 "ABBANK"を別のものに変更するだけです。それは別の会社のプロフィールをロードする必要があります 実際に私は300 +会社のプロファイルから同じ構造化データを収集する必要があります。それで、どうすればいい? – user176705
別のことは、今までPowerQueryツールをインストールできません。それはInternetExplorer 9以上が必要です、私のwin7システムは "EIE11_EN-US_WOL_WIN7.EXE"をサポートしていません:( – user176705
あなたが必要としているものを正確に持っています。 –