Das faszinierendste an VBA ist einfach diese Unendlichkeit der Möglichkeiten !! Und wenn noch dazu Spezialisten wie Kai das so einfach und verständlich erklären …..perfekt !! Kannst vielleicht mal ein Special über Range bzw. Objekte allgemein machen ? Sg Fritz
Hallo Kai! Respekt und vielen Dank für das mehr als nützliche Video! Auch deine anderen Videos sind sehr strukturiert, mega gut erklärt und dienen sehr sich schnell und gut in VBA zurecht zu finden! Mit solchen Videos u. deiner Gabe für Erklärungen hinterlässt man seinen Fußabdruck im Leben! Ich bin fasziniert! Danke! :)
Vielen Dank für dieses Video! Ich habe mir eine ganz ähnliche Prozedur geschrieben. Sie hatte allerdings ein paar Macken. Mit Deiner Version bin ich jedoch deutlich flexibler. Eine Sache habe ich jedoch noch nicht geschafft: Ist es möglich beim Kopieren der Daten auch auch die Spaltenbreite mitzunehmen? Vielen Dank!
Sehr gerne :) Es freut mich, dass dir meine Version gefällt. Du kannst mit Spalte.ColumnWidth die Spaltenbreite auslesen und bei den neuen Spalten so anpassen. LG Kai :)
Echt Spitze! Genau das habe ich gesucht. Eine kleine Frage hätte ich noch dazu: Was muss der Prozedur hinzugefügt werden, damit die neu erstellten Tabellenblätter nicht den Namen "Tabelle1" haben sondern auch jeweils den gefilterten Namen (Pisichen, IVV usw..). Sorry und zweite Frage: Passend zu deinem Video "Tabs vereinigen" wie würde ich im zweiten Schritt die einzelnen Tabellen Pisichen, IVV usw. automatisch einlesen und quasi wieder vereinigen?
Lieber Julian! Danke für dein Feedback und deine Fragen. Die verschiedenen Tabellenblatt Aktionen (eben auch das Umbenennen) erkläre ich hier: th-cam.com/video/iZWeBuvM8ig/w-d-xo.html Zur Frage Dateien Zusammenführen habe ich dieses Video: th-cam.com/video/k5OyVBM7heY/w-d-xo.html Und um die Tabs zu vereinigen schaue dir gerne dieses Video an: th-cam.com/video/1NZToKav8Vs/w-d-xo.html Schreibe mir gerne, ob es geklappt hat. Lg, Kai
@@KaiWeissmann Perfekt. Vielen Dank. Hat geklappt. Habe es ganz einfach gelöst, nach dem kopieren in einen neuen Tab: ActiveSheet.Name = ActiveSheet.Range("C3").Value. Auch dein Video zum einlesen/also zusammenführen von Excel Tabs ist sehr hilfreich gewesen! DANKE Kai weiter so!
Hallo Kai, vielen Dank für dieses Video. Wenn ich aus der Ausgangstabelle nur einige bekannte Produktnamen filtern und exportieren möchte, würde es reichen, diese nacheinander im Makro abzuarbeiten? Danke nochmals, Andreas.
Ganz tolles Video! Frage: Meine Firma hat als "Default" die Anforderung, dass man eine Vertraulichkeitsbezeichnung (Public, Internal Use, etc.) hinzufügen muss. Wie kann ich bspw. immer einen "Internal Use" mit dem Makro hinterlegen? Vielen Dank für deine Antwort.
Hallo Kai, das ist echt klasse, was du da zur Verfügung stellst. Anhand deines Videos konnte ich als VBA-Neuling gleich erfolgreich eine Datei in dutzende Einzeldatein trennen ! :-) Kann man in dem Befehl denn auch gleich eine Formatierung der Kopf- und Fußzeilen der neuen Dateien einbauen?
Hallo Ich hätte ein Problem zu dem ich eine Lösung suche. Und zwar möchte ich alle Arbeitsmappen einer Excel Datei nach bestimmten Kriterien (also mehr als eins mit oder Verknüpfung) Filtern (Inhalt einer Zelle) und dann die dazugehörigen Zeilen in einer Neuen Excel Tabelle (Idealerweise als extra Datei) ausgeben. Kannst du mir bei diesem Problem helfen?
Hallo, ich habe ein kleines Problem mit der Prozedur. Ich komme am Ende nicht über die Abfrage der Keys hinaus. Es springt immer zwischen dic cell und next cell hin und her, und geht nicht weiter. Die Einzelprozedur funktioniert einwandfrei.
Hey Andreas! Da die Überschrift auch Visible ist wird diese natürlich auch mitkopiert. Du könntest z.B. die Zeile der Überschrift im Code ausblenden und danach wieder einblenden. Hoffe das hilft dir. Lg, Kai
Lieber Kai! Vielen Dank für Deine Videos, die mir als blutiger Anfänger so behilflich sind! ich kämpfe mich durch! Was muss ich machen, wenn ich nur die Tabelle kopieren will! Da hier ja alles sichtbare kopiert wird - übertrage ich mir auch andere Sachen von dem Blatt? Viele Grüße aus Berlin! Sascha
Hallo Sascha, freut mich, dass dir die Videos auch als blutiger Anfänger behilflich sind! Wenn du die ungefilterte Tabelle kopieren willst, dann kannst du SpecialCells weglassen und nur rng.Copy schreiben. LG Kai
Hallo Kai, wunderbar. Aber wie kopiere ich meine Daten aus dem Listobject in die letze leere Zeile eines anderen Listobjects? Ich krieg das einfach nicht angesprochen. Ein Video hierzu wäre natürlich großartig 😅
Ich würde eine neue Zeile in das Listobject(2) einfügen mit .add Und dann mit rows.count diese Zeile auslesen und hier dann die Daten von Listobject(1) einfügen. Hoffe das hilft dir. Lg, Kai
wunderschöne videos echt hilfreich was man alles machen kann hab schon 1-2 sachen benützt echt toll hab für dich noch 3 fragen: und di andere frage: hab diese zu den jeweiligen videos geschrieben hoff du kannst mir es beantworten bzw ein eig video machen danke km vorraus
Tolles Video, wie immer tolle Arbeit :D Hab schon sooooo viel gelernt durch deine Videos und habe auch schon deinen Kurs gestartet. Kann ich jedem nur empfehlen!!!!!!!!!!!!!!!!!!! Hätte nur eine Frage zu diesem Video. Spezial zu Minute 11:50 Ich würde gerne den Tabellenblattnamen und die Spaltenüberschrift als Variable einbauen, aber mir kommt leider ein Syntaxfehler. Wäre echt toll wenn du mir da helfen könntest - vielen Dank!
Das müsste mit einer Stringverkettung funktionieren: Also (VariableTabellenblatt & "[" & Variable Spaltenüberschrift & "]") . Ich hoffe das hilft dir weiter.
Guten Tag Kai, könntest Du mir bitte bei meinem Problem helfen? Ich komme bei meinem Code nicht weiter und brauche unbedingt deine Hilfe. Ich habe leider ein kleines Problem mit Excel VBA und komme nicht weiter. Mein Problem sieht folgendes aus: Ich habe zwei Worksheets, "Liste" und "Eingabe". Ich will in "Eingabe" die Zellen L15, Q13 und Q15 was ausfüllen. Danach soll mithilfe eines Makros in "Worksheets("liste") nach der Zeile mit diesen 3 Kriterien gefunden werden. Der entsprechende Wert von L15 soll in Spalte("F:F"), der von Q13 in der Spalte ("I:I") und der von Q15 in der Spalte("J:J") in dem Worksheet("Liste") gesucht werden. Wenn Diese Zeile gefunden wird, dann soll sich der Wert dieser Zeile in der Spalte( "L:L") um den Wert des Feldes("Q19") im Worksheet("Eingabe") erhöht werden. Wenn die Zeile mit den 3 Suchkriterien nicht gefunden wird, dann soll eine neue Zeile in Worksheet("Liste") mit diesen drei Werten erstellt werden. Aber eben so, dass der Wert von L15 in die Spalte F, der von Q13 in der Spalte I, der von Q15 in der Spalte J und der von Q 19 in der Spalte L in der Liste stehen. Vielleicht denke ich gerade zu kompliziert. Ich freue mich über jede Antwort und deine geschätzte Hilfe. Grüße, Mo
Hallo Kai Danke für die super Erklährung, ich würde gerne Daten von einer Tabelle in die andere Tabelle verschieben. Wie würde dieser Code lauten? Ich freue mich von dir zu hören. Grüsse aus der Schweiz. :)
Wow, ich schreib meine Bachelorarbeit. Hab ein Excelproblem und der Sänger von Ikarus, mit dem ich schon mehrmals Bühnen geteilt habe, erzählt mir auf einmal was über besagtes Problem. Auf TH-cam. Die. Welt. Ist. Klein.
Hallo Kai, Vielen dank für deine Tollen Videos ! Ich habe mir durch deine Tutorials schon einiges aneignen können und ein Tool für die Arbeit schreiben können, was mir Viel arbeit abnimmt. Das Video zum Autofilter wäre fast perfekt gewesen für meine anwendung wenn noch ein Datums filter dabei wäre. Vieleicht könntest du in Zukunft noch ein Video zu folgender Situation machen: Ich hab in meiner Tabelle in Spalte A ein Produkt und in Spalte " ein Ablaufdatum stehen. Auf meiner Startseite(anderes Tabellenblatt soll mir das Produkt welches in den nächsten 2 Monaten abläuft angezeigt werden. Also Quasi ein Filter der jetzt nach "Feb, März, Apr." Filtert und im März dann von "März, April, Mai" Leider bekomme ich den Autofilter mit dem Datum Heute bis in 2 Monaten nicht hin. LG Marco
Hallo Marco! Vielen Dank für dein Kommentar und den Videovorschlag. Ich nehme das gerne in meine Ideensammlung mit auf. Alles Gute für dein Projekt. Lg, Kai
Hallo Kai, Dieses Video ist fast exakt das, was ich brauche. Allerdings habe ich in meiner Datei mehrere Blätter und brauche den selben Vorgang wie in deinem Video für alle Blätter. Ist das auch möglich? Hast du dazu auch schon ein Video? lg Daniel PS: Ich finde es super wie du die einzelnen Schritte erklärst und somit ein Verständnis für alles bildest
Hallo Kai, bin immer wieder fasziniert darüber, wie Du das alles erklärst. Es wird nie langweilig...weiter so !
Grüße
Marco
Hey Marco!
Danke für dein Kommentar und Feedback!
Lg, Kai
Lieber Kai, wieder ein sehr geiles Video, ich könnte Dir stundenlang zusehen und mitmachen!!! Danke Dir sehr!
Hey Chris!
Vielen Dank für dein Feedback!
Lg, Kai
Das faszinierendste an VBA ist einfach diese Unendlichkeit der Möglichkeiten !!
Und wenn noch dazu Spezialisten wie Kai das so einfach und verständlich erklären …..perfekt !!
Kannst vielleicht mal ein Special über Range bzw. Objekte allgemein machen ?
Sg Fritz
Hey Fritz!
Vielen Dank für dein Feedback und den Video-Vorschlag!
Ich nehme diesen gerne in die Ideensammlung mit auf.
LG, Kai
sehr wertvoller Content und ausgezeichnet vorgetragen. sehr angenehm vorgetragen. Dankeschön!
Hey jimbosen14!
Danke für dein Feedback!
Lg, Kai
Hallo Kai!
Respekt und vielen Dank für das mehr als nützliche Video! Auch deine anderen Videos sind sehr strukturiert, mega gut erklärt und dienen sehr sich schnell und gut in VBA zurecht zu finden! Mit solchen Videos u. deiner Gabe für Erklärungen hinterlässt man seinen Fußabdruck im Leben! Ich bin fasziniert! Danke! :)
Hey Tommy Lii!
Vielen Dank für dein Feedback!
Lg, Kai
Super Video und super erklärt. Damit kann ich meine Spesenzettel besser ausfüllen lassen. :-)
Hey TruckerHepp!
Vielen Dank für dein Kommentar.
Freut mich, dass du es gleich in deine Anwendung einbinden kannst.
Lg, Kai
Respekt! Super erklärt und ein sehr schlanker Code :)
Lieber Olli!
Vielen Dank für dein Feedback! :-)
Lg, Kai
Tolles Video! Danke Kai
Hey ains INFO!
Danke für dein Feedback!
Lg, Kai
Vielen Dank für dieses Video! Ich habe mir eine ganz ähnliche Prozedur geschrieben. Sie hatte allerdings ein paar Macken. Mit Deiner Version bin ich jedoch deutlich flexibler. Eine Sache habe ich jedoch noch nicht geschafft: Ist es möglich beim Kopieren der Daten auch auch die Spaltenbreite mitzunehmen? Vielen Dank!
Sehr gerne :) Es freut mich, dass dir meine Version gefällt.
Du kannst mit Spalte.ColumnWidth die Spaltenbreite auslesen und bei den neuen Spalten so anpassen.
LG Kai :)
Echt Spitze! Genau das habe ich gesucht. Eine kleine Frage hätte ich noch dazu: Was muss der Prozedur hinzugefügt werden, damit die neu erstellten Tabellenblätter nicht den Namen "Tabelle1" haben sondern auch jeweils den gefilterten Namen (Pisichen, IVV usw..). Sorry und zweite Frage: Passend zu deinem Video "Tabs vereinigen" wie würde ich im zweiten Schritt die einzelnen Tabellen Pisichen, IVV usw. automatisch einlesen und quasi wieder vereinigen?
Lieber Julian!
Danke für dein Feedback und deine Fragen.
Die verschiedenen Tabellenblatt Aktionen (eben auch das Umbenennen) erkläre ich hier: th-cam.com/video/iZWeBuvM8ig/w-d-xo.html
Zur Frage Dateien Zusammenführen habe ich dieses Video: th-cam.com/video/k5OyVBM7heY/w-d-xo.html
Und um die Tabs zu vereinigen schaue dir gerne dieses Video an: th-cam.com/video/1NZToKav8Vs/w-d-xo.html
Schreibe mir gerne, ob es geklappt hat.
Lg, Kai
@@KaiWeissmann Perfekt. Vielen Dank. Hat geklappt. Habe es ganz einfach gelöst, nach dem kopieren in einen neuen Tab: ActiveSheet.Name = ActiveSheet.Range("C3").Value. Auch dein Video zum einlesen/also zusammenführen von Excel Tabs ist sehr hilfreich gewesen! DANKE Kai weiter so!
@@Julian-rh8ct super, dass es geklappt hat und vielen Dank für dein Feedback! LG Kai
Hallo Kai,
vielen Dank für dieses Video. Wenn ich aus der Ausgangstabelle nur einige bekannte Produktnamen filtern und exportieren möchte, würde es reichen, diese nacheinander im Makro abzuarbeiten?
Danke nochmals, Andreas.
Ganz tolles Video! Frage: Meine Firma hat als "Default" die Anforderung, dass man eine Vertraulichkeitsbezeichnung (Public, Internal Use, etc.) hinzufügen muss. Wie kann ich bspw. immer einen "Internal Use" mit dem Makro hinterlegen? Vielen Dank für deine Antwort.
Super erklärt
Hey Matthias!
Vielen Dank für dein Feedback!
Lg, Kai
Hallo
Gibt es eine Möglichkeit, damit das dictionary items nicht aufnimmt welche durch einen autofilter zuvor nicht mehr in der tabelle sind?
Hallo Kai, das ist echt klasse, was du da zur Verfügung stellst. Anhand deines Videos konnte ich als VBA-Neuling gleich erfolgreich eine Datei in dutzende Einzeldatein trennen ! :-) Kann man in dem Befehl denn auch gleich eine Formatierung der Kopf- und Fußzeilen der neuen Dateien einbauen?
Hallo Ich hätte ein Problem zu dem ich eine Lösung suche.
Und zwar möchte ich alle Arbeitsmappen einer Excel Datei nach bestimmten Kriterien (also mehr als eins mit oder Verknüpfung) Filtern (Inhalt einer Zelle) und dann die dazugehörigen Zeilen in einer Neuen Excel Tabelle (Idealerweise als extra Datei) ausgeben. Kannst du mir bei diesem Problem helfen?
Hallo, vielleicht hilft dir folgendes Video weiter: th-cam.com/video/cPTwz-nyu0I/w-d-xo.html
LG Kai
Hallo, ich habe ein kleines Problem mit der Prozedur. Ich komme am Ende nicht über die Abfrage der Keys hinaus. Es springt immer zwischen dic cell und next cell hin und her, und geht nicht weiter. Die Einzelprozedur funktioniert einwandfrei.
Wiedermal ein super Video!
Eine kurze Frage: Wie kann ich verhindern, dass die Überschriften kopiert werden?
Hey Andreas!
Da die Überschrift auch Visible ist wird diese natürlich auch mitkopiert.
Du könntest z.B. die Zeile der Überschrift im Code ausblenden und danach wieder einblenden.
Hoffe das hilft dir.
Lg, Kai
Genial. Danke.
Sehr gerne!
Lieber Kai! Vielen Dank für Deine Videos, die mir als blutiger Anfänger so behilflich sind! ich kämpfe mich durch! Was muss ich machen, wenn ich nur die Tabelle kopieren will! Da hier ja alles sichtbare kopiert wird - übertrage ich mir auch andere Sachen von dem Blatt? Viele Grüße aus Berlin! Sascha
Hallo Sascha, freut mich, dass dir die Videos auch als blutiger Anfänger behilflich sind! Wenn du die ungefilterte Tabelle kopieren willst, dann kannst du SpecialCells weglassen und nur rng.Copy schreiben. LG Kai
@@KaiWeissmann danke - es geht aber um die gefilterten Werte ;)
Hallo Kai,
wunderbar.
Aber wie kopiere ich meine Daten aus dem Listobject in die letze leere Zeile eines anderen Listobjects? Ich krieg das einfach nicht angesprochen.
Ein Video hierzu wäre natürlich großartig 😅
Ich würde eine neue Zeile in das Listobject(2) einfügen mit .add
Und dann mit rows.count diese Zeile auslesen und hier dann die Daten von Listobject(1) einfügen.
Hoffe das hilft dir.
Lg, Kai
wunderschöne videos echt hilfreich was man alles machen kann hab schon 1-2 sachen benützt echt toll
hab für dich noch 3 fragen:
und di andere frage:
hab diese zu den jeweiligen videos geschrieben
hoff du kannst mir es beantworten bzw ein eig video machen danke km vorraus
Hallo, freut mich, dass dir meine Videos gefallen :) LG Kai
Tolles Video, wie immer tolle Arbeit :D Hab schon sooooo viel gelernt durch deine Videos und habe auch schon deinen Kurs gestartet. Kann ich jedem nur empfehlen!!!!!!!!!!!!!!!!!!!
Hätte nur eine Frage zu diesem Video. Spezial zu Minute 11:50
Ich würde gerne den Tabellenblattnamen und die Spaltenüberschrift als Variable einbauen, aber mir kommt leider ein Syntaxfehler.
Wäre echt toll wenn du mir da helfen könntest - vielen Dank!
Das müsste mit einer Stringverkettung funktionieren:
Also (VariableTabellenblatt & "[" & Variable Spaltenüberschrift & "]") .
Ich hoffe das hilft dir weiter.
@@KaiWeissmann Danke Kai 👍
Guten Tag Kai,
könntest Du mir bitte bei meinem Problem helfen? Ich komme bei meinem Code nicht weiter und brauche unbedingt deine Hilfe.
Ich habe leider ein kleines Problem mit Excel VBA und komme nicht weiter. Mein Problem sieht folgendes aus:
Ich habe zwei Worksheets, "Liste" und "Eingabe".
Ich will in "Eingabe" die Zellen L15, Q13 und Q15 was ausfüllen. Danach soll mithilfe eines Makros in "Worksheets("liste") nach der Zeile mit diesen 3 Kriterien gefunden werden.
Der entsprechende Wert von L15 soll in Spalte("F:F"), der von Q13 in der Spalte ("I:I") und der von Q15 in der Spalte("J:J") in dem Worksheet("Liste") gesucht werden.
Wenn Diese Zeile gefunden wird, dann soll sich der Wert dieser Zeile in der Spalte( "L:L") um den Wert des Feldes("Q19") im Worksheet("Eingabe") erhöht werden.
Wenn die Zeile mit den 3 Suchkriterien nicht gefunden wird, dann soll eine neue Zeile in Worksheet("Liste") mit diesen drei Werten erstellt werden. Aber eben so, dass der Wert von L15 in die Spalte F, der von Q13 in der Spalte I, der von Q15 in der Spalte J und der von Q 19 in der Spalte L in der Liste stehen.
Vielleicht denke ich gerade zu kompliziert.
Ich freue mich über jede Antwort und deine geschätzte Hilfe.
Grüße,
Mo
Hallo Kai
Danke für die super Erklährung, ich würde gerne Daten von einer Tabelle in die andere Tabelle verschieben. Wie würde dieser Code lauten?
Ich freue mich von dir zu hören.
Grüsse aus der Schweiz. :)
Wow, ich schreib meine Bachelorarbeit. Hab ein Excelproblem und der Sänger von Ikarus, mit dem ich schon mehrmals Bühnen geteilt habe, erzählt mir auf einmal was über besagtes Problem. Auf TH-cam. Die. Welt. Ist. Klein.
Haha xD Freut mich, dass dir das Video geholfen hat. Alles Gute bei der Bachelorarbeit!
Hallo Kai,
Vielen dank für deine Tollen Videos !
Ich habe mir durch deine Tutorials schon einiges aneignen können und ein Tool für die Arbeit schreiben können, was mir Viel arbeit abnimmt.
Das Video zum Autofilter wäre fast perfekt gewesen für meine anwendung wenn noch ein Datums filter dabei wäre.
Vieleicht könntest du in Zukunft noch ein Video zu folgender Situation machen:
Ich hab in meiner Tabelle in Spalte A ein Produkt und in Spalte " ein Ablaufdatum stehen. Auf meiner Startseite(anderes Tabellenblatt soll mir das Produkt welches in den nächsten 2 Monaten abläuft angezeigt werden. Also Quasi ein Filter der jetzt nach "Feb, März, Apr." Filtert und im März dann von "März, April, Mai"
Leider bekomme ich den Autofilter mit dem Datum Heute bis in 2 Monaten nicht hin.
LG Marco
Hallo Marco!
Vielen Dank für dein Kommentar und den Videovorschlag.
Ich nehme das gerne in meine Ideensammlung mit auf.
Alles Gute für dein Projekt.
Lg, Kai
Hallo Kai,
Dieses Video ist fast exakt das, was ich brauche.
Allerdings habe ich in meiner Datei mehrere Blätter und brauche den selben Vorgang wie in deinem Video für alle Blätter.
Ist das auch möglich? Hast du dazu auch schon ein Video?
lg Daniel
PS: Ich finde es super wie du die einzelnen Schritte erklärst und somit ein Verständnis für alles bildest
Spontan würde ich sagen, dass du dafür eine For-Next Schleife über alle Tabellenblätter um den Vorgang herumlegst.
ich hoffe das hilft dir weiter.
Cool 👍
Danke!