Office: Einfügen

Hallo Anja,

unter der Annahme gleicher Steuerzeichen zur Trennung der Spalten setze ich vereinfachend voraus, dass
Code:

die Spaltenanzahl eines gültigen, d. h. vollständigen Datensatzes ist.
Weicht die Spaltenanzahl davon ab, ist der Datensatz nicht gültig und wird übersprungen.

Bitte prüfe, ob diese Annahme richtig ist! Andernfalls könnte es sein, dass bei mehrfachem Vorkommen des Steuerzeichens zur Trennung der Spalten die Idee nicht hinhaut. Prüfe also, ob dieses Steuerzeichen im Text vorkommen kann (je nach Programm kann dieses Zeichen gesperrt sein, kann ich aber von hier aus nicht beurteilen)! Ist dies der Fall, musst Du selber eine Prüfung auf einen gültigen Datensatz einbauen, z. B.: Spalte 1 muss ein Datum sein, Spalte 2 ein Text, Spalte 3 eine Zahl oder irgendwie so.

Code:

Eine rudimentäre Fehlerbehandlung ist eingebaut.
Zudem wird Application.Calculation auf den "alten" Wert zurückgesetzt, falls dieser von xlAutomatic abweicht.

Grüße
EarlFred

 

Hallo EarlFred,

wenn es zu kompliziert ist müssen sie halt entweder mit leben oder die Sonderspalten mit dem Text vor dem Einfügen entfernen.

Trotzdem danke nochmal für die Mühe.


Edit: Ok... wir haben inzwischen page 3... sorry. *read*

Grüße Anja

 

Hallo Anja,

man muss die Randbedingungen kennen. Ich rate anhand der Angaben, wie es sein könnte. Möglichkeiten gibt es viele, welche aber die günstigste ist, weiß ich im Blindflug nicht.

Grüße
EarlFred

 

Hallo EarlFred,

du musst ganz schön viel Geduld mitbringen die ganzen Angaben zu erraten, die ich nicht machen kann, weil ich oft die Hintergründe noch nicht kenne.
Das ist bewundernswert.

Dieses Mal hast Du offenbar wieder richtig gelegen.
Nach einem Steuerzeichen folgt die Trennung. Nach 5 Spalten ist Schluss.
Egal ob ein oder mehrere Steuerzeichen im Text in Spalte 6 sind, er wird nicht mehr als gültige Spalte/Datensatz interpretiert.

Super Leistung... wie immer!!! Dankeschön!

Liebe Grüße
Anja

 

Hallo Anja,

prüfe aber bitte, ob die Texte das Zeichen 9 (Tabulator) enthalten können. Wenn ja, fliegt Dir das eventuell um die Ohren.

Einfach einen fiktiven Text mit Tabs aus Word oder dem Wordpad kopieren, in dem anderen Programm im ersten zu kopierenden Datensatz einfügen und schauen, was bei fAusgabe enthalten ist bzw. wie groß lngUbound ist. Weicht es von der Spaltenanzahl ab, hast Du ein Problem. Wenn Du Glück hast, werden die Tabs eliminiert, dann ist lngUbound = Spaltenzahl.

Grüße
EarlFred

 

Hallo EarlFred,

danke für diesen Hinweis.

Ich hab es ausprobiert. Im Freitextfeld des anderen Programms lässt sich der Tabulatorsprung selbst nicht erzeugen, dann springt er zum nächsten Feld.

Es ist allerdings möglich, aus Word ein Tab in das Freitextfeld einzufügen. Das habe ich getan und dahinter noch fiktiven Text geschrieben.

Es trifft leider zu was du schreibst. Er fügt nur bis zu diesem Tab die Daten ein.
Das ein Tab in dem Text vorkommt ist jedoch relativ unwahrscheinlich, da es im Programm selbst nicht erzeugt werden kann.
Denn ein Tab ist ja nicht bloß eine Anhäufung von Leerzeichen, richtig?

Die Silber-Lösung sollte für diese Zwecke ausreichen.
Wobei mich ja auch eine genaue Gültigkeitszuweisung der Spalten auch reizen würde, da man dann keine falsch sortierten Spalten mehr einfügen könnte und gleich eine "Fehler-Klatsche" kriegen würde, wenn man nicht die Reihenfolge eingehalten hat.

Will dich nur nicht überstrapazieren, hast mir schon so weit geholfen!!

Liebe Grüße
Anja

 

Hallo Anja,

noch erschwerend: Können die Texte mit den ungewollten Umbrüchen auch innerhalb der 5 zu übernehmenden Spalten vorkommen?

Wenn nein: Dann prüf's doch *wink.gif*
Split(fAusgabe(i), Chr(9)) ist die in Spalten aufgeteilte Datenzeile. Das ist ein Array - und wie man damit umgeht, weißt Du doch mittlerweile besser als ich. *wink.gif*

Grüße
EarlFred

 

Hallo EarlFred,

NEIN! Da bin ich ganz sicher... denn Freitext gibt es bei den zu übernehmenden Spalten nicht, da besteht keine Gefahr der Fehlinterpretation.

Was kann ich? Umgehen???? ich?? Besser als du???? *biggrin.gif*


Grüße
Anja