RE:Copiar texto de una tabla de un WebBrowser
Hola, Danielo!!
Con esto obtienes todo el texto de la pagina. Lo demas ya es mas facil.
Private Sub Form_Load()
On Error Resume Next
Me.Show
'reemplazas aca por tu pagina
StartingAddress = "http://www.google.com.pe"
cboAddress.Move 50, lblAddress.Top + lblAddress.Height + 15
If Len(StartingAddress) > 0 Then
'intenta explorar la dirección inicial
timTimer.Enabled = True
brwWebBrowser.Navigate StartingAddress
End If
end sub
Private Sub Command1_Click()
Me.Text1 = Me.WebBrowser1.Document.body.innertext
End Sub
Espero te ayude.
Saludos!!!