Suchergebnisse

Hallo ihr lieben, ich habe folgendes Problem. Ich habe einen Ordner, nennen wir in Akten. In diesem Ordner befinden sich Unterordner, nennen wir sie Aktengruppe A,B,C.... (deren Anzahl sich im Zeitverlauf verändern kann). in diesem Unterordnern befinden sich Excel Dateien, aus denen Daten von einem Reiter ausgelesen(Standardisierte Excel, in jedem Excel stehen die Infos bspw. im 10.Reiter von B1:B30) werden sollen und allesamt in ein Excel exportiert werden sollen, so dass ein neues Excelsheet m…

Ich hoffe, ich habe mich verständlich ausgedrückt. -.- falls fragen sind, ich warte

Vielen Dank dir! Das hat mir schon sehr weiter geholfen jedoch sagt er mir nun bei zeile 29 "end with" erwartet. mit end with ist es jedoch auch nicht möglich füge ich beides ein, also "end with" und "end sub" sagt er "nach end sub können nur kommentare stehen" und zeile 31 ist makiert. Woran kann das liegen?

hallo nochmal, gut, dass mit dem Problem von oben habe ich lösen können. Jetzt habe ich meine Sachen, die ich mit der Excell vorhabe, hineingepackt. Es läuft auch durch und kommt keine Fehlermeldung mehr, jedoch passiert halt am Ende nichts Also es kommt nichts raus. Ich weiß leider nicht, wo der fehler liegt, da ich (wie man merkt) nicht so viel Erfahrung mit VBA habe. Es ist schwierig (für mich) den befehl zu erteilen ,dass solange gesucht werden soll, 1) bis kein Ordner mehr übrig ist, 2) bis…

Hey. Danke schonmal für den Tipp! Ich habe ja oben Set wkb = Workbooks.Open(Path & oFile) Set wks = wkb.Sheets(oTabName) das gemacht, so dass ich später beim auslesen der Excel sagen kann, was genau ich will. Jedoch kommt dann der Fehler 1004 und er sagt, er kann den Ordner nicht finden. Kann ich das in diesem Fall nicht mit wkb und wks machen? wie kann ich sonst die Excel Cells zuordnen? Danke nochmal!

das habe ich mir auch gedacht und habe beides ausprobiert. dann kommt aber auch der fehler. entweder er sagt, er kann auf die Daten nicht zugreifen. sie seien unter umständen schreibgeschützt. das habe ich aber geprüft und es ist nichts schreibgeschützt... (ohne \) und mit \ sagt er: er kann den ordner nicht finden. ich denke ohne \ ist schon richtig, da er dann ja noch auf unterordner zugreifen muss. Es kommt halt die ganze Zeit dass er die Daten nicht finden kann, wobei der Pfad auf jeden Fall…

Hat noch jemand eine Idee? -.- Ich bin verzweifelt alles was ich probiere klappt nicht

gelöscht? Es ist nichts gelöscht. Alles da wo es sein soll ich kann mir vorstellen, dass die codes sich iwie beißen. aber da ich nicht so viel ahnung habe, weiß ich nicht, wo der fehler sein kann

Hab den Fehler gefunden. dadruch, dass bei Set wkb = Workbooks.Open(oFile) am Anfang (path & oFile) stand, wurde 2x der PFad aufgerufen... Allerdings zeigt er mir als nächstes an. Set wks = wkb.Sheets(strTabName) --> Fehler: Index außerhalb des gültigen Bereichs Woran kann das bei mir liegen? Sorry, dass ich so viel frage. Habe am Mittwoch die Aufgabe auf der Arbeit bekommen und vorher noch nie mit VBA gearbeitet

haha, ich weiß.. es ist sonntag. aber es lässt mich nicht locker wenn etwas nicht so funktioniert wie es soll! Deshalb hab ich die Ordner zu Hause einfach nachgebaut "Datensheet" exisitert.. das habe ich bereits nachgeschaut... wie kann ich denn direkt fehler abfangen?

Wie mache ich das? -.- theoretisch ist es ganz einfach. Ich habe den Überordner "Daten" dadrunter ordner mit "süd" "ost", "west" etc... ( es können theoretisch immer mehr werden, deshalb sollte VBA nicht begrenzt sein) und in den Ordnern jeweils excel (ebenfalls nicht begrenzte anzahl) der einfache nachbau ist eigentlich, dass jede excel ein tab hat mit "Datensheet" hat und dort die zweite Spalte, also "B", ausgefüllt ist. B ist auf jeden Fall ausgefüllt. es kann jedoch auch bis D,E,F gehen. Led…

