CSV am Ende einer Exceltabelle einfügen?

Hi,

folgendes Szenario: Ich bekomme in unterschiedlichen Zeitabständen CSV Dateien die ich in Excel importieren möchte. An sich ist das ja kein Problem. Jedoch möchte ich den ganzen Schritt automatisieren und die Daten der CSV an das Ende einer formatierten Tabelle setzen. Hat folgenden Hintergrund: Ich möchte über die Daten der CSV Dateien mehrere Auswertungen laufen lassen. Diese müssen nur einmal angelegt werden und danach immer über alle Daten aus allen CSVs laufen. Die Daten aus den CSV Dateien werden einmalig Importiert, also sind keine Dateiverbindungen nötig. Mein erster Gedankengang war ein Excelsheet "Import" in welches ich die Daten lade und dann per Makro ans ende der Tabelle schiebe. Doch da war mein Problem ein VBA-Skript zu schreiben welches immer an die nächste freie Stelle die Daten kopiert. Eventuell gibt es ja auch eine einfachere Lösung und ich finde Sie nicht. Ich habe Excel2016 im Einsatz und keine Einschränkungen in Sachen Makros. Zudem ist es eine 64bit Version welches die Verarbeitung großer Makros relativ zügig funktioniert.

Vielen Dank im Voraus für alle Antworten

Grüße

2 Antworten

PWolff

02.03.2016, 19:35

Die letzte belegte Zelle einer Tabelle erhältst du mit

Tabelle.Cells.SpecialCells(xlLastCell)

Leider berücksichtigt Excel nicht, wenn Bereiche gelöscht werden, sodass eine einmal belegte Zeile immer in die Zeile der letzten Zelle eingeht, ebenso für die Spalten.

Immerhin kann man die Zeilen durchgehen und nachsehen, ob etwas darin steht.

Du könntest z. B. die Daten aus der Importtabelle in die Sammeltabelle wie folgt kopieren:

Range(Importtabelle.Cells(1,1), Importtabelle.Cells.SpecialCells(xlLastCell)).Copy(Sammeltabelle.Cells(Sammeltabelle.SpecialCells(xlLastCell).Row+1,1))

Iamiam

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Microsoft Excel

02.03.2016, 22:52

"ans Ende der Tabelle": Wenn du die Spalte kennst (hier A), bekommst Du die letzte Zelle angesteuert mit

Range("A1048576").end(xlup)

und die erste freie mit

Range("A1048576").end(xlup).offset(1., 0)

Das ist sicherer als Range("A1").end(xldown), da freie Zellen diesen Vorgang stören würden.

ist die letzte Zelle in einer unbekannten Spalte, muss man das zB so machen wie P.Wolff das beschreibt, aber dann noch die erste Spalte und die Zelle darunter ansteuern, denn Du willst die CSV-Datei ja nicht an die letzte Zelle selbst anhängen, nehme ich an, zB mit

Tabelle.Cells.SpecialCells(xlLastCell).offset(1, 0).end(xltoleft)

Moin ihr Lieben. Ich habe folgendes Problem. Ich brauche genau eine Funktion die Excel schon hat.. aber etwas geändert. Undzwar gibt es ja die Möglichkeit unter Datei -> Externe Daten importieren -> Aus Text, CSV Dateien sehr gut zu importieren. Dort kann man angeben ab welcher Zeile der CSV Datei erst importiert werden soll, weil z.B. in der ersten Zeile nur Überschriften stehen. Mein Problem ist das dies immer nur mit einer zur Zeit geht. Kennt jemand ein Makro mit welchem dies geht bloß eben mit mehreren? Das man sagt: die ersten 3 Zeilen immer ignorieren und alles andere ab A1 oder so untereinadner einfügen?

Wäre eine super Hilfe!!!

...zur Frage

VBA - Daten in andere Datei schreiben

Ich habe ein Excel-sheet mit Daten und Makros. Nun möchte ich die Daten in eine neue Excel Tabelle schreiben, so das keine Makro-Sicherheits meldung beim öffnen der ausgegeben Datei kommt.

Wie geht das?

...zur Frage

C# Datagridview falsches Format nach Export in CSV?

Hallo :)

Ich habe ein Programm geschrieben welches Daten aus einer Tabelle holt und diese in einem Datagridview anzeigt.

Eine der Daten ist das Geburtsdatum welches in dem Datagridview so angezeigt wird:

01.01.1990

Wenn ich dann jedoch die Gridview in eine CSV-Datei Exportiere und diese dann öffne steht in der Spalte des Geburtsdatums:

#######

Und wenn ich drauf klicke steht drinnen:

01.01.1990 00:00:00

Kann mir einer helfen wie ich das richtig Formatiere?

