HTML File import in Excel Zelle

Mitglied: lupita

lupita (Level 1) - Jetzt verbinden

15.03.2016 um 15:46 Uhr, 2231 Aufrufe, 14 Kommentare, 4 Danke

Hallo zusammen

Gibt es eine Möglichkeit auf einem HTML File den Code in eine einzelne Zelle zu füllen.
Wenn ich dann Änderungen im HTML Editor mache, speichere ich das File neu ab und die Idee wär dann, dass Excel diese Aktualisierungen übernehmen kann.

Das CSV kann ich dann in unserem Webshop importieren. Der Inhalt der HTML Files ist die Produktbeschreibung.

Danke
Grüsse Lupita
Mitglied: 114757
114757 (Level 4)
LÖSUNG 15.03.2016, aktualisiert um 16:15 Uhr
Moin,
jupp geht ...
Folgender VBA-Code lädt den Inhalt einer HTML-Datei in die Zelle A2 des aktiven Sheets
Gruß jodel32
Bitte warten ..
Mitglied: MrCount
15.03.2016 um 16:15 Uhr
Hi,

also verstehe ich das richtig?
Du hast eine .html-Datei, also z.B.:


Diese Zeilen willst du in Excel IMportieren, damit du es als CSV wieder EXportierst, um es in den Webshop wieder zu IMportieren?

Wieso der Umweg über ein HTML-File?

Gruß
Bitte warten ..
Mitglied: 114757
114757 (Level 4)
15.03.2016, aktualisiert um 16:17 Uhr
Zitat von @MrCount:
Wieso der Umweg über ein HTML-File?
Er braucht vermutlich noch wysiwyg für HTML :-D face-big-smile
Bitte warten ..
Mitglied: lupita
15.03.2016 um 16:17 Uhr
Ahh das hab ich schonmal hinbekommen. Musste nur noch ein YouTube Video schauen, VBA ist gefühlte 15 Jahre her..
Jetzt hab ich jedoch 250 html Files. Gehts auch ein wenig einfacher?
Bitte warten ..
Mitglied: 114757
114757 (Level 4)
LÖSUNG 15.03.2016, aktualisiert um 16:30 Uhr
Zitat von @lupita:
Jetzt hab ich jedoch 250 html Files. Gehts auch ein wenig einfacher?
Wat, noch einfacher :-) face-smile ?
Du willst alle Files ins Excel holen ? In die Zellen untereinander?

Das hier importiert automatisch alle HTML-Dateien eines Ordners den du in Zeile 2 des Skripts angibst, in die Zellen A2:AXdes aktuellen Sheets:
Wie wärs auch mit Powershell? Da sparst du dir den Umweg über Excel und könntest direkt deine CSV-Datei erstellen.
Bitte warten ..
Mitglied: lupita
15.03.2016 um 17:20 Uhr
Perfekt :) face-smile Ich verdanke dir echte Lebenszeit!
Bitte warten ..
Mitglied: 114757
114757 (Level 4)
15.03.2016, aktualisiert um 17:31 Uhr
Zitat von @lupita:

Perfekt :) face-smile Ich verdanke dir echte Lebenszeit!
Schön :-) face-smile Nur das Kommentar das du als Lösung markiert hast, ist wohl eher deplatziert und nicht die Lösung ... :-/ face-confused
Bitte warten ..
Mitglied: lupita
15.03.2016 um 17:44 Uhr
Habs korrigiert. Sorry
Kleine Frage noch.

Ich fülle nun die HTML Files wie folgt ein

Ist es auch möglich, das ganze nicht auf die Zelle zu fixieren, sondern 2 Felder Rechts der Artikelnummer.
Die Artikelnummer 0001 steht z.B. im Feld A1 und die Produktbeschreibung dann in D1.

Weisst du was ich meine?
Bitte warten ..
Mitglied: 114757
114757 (Level 4)
15.03.2016, aktualisiert um 19:39 Uhr
Du kannst von einer Zelle (Range) einen Offset von dieser Zelle angeben:

z.B. verweist folgender Ausdruck auf die 3 Spalte rechts von A1, also D1

War das richtig interpretiert?

Du kannst stattdessen auch mit Indexen arbeiten wenn du willst
Der erste Wert ist die Zeile, der zweite die Spalte.

Aber wieso machst du für jedes HTML File eine extra Zeile im Code ?? Ich habe dir ja oben gezeigt wie das effektiver geht.
Bitte warten ..
Mitglied: lupita
15.03.2016, aktualisiert um 21:25 Uhr
Danke dir!
Umlaute ä ö ü werden leider nicht korrekt eingelesen... hast du da auch einen Tipp?
Bitte warten ..
Mitglied: 114757
114757 (Level 4)
15.03.2016, aktualisiert 16.03.2016
Zitat von @lupita:

