VBA: Inhalt aus HTML oder TXT in Zelle einlesen

[little-key]

Hallo liebes Forum,

wieder mal ein Anliegen:

Ich möchte in eine Zelle (z.B A1) den gesammten Inhalt einer Textdatei oder einer HTML-Datei schreiben lassen. Der Textinhalt ist logischer Weise ein html-Code.

Geht das überhaupt?

Danke Mario

 

[Mithrandil]

Versuch das mal.... in ein VBA Modul einfügen und mit "lese" im Direktfenster (oder mit Makros->ausführen im Menü) starten.

Sub lese()
Dim a As String, r1 As Range
Open "Dateiname.txt" For Input As #1
Set r1 = Worksheets("Tabelle1").Range("A1")
While Not EOF(1)
  Line Input #1, a
  r1 = r1 & a & vbLf
Wend
Close #1
End Sub

 

[little-key]

Prima, das wars.
Genau so wie ich es wollte.

Besten Dank dafür.
Mario