Und das es gleich richtig in die CSV-Datei Exportiert wird?

...zur Frage

csv Datei mit kyrillischer Schrift als xls?

Hallo Leute,

ich habe eine .csv Datei , welche sowohl auf englisch, ukrainisch und russisch geschrieben ist. Als csv kann ich die kyrillischen Schriftzeichen ganz normal erkenne.

Sobald ich diese csv jedoch in Excel öffne, bekomme ich in den russischen und ukrainischen Feldern ein extremes Buchstaben-/ Zeichendurcheinander, wie dieses: ¢—Ä–∞–Ω—Å–º—ñ—Å—ñ–π–Ω–µ

Was kann ich tun, damit mir auch in der Excel Tabelle die kyrillischen Schriftzeichen angezeigt werden?

Liebe Grüße

...zur Frage

Täglicher automatisierter Vergleich zweier csv Dateien?

Hallo,

da ich leider nicht alle technischen Begriffe richtig kenne und deshalb evtl. hier falsch verwende bereits vorab die Bitte um Entschuldigung.

Ich bekomme täglich eine csv Datei mit Daten aktueller, also zum heutigen Tag angestellten, Mitarbeitern. Hier steht bspsweise Personalnummer (eindeutiger Schlüssel), Nachname, Vorname,Eintrittsdatum und Austrittsdatum (Achtung: Das Austrittsdatum stimmt leider nicht immer). Zur Veranschaulichung die Datumsangaben mal weggelassen.

...

124514; Müller; Jonas;

231423; Fischer, Joachim;

423313; Haupt, Christian;

...

Sobald ein Mitarbeiter nicht mehr aktiv ist (also aus der Firma ausgetreten ist) wird der Datensatz am folgenden Tag auch nicht mehr übergeben (kommt also in der aktuellen csv Datei nichtmehr vor).

Es würde also am Folgetag die csv folgendermaßen aussehen, wenn Müller das Unternehmen verlassen hat und Newbie beispielsweise neu angefangen hat. Die Neueintritte müssen nicht abgefangen werden, wollte ich nur als Info dazusagen, dass diese dann zusätzlich in der neuen Datei vorhanden sind. Es geht ausschließlich um die Austritte, also die Mitarbeiter die in Vortagsdatei vorkamen, jetzt in tagesaktuellen aber nicht mehr vorkommen.

...

231423; Fischer, Joachim;

423313; Haupt, Christian;

599999; Newbie, Franziska;

...

Da das Austrittsdatum, welches auch mitgeliefert wird, leider teilweise nicht korrekt ist, kann ich mich nicht auf dieses Feld verlassen und irgendwie danach gehen. Auch haben beispielsweise unbefristete Mitarbeiter hier keinen Eintrag.

Ich bin nun auf der Suche nach einer Möglichkeit, wie ich die täglichen Austritte abfangen kann, also die Differenz zwischen mitgelieferten Daten der aktuellen Datei gegenüber der zum Vortag vergleichen kann. Dies sollte jeden Tag automatisiert funktioniert (durch einen Windows Dienst?)

Meine Idee war, dass ich diese beiden csv Dateien Datei H (Heute, im Beispiel oben die Datei mit Newbie) und Datei H-1 (gestern, Datei mit Müller) täglich vergleichen lassen und mir die Austritte jeweils in eine extra Datei, egal ob csv oder Excel, ausgeben lasse, sodass ich am Ende jeden Monats alle Austritte nochmal überprüfen kann.

Im obrigen Beispiel sollte dann beispielsweise der Datensatz zu Herrn Müller in eine Datei übergeben werden inkl den mitgelieferten Informationen wie Eintrittsdatum und Co. und wenn möglich dem aktuellen Tag (oder Zeitpunkt/aktueller Zeitstempel, damit nachvollzogen werden kann, wann genau dieser Mitarbeiter ausgetreten ist)

Leider fehlt mir jede technische Idee, wie ich sowas am schlausten umsetze und technisch realisiere. Hierfür wäre ich euch sehr über eure Ideen dankbar! Ich will ungern zunächst in eine komplett falsche Richtung laufen und danach bemerken, dass dies mir diesem System nicht umsetzbar ist.

Da dies wohl meine Mammutsaufgabe in meinem Praktikum sein wird, bin ich demjenigen, der sich hier die Zeit nimmt, mir bei der Lösungsfindung zu helfen, natürlich sehr, sehr dankbar! Vielen dank!

...zur Frage

Aus PDF-Rechnung oder Scan eine CSV-Datei erzeugen?

Hallo, weiß jemand, ob es günstige Programme oder Tools gibt, mit denen ich aus Eingangsrechnungen (in Papier, d.h. Scan, oder native PDF z.B. aus E-Mail-Anhang) automatisch die wichtigsten Daten in eine CSV-Datei überführen kann? Ich möchte gerne meine Buchhaltung und Ausgabenübersicht automatisieren, um nicht alles manuell abtippen zu müssen. Idealerweise sowohl für meinen Kleinbetrieb bzw. privat für zu Hause.

Danke!!

Vg,

Steffen

...zur Frage

CSV Datei in HTML Tabelle einlesen

Ich muss eine CSV Datei in eine HTML Tabelle einlesen, ohne PHP oder dergleichen, eventuell mit JavaScript. Es sollte in allen Browsern funktionieren. Wie mache ich das am besten und einfachsten?

...zur Frage

Visual Basic 2013 .CSV datei auslesen und editieren

Hallo zusammen, ich möchte, wie im titel schon sichtlich, einfach eine .csv Datei auslesen und diese auch bearbeiten können. Die CSV-Datei ist mit , getrennt und würde z.B. so aussehen:

"Name","TID","Resource","Percentage","Icon","IconExportName"
"String","String","String","int","String","String"
"Min","TID_RESOURCE_10","XP",10,"ic/custom.sc","icon_xp_small"
"Keks","TID_RESOURCE_50","XP",50,"ic/custom.sc","icon_xp_medium"
"Max","TID_RESOURCE_FULL","XP",100,"ic/custom.sc","icon_xp_big"

Das ist nun ein Beispiel welches alle möglichen formen beinhaltet, die ich benötige. Getrennt mit , und Werte innerhalb von " aber auch ohne!

Jetzt bleibt nur die Frage, wie lese ich diese beispiel.csv aus und kann sie in meiner Form bearbeiten?! (Der Pfad wird natürlich einfach bestimmt "C:\CSV-DateiOrdner\csvdatei.csv")

Zeile 1 gibt die Namen der darunter aufgelisteten werte an und somit auch die gerde benötigten Spalten. Zeile 2 kann einfach ignoriert werden oder als ToolTip über die ersten Werte (Titel) gelegt werden. (Zur not kann man die auch mit in die Tabelle einbinden - die höhe dieser Zellen kann man ja verkleinern und als untertitel bezeichnen) Die Restlichen Zeilen geben natürlich jeweils den rest an, also die Werte der zum Titel gehörigen option/Spalte.

Ich hoffe ich habe nun nichts vergessen zu sagen und es ist verständlich genug. Ich bin dankbar für Codes &-beispiele oder auch vernünftige Tutorials.

(Keine aussagen wie " Nimm DataGridView und machs mit StreamReader" oder so ein Zeug !!! Wenn ich mir "denken" könnte wie es geht, würde ich nicht nach code beispielen o.ä. fragen.)

Gruß Patrick.

...zur Frage

Per BATCH einer .csv-Tabelle vorgegebene fortlaufende Nummern hinzufügen?

folgende Situation:

Ich habe eine .csv-Tabelle mit Artikelbezeichnungen, Preisen usw. Die erste Spalte hat die Überschrift "Artikelnummern" und ist ansonsten leer.

Dazu habe ich eine zweite .csv-Datei mit Artikelnummern.

Kann ich diese Artikelnummern per BATCH automatisch in die leere Artikelnummernspalte der ersten csv kopieren ohne den Rest der Tabelle dabei anzugreifen?

Also die Artikelnummern aus der zweiten csv sollen in die leere erste Spalte der ersten csv.

Wäre super, wenn da jemand einen Tipp hat.

Per Hand reinkopieren möchte ich gerade vermeiden weil ich das pro Tag mit etlichen csv-Tabellen machen müsste ;)

Lieben Gruß :)

...zur Frage

Excel VBA - Darstellung waagerecht-vertikal beim kopieren ändern?

Hallo,

ich habe in einer fertigen Tabelle etwas geändert, um die Eingabe der Daten zu erleichtern. Statt die Daten in der Spalte zu erfassen, werden die Daten jetzt in einer Zeile eingegeben.

Also statt vorher in B10, B11, B12... jetzt in B10, C10, D10...

Die Daten werden mit Hilfe eine Makros in eine andere Tabelle transferiert und waagerecht eingefügt.

Da ich aber die Eingabeart verändert habe, werden die Daten jetzt untereinander in die Tabelle eingefügt.

Ich weiß, dass das mit "Application.Transpose" zu tun hat.

Nun weiss ich aber nicht wie ich die Zeile umbenennen muss, damit die waagerechte Darstellung übernommen wird.

Wie ändere ich die Zeile, damit die angesprochenen Werte waagerecht in die Zeile kopiert werden?

Hier der komplette Code:

