Excelの「Control」内のテキストを一気に抽出する方法を教えていただけませんか？

WebページをExcelに貼りつけ、その中の情報をExcelで加工したいと思っています。
現状「Control」内のテキストを一つ一つコピペしていますが、今後データが増えるため
一気に抽出する方法を探しています。

テキストボックスに関しては以下のようなものがありましたが、このような形で
テキストを抽出する方法があれば・・・と思っております。
（代入等試みましたが、うまく行きません）
ＶＢＡやマクロの知識に乏しいので、大変お手数ですが、手順等を出来るだけ
細かく教えていただければ幸いです。

Sub test01()
　　Dim ns As Worksheet, ws As Worksheet
　　Dim tb As TextBox
　　Dim i As Long
　　Set ns = Worksheets.Add
　　For Each ws In Worksheets
　　　　For Each tb In ws.TextBoxes
　　　　　　i = i + 1
　　　　　　ns.Cells(i, 1).Value = tb.Text
　　　　Next tb
　　Next ws
　　ns.Activate
　　End Sub