Anbei der Ordner. Das ist wirklich sher einfach aufgebaut und hab auhc nur ein paar Zeilen ausgefüllt und nicht bis 31. Das war mir dann zu lang. Die Länge variieren sollte ja dann das einfachste Problem sein. Habe in den Excel auch die Beschriftung mit Name1, Name2 etc weggelassen. Habe einfach nur die Spalten ausgefüllt, die ich dann auslesen will. Also sehr einfach alles gehalten.

Hoffe es ist verständlich, was ich erreichen will -.-

ahh! Vielen DAnk für deine schnelle Antwort! Da hätte ich lange suchen können -.- ich habe jetzt den Pfad ausgetauscht. aber jetzt sagt er noch: Fehler beim kompilieren: Benutzerdefinierter Typ nicht definiert. nach dem debug ist zeile 28 makiert. bzw. in grau auch noch f as folder. hab ich noch was vergessen zu erneuern?

ahh! Danke, das kannte ich noch nicht! Wenn ich jetzt die Lösung durchlaufen lasse. Meckert das Programm nicht mehr. Viel besser als VOrher Allerdings ist nur die erste Zeile ausgefüllt... und die Überschriften fehlen auch. Es ist nur die erste Zeile von Beispiel 4 ausgefüllt..

Achso oke. Ja ich hab die Auslesedatei nicht reingetan.. stimmt. aber der code war eh der gleiche wie im anderen Thema. bzw. fast genauso wie in diesem Thema. Dann schaue ich mal, wie ich das Inhalte füllen automatisch hinbekomme! Trotzdem danke noch mal

ne. also es kann sein dass in einer gruppe 2 verschiedene einheiten sind. die sollen dann getrennt aufgezählt werden. wenn die vohrer in süd waren und dann in spalte b und c zwei verschiedene einheiten waren. sollen sie in der auslesedatei unter einander stehen. es kann jedoch auch sein, dass in einer gruppe nur 1 einheit ist. oder dass es sogar 3 sind. die sollen dann einfach ausgelesen und unter einander in der enddatei erscheinen

jaaa genau! Ah wie gut! danke danke danke! Das werde ich direkt morgen mal mit den echten daten ausprobieren! Du hast mir sehr geholfen! Vielen Dank! Jetzt versuche ich morgen noch die neuen sachen nach zu vollziehen. so dass ich in zukunft das selber kann! Vielen Dank!

ja danke für die tipps! Hab eh schon alles doppelt. damit nichts verloren oder kaputt geht

eine frage habe ich dann doch noch.. theoretisch funktioniert alles einwandfrei!! vielen Dank noch mal! Allerdings sind die echten Exceldateien auf der Arbeit so konstruiert, dass nach jeden Öffnen gefragt wird, ob man speichern will... auch wenn nichts verändert wurde... wie kann man das ausstellen? Ich weiß, es kann daran liegen, dass Anweisungen benutzt wurden, die sich bei jedem Öffnen aktualisieren, wie zb "aktuelles Datum". ich habe davon aber shcon einige kontrolliert und das trifft nicht…

hey.. ne leider nicht... es kommt stets der Laufzeitfehler 1004. "Dieser Befehl kann für ein geschütztes Blatt nicht verwendet werden. Sie müssen zuerst den Schutz des Blatts aufheben (Registerkarte "Überprüfen" ....etc), um den Befehl zu verwenden. Das hab ich natürlich überprüft. Die Blätter sind nicht schreibgeschützt. auch wenn ich über "Eigenschaften" schaue, ist ein Schreibschutz aktiviert. Aber sollte ja eigentlich egal sein, ich will ja nur auslesen und eh nichts ändern... Es wird stehts…

ja.. das problem ist nur. das Blatt ist nicht geschützt und ich kann sogar änderungen im blatt vornehmen... Dennoch werde ich jedes Mal nach speichern gefragt, obwohl ich aktiv nichts ändere. kann man diese volatilen Änderungen umgehen? so dass man nicht mehr nach speichern gefragt wird?

ach hey perfekt. es funktioniert ich hatte eben auch shcon das false eingebaut.. aber anscheinend nicht richtig. es funktioniert alles so wie es soll Vielen Dank! Ich bin begeistert