Sub transfer_werte()
    Dim rngKunde    As Excel.Range
    Dim rngReklam   As Excel.Range
    Dim rngArtikel   As Excel.Range

     Set rngKunde = Worksheets("Eingaben").Range("C5:C10")
    Set rngReklam = Worksheets("Eingaben").Range("D5:D9")
    Set rngArtikel = Worksheets("Eingaben").Range("C14:L14")
   
        With Worksheets("Liste")
          With .Cells(.Rows.Count, 2).End(xlUp)
               .Offset(1, 0).Resize(rngKunde.Columns.Count, rngKunde.Rows.Count).Value = Application.Transpose(rngKunde.Value)
        End With
    End With
   
    With Worksheets("Liste")
        With .Cells(.Rows.Count, 8).End(xlUp)
             .Offset(1, 0).Resize(rngReklam.Columns.Count, rngReklam.Rows.Count).Value = Application.Transpose(rngReklam.Value)
        End With
    End With
  
   With Worksheets("Liste")
        With .Cells(.Rows.Count, 14).End(xlUp)
             .Offset(1, 0).Resize(rngArtikel.Columns.Count, rngArtikel.Rows.Count).Value = Application.Transpose(rngArtikel.Value)
        End With
    End With
      
End Sub

...zur Frage

VBA Excel mit Eingabemaske anderes Excel Blatt bearbeiten?

Hallo, folgendes Problem: Habe eine Eingabemaske erstellt, die mir Zeilen ausgibst mit einem Suchfeld. Diese kann man dann ändern, löschen etc. und diese werden für ein Programm gebraucht. So, das Programm nimmt aber nur einbe Excel Liste mit anderem Format und nun muss ich mittels der Eingabemaske die andere Datei öffnen und dann soll die Maske über diese Datei arbeiten. Die Tabelle ist vom Aufbau her genau identisch. muss also nur den Befehl haben um das öffnen, bearbeiten, speichern und schließen. Also die andere Datei dann. Füge anbei mal den Code von dem Button 'Suchen' hinzu:

    Private Sub CommandButton2_Click()
    Workbooks.Open "C:\Users\SchuehlJ\Desktop\Excel\DB_Versand102x76.xls"
      Dim suchen As Excel.Range

  With Tabelle1
     
    Set suchen = .Range(.Cells(2, "A"), .Cells(.Rows.Count, "A").End(xlUp))
     
    Set suchen = suchen.Find(TextBox1.Text, LookIn:=xlValues, LookAt:=xlWhole)
     
    If Not suchen Is Nothing Then

      TextBox2.Text = .Cells(suchen.Row, "B").Value
      TextBox3.Text = .Cells(suchen.Row, "C").Value
      TextBox4.Text = .Cells(suchen.Row, "D").Value
      TextBox5.Text = .Cells(suchen.Row, "E").Value
      ListBox1.AddItem .Cells(suchen.Row, "A").Value
      
      

    Else
    
          Call MsgBox("PN Nummer: " & "'" & TextBox1.Text & "' wurde nicht gefunden.")
          ListBox1.Clear
          TextBox1.Text = ""
          
        End If
    End With
    End Sub

Hoffe ihr könnt mir helfen,

LG Julian

...zur Frage

PowerShell doppelte Einträge aus CSV entfernen?

Ich habe etwas mit PowerShell programmiert. Am Ende exportiert er die Daten in eine CSV Datei. Meine Frage wäre jetzt, kann man, wenn z.B. bereits der Computername bereits in der CSV existiert diese ganze Zeile aus der CSV löschen und durch den aktuelleren (doppelten zweiten Wert) ersetzten?

...zur Frage

Outlook akzeptiert csv-Datei nicht?

Hallöchen, ich dachte schon, ich hätte das Problem gelöst...
Ich habe eine Liste E-mail-Adressen aus einer odt-Datei als txt-Datei abgespeichert und diese dann in eine Calc-Tabelle kopiert. Von dort habe ich sie als csv abgespeichert. Doch leider hat der Outlook die CSV-Datei nicht akzeptiert.

Ich erhielt folgende Fehlermeldung:

Das Format der Datei ist nicht korrekt. Stellen Sie sicher, dass die Datei im Outlook-CSV-Format exportiert wurde.

Nun habe ich unter Abspeichern in der Calc-Tabelle kein anderes csv gefunden...

Ich habe die Datei nun in Excel 2007-365 abgespeichert, aber von dort gibt es auch kein extra Outlook-CSV...

...zur Frage

CSV-Datei über HTML und PHP in MySQL Datenbank übergeben?

Hey.

Ich soll ein HTML und PHP Skript schreiben, mit welchem man eine CSV-Datei hochladen kann. Das Skript soll eine MySQL Datenbank (auf XAMPP bzw. PhpMyAdmin) leeren und dann die Datei einfügen.

Danke für jede Hilfe und Antwort :)

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen