Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
412to416
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
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen aus einer Tabelle in eine andere kopieren

Zeilen aus einer Tabelle in eine andere kopieren
juergen
Hallo ,
ich habe eine Tabelle mit mehreren Spalten. In Spalte A befindet sich das jeweilige Tagesdatum. Ich möchte nur die Daten aller Zeilen des aktuellen Tagesdatums (Heute() in eine andere Tabelle kopiert haben. Am nächsten Tag soll die Zieltabelle wieder leer sein und wieder nur die aktuellen Tagesdaten aus der Quelltabelle erhalten. Geht sowas über ein Makro?
Vielen Dank im voraus
Gruß
Jürgen
AW: Zeilen aus einer Tabelle in eine andere kopieren
Matthias
Hallo Jürgen,
macht es vielleicht nicht mehr Sinn, die Zeilen von gestern bei Bedarf auszublenden?
Gruß Matthias
AW: Zeilen aus einer Tabelle in eine andere kopieren
juergen
Hallo Matthias,
die Anwender haben wenig Ahnung. Die müssen nur auf eine schaltfläche drücken und die daten ausgedruckt bekommen. mit zeilen ausblenden würde ich denen zu viel zumuten.
Gruß Jürgen
AW: Zeilen aus einer Tabelle in eine andere kopieren
Matthias
Hallo Jürgen,
das ausblenden ginge ja mit dem Makro:
Zeilen ausblenden
Blatt drucken
Zeilen wieder einblenden
Gruß Matthias
AW: Zeilen aus einer Tabelle in eine andere kopieren
juergen
Hallo Matthias,
das wäre natürlich auch super, weiss nur nicht wie ich das machen soll.
Gruß
Jürgen
AW: Zeilen aus einer Tabelle in eine andere kopieren
Matthias
Hallo Jürgen,
kannst du hier sehen:

Sub HeuteDrucken()
Const Spalte = 1 ' Datum in Spalte 1
Dim lz As Long, i As Long
lz = Cells(65536, Spalte).End(xlUp).Row 'letzte benutzte Zeile
Application.ScreenUpdating = False
For i = 2 To lz 'ab zeile 2 (Kopfzeile!)
Cells(i, 1).EntireRow.Hidden = Not (Cells(i, Spalte).Value = Date)
Next i
Application.ScreenUpdating = True
'Blatt drucken:
'entweder
ActiveSheet.PrintOut
'oder
'Application.Dialogs(xlDialogPrint).Show
'Zeilen wieder einblenden
Rows("1:" & lz).Hidden = False
End Sub

Gruß Matthias
Anzeige
AW: Zeilen aus einer Tabelle in eine andere kopieren
juergen
Vielen Dank Matthias
AW: Danke für die Rückmeldung - o.T.
15.04.2004 22:15:28
Matthias
-
AW: Zeilen aus einer Tabelle in eine andere kopieren
Matthias
Hallo Jürgen,
also das geht z.B. so:

Sub KopiereHeute()
Const ez = 2 'bei einer Kopfzeile
Const Blattname_Heute = "Heute"
Dim lz As Long, i As Long
'evtl altes Blatt löschen
Application.DisplayAlerts = False
On Error Resume Next
Sheets(Blattname_Heute).Delete
On Error GoTo 0
Application.DisplayAlerts = True
'Aktives Blatt kopieren
Sheets("Tabelle1").Copy Before:=ActiveSheet.Next
ActiveSheet.Name = Blattname_Heute
lz = Range("A65536").End(xlUp).Row
Application.ScreenUpdating = False
'alles was nicht heute ist löschen
For i = lz To ez Step -1 '
If Cells(i, 1).Value <> Date Then
Rows(i & ":" & i).Delete Shift:=xlUp
End If
Next i
Application.ScreenUpdating = True
End Sub

Gruß Matthias
Anzeige
AW: Zeilen aus einer Tabelle in eine andere kopieren
19.04.2004 21:22:15
juergen
Hallo Matthias,
ich habe dir leider mein Problem nicht vollständig geschildert, deshalb funktioniert dein makro nicht so, wie ich es benötige. Meine Quelltabelle hat angenommen 40 Spalten. Ich möchte aber nur die Spalten a-g kopiert haben. Das zweite Problem, das Datum in Spalte A wird durch eine Formel gebildet (=Wenn(AA="";"";AA). Das echte Datum steht also in den Zellen der Spalte AA. Mit deinem Makro wird also die gesamte Tabelle kopiert und die Zeilen mit dem aktuellen Tagesdatum können nicht rausgefiltert werden, da in der Bezugzelle eine Formel steht. Gibt es hierfür auch eine Lösung?
Danke im voraus.
Gruß
Jürgen
Anzeige

308 Forumthreads zu ähnlichen Themen

Tabellenblätter in neue Arbeitsmappe kopieren
Christian

Hallo!
ich möchte gerne per makro aus einer datei mit ca. 70 tabellenblättern 11 Blätter auswählen und in eine neue Mappe kopieren, am besten sollten auch gleich noch die verküpfungen (in der neuen mappe) gelöscht werden.
Die zu kopierenden Blätter sind nicht hintereinander, also quer ü...
10.09.2008 16:37:00
Thread-ID: 1008845
6 Beiträge
Anzeige
Daten von und in andere Arbeitsmappe kopieren
und

Hallo,
ich wollte unten angeführte Makros folgendermaßen abändern:
Die Makros sollten aus Arbeitsmappe 1, die die zu ersetzenden DAten enthält, ausgeführt werden, d.h. es sollte kein Makro in Arbeitsmappe2 verwendet werden. Die Makros müssten also die Arbeitsmappe 2 öffnen, - die Werte...
28.02.2009 17:59:02
Thread-ID: 1055113
5 Beiträge
Datenübernahme in andere Arbeitsmappe
Uwe

Guten Morgen,
In einer Jahrestabelle (Datum steht in Spalte C) werden Daten für verschiedene Mitarbeiter festgehalten. Diese Daten befinden sich z.B. für den 13.03.09 (Datum steht in C13) in den Zellen E13:AA13. Via VBA habe ich die Möglichkeit beim Öffnen der Datei zum aktuellen Datum zu "...
13.03.2009 08:28:55
Thread-ID: 1059736
2 Beiträge
Anzeige
Zeilen in andere Arbeitsmappe lkopieren
jinx
Moin, Elmar,Du solltest den Bereich ansprechen, in den Du die Werte einfügen möchtest...Deine Schleife läuft bei mir bis ans Blattende - ich habe es mit folgendem Code getestet (hier werden die Zeilen im zweiten Blatt direkt untereinander geschrieben):

16.04.2002 20:42:49
Thread-ID: 113862
3 Beiträge
Tabellenblatt in andere Arbeitsmappe kopieren
Annette

Hallo,
langsam verzweifel ich:
Ich möchte mittels eines Makros das Tabellenblatt „123“ der Arbeitsmappe „ABC“ in die Arbeitsmappe „DEF“ (nicht geöffnet) kopieren.
Der Name des Tabellenblatts soll beibehalten werden. Falls jedoch das Blatt vorhanden ist, soll es ersetzt werden.
...
05.05.2010 19:44:02
Thread-ID: 1155669
2 Beiträge
Spalten in andere Arbeitsmappe kopieren
Olli

Hallo,
Ich bin absolut unerfahren im Umgang mit Excel und VBA. Jetzt steh ich vor einem Problem und komm nicht weiter.
Und zwar will ich über Formeln errechnete Werte durch ein Makro in eine andere Arbeitsmappe übertragen.
Hab im Forum zwar schon einen Ansatz gefunden, ich schaff es...
02.06.2010 15:58:25
Thread-ID: 1160038
6 Beiträge
Daten von eine in die andere Tabelle übertragen
eine

Gibt es hierzu eine Makro Lösung?
Ich habe zwei Sheets:
1. Disposition
2. NMPKurz
Ich möchte die Daten aus der Disposition in NMPKurz in einer anderen Anordnung übertragen.
Hierzu habe ich eine Beispielsdatei eingestellt.
https://www.herber.de/bbs/user/71160.xls
Da...
21.08.2010 14:20:27
Thread-ID: 1173501
8 Beiträge
Daten in Tabelle einer anderen Arbeitsmappe
Stefan

Hallo,
sorry, aber ich habe schon wieder ein Problem:
Nachfolgender Code wurde mir hier zur Verfügung gestellt und funktioniert auch. Nur hat sich jetzt an der Struktur der Zieltabelle etwas geändert. Private Sub CommandButton1_Click() Dim lRow As Long Dim sRow As Long Dim myWks As Str...
06.04.2011 22:11:52
Thread-ID: 1209357
14 Beiträge
Anzeige

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
5
2
4
1
3
2
1
5
7
13
1
9
1
8
2
1
6
2
2
1
15
12
6
5
1