Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 12:41:11
Vielleicht Onur ? Leider werden nicht alle Monate
16.04.2024 12:08:33
Zelle/Spalte bestimmten Wert in Kopfzeile zuordnen
16.04.2024 12:01:17
Dynamische Liste generiert aus mehreren Vorgagen
16.04.2024 11:48:22
Blatt in HTML exportieren wenn Checkbox aktiv ist
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
796to800
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
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kopieren und am Ende der Tabelle einfügen

Kopieren und am Ende der Tabelle einfügen
31.08.2006 15:24:46
Gerhard
Hallo,
ich will in meiner Tabelle den Bereich von A5 bis F18 kopieren und an das Ende der Tabelle einfügen.
Wie kann ich das durch einen VBA-Code durchführen, damit ich bei Bedarf so oft diesen Bereich ans Ende der Tabelle kopieren kann wie ich es brauche?
Gruß
Gerhard

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kopieren und am Ende der Tabelle einfügen
31.08.2006 15:46:02
Rudi
Hallo,

Sub xx()
Range("A5:F18").Copy Range("A65536").End(xlUp).Offset(1, 0)
End Sub

Gruß
Rudi
AW: Kopieren und am Ende der Tabelle einfügen
31.08.2006 16:04:24
Gerhard
Hallo,
danke, funktioniert wunderbar.
Gruß
Gerhard
AW: Kopieren und am Ende der Tabelle einfügen
31.08.2006 17:06:27
Gerhard
Hallo,
ich habe jetzt doch noch ein Problem.
Und zwar sollen nicht nur die Einträge kopiert werden, sondern auch die Formeln, Formate und Gültigkeit. Ich habe mal das Makro aufgezeichnet. Es sieht folgendermaßen aus:
Range("A4:F18").Select
Selection.Copy
ActiveWindow.SmallScroll Down:=48
Range("A79").Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValidation, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Statt in A79 müßte das ganze natürlich auch wieder ans Ende der Tabelle eingefügt werden. Es muß also irgendwie noch mit dem Code verknüpft werden:
Range("A4:F18").Copy Range("A65536").End(xlUp).Offset(1, 0)
Es wäre schön, wenn du das noch hinbekommen würdest.
Gruß
Gerhard
Anzeige
AW: Kopieren und am Ende der Tabelle einfügen
31.08.2006 18:04:10
Rudi
Hallo,
mal so zusammengebastelt. Teste mal ob's klappt.

Sub xx()
Range("A5:F18").Copy
with Range("A65536").End(xlUp).Offset(1, 0)
.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
.PasteSpecial Paste:=xlPasteValidation, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
end with
End Sub

Gruß
Rudi
AW: Kopieren und am Ende der Tabelle einfügen
01.09.2006 09:28:23
Gerhard
Hallo,
danke, jetzt geht es.
Gruß
Gerhard

303 Forumthreads zu ähnlichen Themen

Summenprodukt am Ende der Tabelle
Bernhard

Wertes allwissendes Forum!
Ich probier jetzt schon seit zwei Stunden eine Summenproduktformel ans Ende meiner Tabelle zu bringen, aber ich bekomme es einfach nicht hin.
In Spalte G soll das Summenprodukt von Spalte I und Spalte J gebildet werden, dann durch die Summe aus Spalte K getei...
08.03.2011 10:53:51
Thread-ID: 1204725
4 Beiträge
Anzeige
Rahmen und Formel bis Ende der Tabelle
Alex105

Hallo Zusammen,
ich habe eine Tabelle, die ich mithilfe von einem Makro formatieren lasse. Jetzt benötige ich für 2 Punkte innerhalb dieser Tabelle mal bitte Eure Hilfe.
1. Punkt: In E2 fängt eine Wenn-Formel an, die bis ans Ende der Tabelle laufen soll (Tabellenlänge ist dynamisch)
...
12.05.2014 10:31:47
Thread-ID: 1361048
8 Beiträge
Spalte mit selben Wert bis Ende der Tabelle fuelle
Marvin

Hallo zusammen,
Ich habe folgendes Problem:
Ich habe eine Tabelle mit mehreren Spalten von denen alle ausgefuellt sind, ausser eine, Spalte O. In die soll ueberall der Wert "GBP" eingefuegt werden, allerdings nur bis zum Ende der Tabelle.
Bisher habe ich diesen Code: Sub ContentGBP(...
16.01.2015 15:58:30
Thread-ID: 1403249
9 Beiträge
Anzeige
For i = 3 To Ende der Tabelle?
Chep

Hallo Forum,
ich arbeite momentan mit For i = 3 To 100. Das Poblem ist jedoch das meine Tabelle teilweise darunter bzw darüber mit Werten gefüllt ist. Anstatt 100 fest vorzugeben würde ich gerne das Ende der Tabelle bzw. die letzte Zeile mit Werten angeben. Jemand einen Rat wie ich das umse...
22.05.2015 14:32:18
Thread-ID: 1427348
9 Beiträge
VBA bis Ende der Tabelle
Michael

Hallo,
mit folgendem per Recorder aufgezeichneten Code wähle ich einen Bereich aus um ihn zu formatieren:
Range("J3:O3").Select
Range(Selection, Selection.End(xlDown)).Select
With Selection.Interior
.Pattern = xlGray...
28.05.2015 17:03:42
Thread-ID: 1428211
3 Beiträge
erstelltes Tabellenblatt immer wieder verwenden
Jo

Hallo zusammen,
nachdem mir vorhin schon bei einem anderen Problem sehr gut geholfen wurde, habe ich hier die nächste Hürde.
Ich habe eine Excel-Datei mit 2 Tabellenblättern.
In der Tabelle1 stehen meine Grunddaten in mehreren Zeilen und Spalten. Alle 16 Zeilen wiederholt sich das...
27.10.2015 10:49:51
Thread-ID: 1454665
5 Beiträge
Zeilen abhängig aus/einblenden in anderer Tabelle
Martin

Hallo, habe das Forum durchsucht, aber nicht die Lösung für meine Frage gefunden:
In Tabelle2 ändert sich der Wert in Zelle H1 über die Formel "=Tabelle1!$D$26".(entweder Wert "1" oder "2"), Nun möchte ich, dass sich in Tabelle2 die Zeilen 5 bis 39 ausblenden, wenn in Tabelle2 in Zelle H1 d...
03.05.2016 12:56:30
Thread-ID: 1491659
13 Beiträge
Ansichtgröße der Tabelle festlegen
Hartmut Mengeler

Hallo, ich möchte ein Tabellenblatt als Formular abspeichern. Hierbei habe ich die am Bildschirm sichtbaren Zellen farblich makiert. Nun soll vermieden werden, daß der Anwender mit den Scrollleisten das Formular
hin und herschieben kann, so daß er aus dem Formular herauskommt. Ist dies machb...
14.08.2002 13:58:44
Thread-ID: 148524
3 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
3
8
7
8
3
8
2
4
12
2
4
6
6
3
3
2
1
3
4
3
4
3
10
5
3