Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
368to372
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
368to372
368to372
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereiche versch. Tabellen untereinander listen

Bereiche versch. Tabellen untereinander listen
25.01.2004 13:19:43
Michaela
Hallo,
ich versuche seit heute morgen per VBA ein Makro zu basteln - jetzt habe ich aufgeben.
Ich benötige ein Makro das aus allen sichtbaren Tabellen einer Arbeitsmappe jeweils den Bereich aus D27:H27 mit den darunterliegenden Zeilen (unterschiedliche Anzahl) in eine Zieltabelle (mit dem Namen "Gesamt" in der gleichen Arbeitsmappe) kopiert bzw. untereinander auflistet.
Kann mir jemand helfen - bin für jede Hilfe dankbar? Wäre echt Klasse!
Danke,
Michaela

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Nachtrag: Bereiche versch. Tabellen listen
25.01.2004 13:39:32
Michaela
Hier noch ein Nachtrag:
die unterschiedliche Zeilenzahl des zu kopierenden Bereiches ist immer die letzte zeile mit Inhalt
Mcihaela
AW: Nachtrag: Bereiche versch. Tabellen listen
25.01.2004 13:53:07
Josef Ehrensberger
Hallo Michaela,
ohne den Code geprüft zu haben (wollte die Tabelle nicht nachbauen)
sollte es so klappen.


Sub Kopieren()
Dim wkb As Workbook
Dim wks As Worksheet
Dim wksZ As Worksheet
Dim lngE As Long
Dim lngEZ As Long
Set wkb = ThisWorkbook
Set wksZ = wkb.Sheets("Gesamt")
   For Each wks In wkb.Worksheets
      If wks.Visible = xlSheetVisible And wks.Name <> "Gesamt" Then
      lngE = wks.Range("D65536").End(xlUp).Row
      'Spalte anpassen (D - H), welche immer gefüllt ist zum ermitteln des bereiches
      lngEZ = wksZ.Range("A65536").End(xlUp).Row + 1
      'ermitteln der ersten freien Zelle in "Gesamt"
      wks.Range(wks.Cells(27, 4), wks.Cells(lngE, 8)).Copy wksZ.Cells(lngEZ, 1)
      End If
   Next
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß Sepp
Anzeige
Danke ;-)) funktioniert
25.01.2004 14:00:25
Michaela
Hallo Sepp,
wow - Danke!
Funktioniert genau wie es sein sollte und das in der Geschwindigkeit (ich bastle seit 4 Std. dran rum ;-)))
Michaela
Danke für die Rückmeldung! o.T.
25.01.2004 14:02:11
Josef Ehrensberger
/

300 Forumthreads zu ähnlichen Themen

Zeilenmerkmale in Spalten umwandeln
MG_Learning

Hallo zusammen!
Ich habe keine Ahnung, wie ich aus folgender Tabellenstruktur: Beispiel:
A B C
London 20 Kinos
London 50 Gaststätten
London 10 Einkaufscentren
Paris 18...
17.08.2008 18:31:50
Thread-ID: 1002449
4 Beiträge
Anzeige
TEXT in Tabelle umwandeln
Martin

Liebe Forumteilnehmer,
möchste aus einem TEXT in WORD der bestimmte wiederholte, standardisierte Abschnitte - in diesem fall Name, Vorname, Geb-Datum, eine Tabelle generieren. Geht das mit einem Makro aus Excel heraus?
Danke
Martin
02.02.2009 17:26:48
Thread-ID: 1046338
4 Beiträge
Umwandeln PIVOT-Tabelle in reguläre Datentabelle
Susi

Hallo liebe Excel-Freunde,
ich habe eine Pivot-Tabelle aus einer umfangreichen Datenmenge erstellt und das Datum nach Quartalen gruppiert. Diese Daten der neuen Pivot-Tabelle möchte ich nun weiterverwenden. Das Problem dabei ist, das ich die Werte der Pivot-Tabelle in eine neue reguläre Dat...
04.02.2009 12:03:00
Thread-ID: 1046976
5 Beiträge
Anzeige
Matrix (mit leeren zellen) in Liste umwandeln
Wolfango

Hallo nochmal,
(diese Frage knüpft an die vorhin gestellte Frage an; nur diesmal mit einem anderen Ansatz)
Wie kann ich die in der angehängten Matrix (noch) vorhandenen Werte, über Formeln sauber in einer Liste (Spalte) zusammenführen?
Die Datei https://www.herber.de/bbs/user/61614...
05.05.2009 11:55:18
Thread-ID: 1073036
5 Beiträge
Zeilen in Spalten umwandeln
Thomas0815

Hallo zusammen,
gibt es eine Möglichkeit in Excel mit Daten ausgefüllte Zeilen einfach in Spalten umzuwandeln?
Danke für Hinweise.
Grüße,
Thomas
19.06.2009 18:21:46
Thread-ID: 1082987
5 Beiträge
Matrix in Tabelle umwandeln
Lutz

Hallo Forum,
ich habe eine Matrix, welche ich gerne in eine Tabelle umwandeln würde. Da es sich in echt um mehr als 1000 Einträge handelt, wäre es klasse, wenn auch die Spalten A und B der Ergebnistabelle automisch erzeugt werden würden.
Anbei mal eine Beispiel, welches ich händisch erz...
13.08.2009 01:24:21
Thread-ID: 1095446
10 Beiträge
Pivot Tabelle in Tabelle mit Spalten umwandeln??
okgi

Hallo liebe Excel Gemeinde!!
Meine Frage ist: wie kann ich eine Pivot Tabelle in eine Tabelle mit Spalten automatisiert überführen?
Zum Beispiel:
Pivot Tabelle
________KST_____________
Konto_.......1...........2...........3..
__A___.100,00................31,99
__B___...
15.12.2009 17:35:51
Thread-ID: 1124143
3 Beiträge
Makro Spaltendatensätze in Zeilen umwandeln
Notzm

Hallo Leute!
Ich habe eine Liste in welcher viele Datensätze in der Spalte A sind. (s. Ursprungsliste)
Dabei soll jeder Datensatz in einzelne Zeilen umgewandelt werden. (s. Zielliste)
Die Formatierung ist immer gleich.
Geht sowas?
Vielen Dank im Voraus!
Grüße Notzm
19.04.2010 15:56:35
Thread-ID: 1152649
9 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
5
3
4
2
4
4
9
2
8
4
5
16
6
3
1
5
1
13
7
1
10
2
2
3