Textfeld in Spalte nicht extrahierbar

[mmueller]

Hey,

mein Problem ist sehr spezifisch. Evtl. mit ein paar klicks zu beheben. 
Ich kann aus einem alten CMS Plone die User nicht exportieren und copy and paste das von der website.
Das füge ich dann in excel ein und das sieht dann so aus:

Im Anhang ist eine Excel-Datei mit einem Beispiel. Danke für den Tipp

  Excel-Hilfe-Beispiel.xlsx (Größe: 17,81 KB / Downloads: 5)

Dateien bitte im Forum hochladen: https://www.clever-excel-forum.de/thread-326.html

Wie bekomme ich den Text aus dem Textfeld in eine Excel-Zelle?

VG,
Marcel

[WillWissen]

Hallo Marcel,

beschreibe dein Problem bitte so, dass es auch "Nichteingeweihte" verstehen können. Zudem sind Bilder in der Regel nicht hilfreich. Besser sind Beispieldateien mit ein paar händisch eingetragenen Wunschergebnissen. Wie das Hochladen geht, kannst du dem Kommentar von mir in deinem Beitrag sehen.

[Case]

Hallo, :19:

bezogen auf Deine Beispieldatei so: :21:

Code:

Option Explicit
Sub Main()
    Dim objOLE As OLEObject
    For Each objOLE In ActiveSheet.OLEObjects
        If objOLE.progID = "Forms.HTML:Text.1" Then
            objOLE.TopLeftCell.MergeArea.Value = objOLE.Object.Value
            objOLE.Delete
        End If
    Next objOLE
End Sub

[mmueller]

Hey, danke für deine Antwort. Ich arbeite sonst nie mit excel =/. Könntest du mir kurz beschrieben, wie ich den Code ausführen kann? Nach dem Motto

der>weg>zum>ausführen

Das wäre total nett

[Case]

Hallo, :19:

hier mal als Beispiel: :21:

  Excel-Hilfe-Beispiel_Code.xlsb (Größe: 26,29 KB / Downloads: 3)

[mmueller]

Bist ein Schatz. Dankeschön :17: