Dynamische tabellen erstellen und in einanderes arbeitsblatt kopieren
Hallo allerseits,
Ich bin neu in der Excel vba - Programmierung. Zur Zeit soll ich eine Tabelle erstellen der vier Spalten fest hat und mindestens 10 Zeilen hat.
Unter der letzte Zeile von den letzten beiden Spalten soll ich die Summe der Spalten ausgeben mit einer leer Zeile dazwischen.
Wenn also alle 10 Zeilen gefüllt wurde soll automatisch eine 11te Zeile eingefügt werden usw.
Diese Tabelle grau umrandet, heißt zwei spalten hinter der letzte Spalte und vier Zeilen unter der letzte zeile(die summen zeile zählt nicht) sind grau gefärbt.
Die Tabelle soll dann automatisch in ein anderes Blatt kopiert werden.
ich weiß zur zeit nicht wie ich anfangen sollte.
Ich danke euch schonmal für eure Hilfe.
gruß
Hugo
Ich bin neu in der Excel vba - Programmierung. Zur Zeit soll ich eine Tabelle erstellen der vier Spalten fest hat und mindestens 10 Zeilen hat.
Unter der letzte Zeile von den letzten beiden Spalten soll ich die Summe der Spalten ausgeben mit einer leer Zeile dazwischen.
Wenn also alle 10 Zeilen gefüllt wurde soll automatisch eine 11te Zeile eingefügt werden usw.
Diese Tabelle grau umrandet, heißt zwei spalten hinter der letzte Spalte und vier Zeilen unter der letzte zeile(die summen zeile zählt nicht) sind grau gefärbt.
Die Tabelle soll dann automatisch in ein anderes Blatt kopiert werden.
ich weiß zur zeit nicht wie ich anfangen sollte.
Ich danke euch schonmal für eure Hilfe.
gruß
Hugo
Kommentieren
Teilen
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 331040
Url: https://administrator.de/forum/dynamische-tabellen-erstellen-und-in-einanderes-arbeitsblatt-kopieren-331040.html
Ausgedruckt am: 22.05.2025 um 06:05 Uhr
18 Kommentare
Neuester Kommentar
Moin,
als erstes würde ich mal die Tabelle erstellen.
Gruß Krämer
als erstes würde ich mal die Tabelle erstellen.
Gruß Krämer
1
Das habe ich getan aber wie mache ich dass die summe ständig die gleiche abstand zu Tabelle hat?
Tabelle markieren, und "Als Tabelle formatieren" wählen, dann wird die Tabelle zu einem Listobject welche automatische Summenzeilen haben kann, geht alles vollautomatisch!
Da muss man nicht manuell Hand anlegen
https://support.office.com/de-de/article/Formatieren-einer-Excel-Tabelle ...
Gruß
Da muss man nicht manuell Hand anlegen
https://support.office.com/de-de/article/Formatieren-einer-Excel-Tabelle ...
Gruß
das Klappt irgend wie nicht es wird ständig die letzte zeile kopiert.
???????
Freitag, natürlich ....!
Freitag, natürlich ....!
wenn ich auf ergebniszeile klicke wird nur eine neue zeile hinzugefügt in der das gleiche steht wie in der zeile darüber
Tja aber die ist dann dafür dynamisch und wandert automatisch nach unten wenn an darüber neue Zeilen einfügt z.B. durch drücken von Tab in der letzten Spalte Oder durch ziehen an am Rand!! Klick doch mal in die Zellen dieser Leiste, dann siehst du den Unterschied!
Bitte lese den Link oben dann müssen wir hier nicht dauernd die Anleitung zitieren.
Bitte lese den Link oben dann müssen wir hier nicht dauernd die Anleitung zitieren.
nun vielleicht habe ich die frage ungünstig formuliert, diese tabelle soll nicht ich selber ausfüllen sondern ich sollte ein Fomular bauen der so eine liste enthält danach soll diese dynamische tabelle auf einem anderen blatt kopiert werden und dann als pdf ausgegeben werden
Du sprichst immer noch in Kreuzworträtseln.
Das was du da faselst kann 100erte Bedeutungen haben für die es zig Umsetzungsmöglichkeiten gibt.
Mach doch bitte zwei Bildchen Vorher nachher und stell die hier ein, sonst wird das in diesem Leben nichts mehr!
Und dazu bitte eine vollständige Beschreibung mit Arbeitsablauf.
Das was du da faselst kann 100erte Bedeutungen haben für die es zig Umsetzungsmöglichkeiten gibt.Mach doch bitte zwei Bildchen Vorher nachher und stell die hier ein, sonst wird das in diesem Leben nichts mehr!
Und dazu bitte eine vollständige Beschreibung mit Arbeitsablauf.
hier sind die bilder :
die tabelle sollte so aussehen wie du siehst ist es ganzweit unten, ich habe es so gemacht damit du es siehst, der kollege hat sich für die einfache variante entschieden und die tabelle manuel gemacht, er will dass diese tabellle jet dynamisch erweitert wird.
ich habe das gemacht was du meinst hierst ist das zweite bild:
wie du siest sind die summen zwar dar aber das graue hintergrund hatte sich nicht mit verlängert.
nach dem diese tabelle ausgefüllt wurde, wird sie in ein anderes tabellen blatt kopiert, diese wurde auch von dem gleichen kollege manuell kopiert, also gibt es mehreren leeren seiten im pdf und die summen wert steht irgend wo allein auf einem blatt.
hier ist ein bild:
die tabelle sollte so aussehen wie du siehst ist es ganzweit unten, ich habe es so gemacht damit du es siehst, der kollege hat sich für die einfache variante entschieden und die tabelle manuel gemacht, er will dass diese tabellle jet dynamisch erweitert wird.
ich habe das gemacht was du meinst hierst ist das zweite bild:
wie du siest sind die summen zwar dar aber das graue hintergrund hatte sich nicht mit verlängert.
nach dem diese tabelle ausgefüllt wurde, wird sie in ein anderes tabellen blatt kopiert, diese wurde auch von dem gleichen kollege manuell kopiert, also gibt es mehreren leeren seiten im pdf und die summen wert steht irgend wo allein auf einem blatt.
hier ist ein bild:
wie du siest sind die summen zwar dar aber das graue hintergrund hatte sich nicht mit verlängert.
ganz einfach die ganze Zeile markieren indem du auf den Zeilenheader klickst und dann STRG + drücken 
, dann wird das richtig ergänzt und erweitert!Kopieren tut man mit
ActiveSheet.UsedRange.Copy Sheets("whatever").Range("A1")
Fertsch.
Zitat von @132272:
, dann wird das richtig ergänzt und erweitert!
Kopieren tut man mit
ActiveSheet.UsedRange.Copy Sheets("whatever").Range("A1")
Fertsch.
Das geht nicht.wie du siest sind die summen zwar dar aber das graue hintergrund hatte sich nicht mit verlängert.
ganz einfach die ganze Zeile markieren indem du auf den Zeilenheader klickst und dann STRG + drücken , dann wird das richtig ergänzt und erweitert!Kopieren tut man mit
ActiveSheet.UsedRange.Copy Sheets("whatever").Range("A1")
Fertsch.
Es soll automatisch ergäntzt werden, da diese ein Formular für Kunden ist, damit sie ihren Rechnung selber eintragen und man nicht von den kunden erwarten kann, dass sie sowas wissen tun
da diese ein Formular für Kunden ist, damit sie ihren Rechnung selber eintragen
Aha, und dein Kunde lässt das jemanden machen der überhaupt keine Ahnung von VBA hat ?? Armer Kunde kann man da nur sagen...Koppschüttel... typische Hugo-Verarsche Ermittelt die letzte Datenzeile und fügt eine neue ein:
ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Offset(1).Insert I'm out
man sollte ja immer vom schlimmsten ausgehen ;)
danke
danke
hi
noch mal zu der frage mit dem kopieren wie mache ich es dass es automatisch kopiert wird und dass auto matisch die gesammte Spalte kopiert wird?
noch mal zu der frage mit dem kopieren wie mache ich es dass es automatisch kopiert wird und dass auto matisch die gesammte Spalte kopiert wird?
Oh man, schon mal den Makrorekorder bedient??
Bei Spalten natürlich anstatt EntireRow, EntireColumn verwenden.
Doku lesen!
Gegen Cash mach ich dir das gerne passend ->PN
DeineZelle.EntireRow.Copy Sheets("Tabelle2").Range("A1") Doku lesen!
Gegen Cash mach ich dir das gerne passend ->PN
1
Danke habe es endlich
Bitte.
Na dann den Thread noch als gelöst markieren und wir sind hier fertig.
Gruß
Na dann den Thread noch als gelöst markieren und wir sind hier fertig.
Gruß