Danke dir!
Umlaute ä ö ü werden leider nicht korrekt eingelesen... hast du da auch einen Tipp?
Ja, du musst "OpenTextfile" nur mit den richtigen Parametern füttern:
Die letzte -1 steht für Unicode-Kodierung.
Bitte warten ..
Mitglied: lupita
16.03.2016, aktualisiert um 07:36 Uhr
funktioniert leider nicht.

hier kommt ein error

So kommt kein Error, die Umlaute funktionieren aber auch nicht :) face-smile

-1 wie es hier steht klappt auch nicht.
http://www.w3schools.com/asp/met_opentextfile.asp

wenn ich anstatt false einzutragen den wert leer lasse, da optional klappt es
so kommen die Zeichen chinesisch

-2 = ohne Umlaute
0 = ohne Umlaute
1 = Error
2= Error


Mein Code sieht nun wie folgt aus:

Bitte warten ..
Mitglied: 114757
114757 (Level 4)
16.03.2016, aktualisiert um 07:41 Uhr
geht hier einwandfrei mit UTF-8 kodierten Files und
fso.OpenTextfile("PFAD",1,False,-1).ReadAll()

Ansonsten probier es mit

fso.OpenTextfile("PFAD",1,False,2).ReadAll()

Mach ich schon ewig so und hat mich nie im Stich gelassen.

Ansonsten haben deine Files eine seltene Kodierung.
Bitte warten ..
Mitglied: lupita
16.03.2016 um 08:21 Uhr
Hmm klappt auch nicht.
Meine HTML Files nutzen uft-8.
mein excel hat die version 2016.

ich glaub so gehts nicht mit dem OpenTextfile

http://developer.rhino3d.com/guides/rhinoscript/read_write_utf8/

muss was mit dem hier machen. aber wie ich das in die zelle bekomme. mal schauen.
Bitte warten ..
Heiß diskutierte Inhalte
Exchange Server
Sicherheits-Update KB5001779 für Exchange 2013-2019
kgbornVor 1 TagInformationExchange Server9 Kommentare

Microsoft hat zum 13. April 2021 das Sicherheitsupdate KB5001779 für Exchange 2013-2019 veröffentlicht, um vier RCE-Schwachstellen zu schließen. Das Update sollte zeitnah installiert werden. ...

Datenschutz
Regierung testet Einsatz von Microsoft Azure-Cloud für die Bundescloud
VisuciusVor 1 TagInformationDatenschutz34 Kommentare

LÄUFT! Deutschland will Microsoft für die Bundescloud testen Ich hätts ja beinahe unter dem Topic "Humor" veröffentlicht. Aber der 1. April ist ja durch ...

Festplatten, SSD, Raid
Festplatte aus defekten Notebook ausgebaut - wird nicht erkannt - Wie gelange ich an meine Daten?
1nCoreVor 19 StundenFrageFestplatten, SSD, Raid11 Kommentare

Hallo liebe Community, nach 7 Jahren hat mein XMG Notebook seinen Geist aufgegeben In dem Notebook waren zwei Festplatten verbaut (eine für System und ...

Server
Server Anbieter mit 2 NICs gesucht
gelöst SilvergreenVor 1 TagFrageServer16 Kommentare

Hallo Community, ich bin auf der Suche nach einem Serveranbieter, der VPS/Cloud Server mit 2 Netzwerkkarten anbietet. Eine Internetsuche brache mich da leider nicht ...

Internet
Woher holt sich Android die Kontaktdaten von unbekannten Rufnummern?
gelöst anteNopeVor 23 StundenFrageInternet8 Kommentare

Hallo zusammen, seit einiger Zeit merke ich, dass mir mein Android Gerät Namen und Informationen zu mir unbekannten Teilnehmern präsentiert. Soll heißen eine nicht ...

Windows Netzwerk
MS Lizenzierung - externe Scandienstleistung
monstermaniaVor 22 StundenFrageWindows Netzwerk9 Kommentare

Hallo Allerseits, ich habe da mal eine Frage an die MS Lizenzspeziallisten. Eine externe Firma soll Scandienstleistungen für uns erledigen. Dazu ist angedacht, dass ...

Exchange Server
Exchange Update CU19 auf CU20 Fehler - Eine weitere Version dieses Produkts ist bereits installiert
gelöst StefanKittelVor 20 StundenFrageExchange Server6 Kommentare

Hallo, ich habe hier einen Exchange 2016 mit CU19 (15.1.2176.2). Darauf wollte ich nun CU20 installiert. Download Es erscheint Eine weitere Version dieses Produkts ...

Exchange Server
April 2021 Microsoft Exchange Server Security Updates
FrankVor 1 TagInformationExchange Server2 Kommentare

Microsoft has released security updates for vulnerabilities found in: Exchange Server 2013 Exchange Server 2016 Exchange Server 2019 These updates are available for the ...