ich habe mir per Macrorecorder und Internet eine Tabelle zusammengebastelt um mir die tägliche Arbeit zu erleichtern. Jetzt bin ich aber an meine Grenze gestoßen und finde auch nichts im Internet. Ich denke das man hier mit Schleifen arbeiten muss.
Ich versuche mal mein Problem zu beschreiben:
Ich möchte aus der Arbeitmappe "Wartungsarbeiten.xlsm" aus dem Tabellenblatt "Wartung" ca. 1.300 Datensätze von verschiedene Kunden bestimmte Daten je Einzelkunde in die Tabelle Arbeitsprotokoll eintragen (benötigt der Handwerker für seine Arbeit).
Die Daten der Kunden sind Zeilenweise in der Tabelle erfasst, ich habe zur Identifizierung jedem Kunden mit Hilfe einer Formel eine Zahl zugewiesen von 1 bis ... Kundenanzahl ist variabel.
Der Kunde Nr. 1 hat zum Beispiel 4 Datensätze (Zeilen) der Kunde Nr. 212 hat 67 Datensätze (Zeilen). Damit ich nicht von Hand die notwendigen Informationen von jedem Kunden in die Tabelle "Arbeitsprotokoll" schreiben muß wollte ich versuchen das Problem mit VBA zu lösen.
Folgende Lösung habe ich schon - ich Filter die Datei in der Spalte "Kundennummer" nach dem Eintrag "1" dann starte ich mein Macro dieses kopiert dann die Daten in eine Hilfstabelle und von dort in die Vorlage Arbeitsprotokoll.xlsx diese wird dann mit dem Eintrag in der Zelle A11 "Protokoll_Kunde_1".xlsx" abgespeichert
Das müsste ich aber bei dann jedes Jahr bei ca. 350 Kunden durchführen
Mein VBA Wunschlösung:
1.) Schritt
Öffne die Vorlage "Arbeitsprotokoll.xlsx"
2.) Schritt (Beginn Schleife)
Suche in dem Tabellenblatt "Wartung" in der Spalte "I" ab Zeile 7 (In Zeile 6 steht die Spaltenbezeichnung "Kundennummer") den ersten Kunde hier mit der zugewiesenen Nummerierung "1" dieser Kunde z.B 4 Zeilen mit Daten
3.) Schritt
kopiere aus den Zeilen von dem Kunde "1" den Inhalt der Zellen aus Spalte "A", "C" und "G" alle betreffenden Werte und füge die Werte (ohne Formate) in die Tabelle "Arbeitsprotokoll.xlsx" in das Blatt" Protokoll_Wartung" in die Zelle "A13", Zelle "B13" und Zelle "C13" (nach unten sind diese Spalten leer)
4.) Schritt
kopiere aus der ersten Zeile vom Kunde "1" den Inhalt der ersten Zellen aus Spalte "D", "E", "F" und "K" füge die Werte (ohne Formate) in die Tabelle "Protokoll.xlsx" Blatt "Protokoll_Wartung" Zelle "H9", Zelle "P9", Zelle "H10", und Zelle "A11"
5.) Schritt
Speichere und schließe die Tabelle mit dem Inhalt aus der Zelle "A11" als DateiName in das Verzeichnis C.... (kann ich eintragen)
...
Beginn Wiederholung
1.) Schritt
Öffne die Vorlage "Arbeitsprotokoll.xlsx"
2.) Schritt (Beginn Schleife)
......nächster Kunde
Ich hoffe ich habe es einigermaßen beschrieben.
Bitte daran denken ich habe mein wissen nur über Macrorecorder und Internet bin also ein nicht-wissender
Gruß Patte