Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1140to1144
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
1140to1144
1140to1144
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte mit VBA um eine Spalte nach rechts kopieren

Spalte mit VBA um eine Spalte nach rechts kopieren
Hagen
Hallo zusammen,
ich benötige mal eure Hilfe!
Ich möchte mit einem VBA Code den Bereich A10:A20 nach B10:B20 kopieren, bei erneutem Ablauf des Macros sollte dann der Bereich von B nach C und das nächte mal von C nach D usw Kopiert werde
Ich habe dazu aber leider keine Lösung! und hoffe einer von euch kann mir hierbei weiterhelfen!
Danke
Hagen

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
dazu brauchen wir eine Logik...
24.02.2010 12:35:31
Björn
Hallo Hagen,
ansich ist das ein relativ einfaches Problem, wir sollten nur eine Logik haben, wann welche Spalte wohin kopiert werden soll.
Beim ersten mal ist das ja noch einfach. Von A nach B. Gut.
Bei den nächsten Malen:
Irgendwie muss definert werden / herausgefunden werden, welche Spalte kopiert werden soll.
Wenn es z.B. immer die letzte Spalte ist (also weiter rechts kommt NICHTS mehr), dann wäre das eine Logik.
Falls das nicht so ist, müsstest Du eine andere Logik finden. Z.B. die Spalte, die einen bestimmten Suchbegriff enthält, oder du schreibst in irgendeine Zelle (gerne auch ausgeblendet), welche Spalte kopiert werden soll...
Gruß
Björn B.
Anzeige
AW: dazu brauchen wir eine Logik...
24.02.2010 14:07:54
Hagen
Hallo Björn,
Ja ich habe eine Logik! es sind eigentlich immer die letzten 3 Spalten, weiter rechts kommt nicht mehr:
also eigentlich A1:C10 nach B1:D10 nach C1:E10 ....
reicht das als logik? oder gibt es probleme damit das es 3Spalten sind?
Danke dir!
Gruß Hagen
AW: dazu brauchen wir eine Logik...
25.02.2010 10:13:22
Hagen
Diese Frage möchte ich nochmals als noch offen posten.
und hoffe jemand kann mir hierzu weiterhelfen.
gruß
Hagen
AW: dazu brauchen wir eine Logik...
25.02.2010 10:25:38
Björn
Hallo Hagen,
da ist wohl was schief gelaufen, hatte Dir gestern eigentlich nochmal ein paar Fragen gestellt, aber irgendwie hab ich wohl den falschen Knopf gedrückt... sorry.
Also nochmal:
Anisch sind 3 Spalten kein Problem, das ist (fast) der gleiche Befehl.
Du hast im ersten Beitrag geschrieben: A10:A20 nach B10:B20 kopieren, das nächste Mal B10:B20 nach C10:C20 kopieren.
Jetzt schreibst Du A1:C10 nach B1:D10 nach C1:E10.
Das sind andere Spalten und andere Zeilen...
Bevor ich da jetzt was zusammenbastel, bitte genau definieren, was passieren soll.
- Sind die Zeilen fix? Also immer 1-10? Oder könnte man die ganze Spalte kopieren?
- Die Spalten werden immer 1 nach rechts kopiert, könnte man da nicht einfach eine Spalte einfügen? Teste das mal manuell und prüfe das Ergebnis, ob das ok für Dich ist. Oder was soll z.B. nach kopieren von B1:D10 nach C1:E10 in Spalte B passieren? Nach Deiner Methode wäre Spalte B = Spalte C und nach Spalte einfügen wäre Spalte B leer.
- Soll wirklich kopiert werden oder doch eher verschoben?
Gruß
Björn B.
Anzeige
AW: dazu brauchen wir eine Logik...
25.02.2010 11:42:39
Hagen
Hallo Björn!
Danke für deine Hilfe!
Ja ich hatte geschrieben das ich A nach B und dann nach C Kopieren möchte, ich dachte das könnte ich dann selber in der Formel anpassen.
Aber richtig ist das ich A1:C10 nach B1:D10 nach C1:E10 kopieren möchte.
Nun zu deinen Fragen:
- Ja die Zeilen sind Fix! also 1bis10, die ganze Spalte kann nicht kopiert werden.
- in den Zeilen sind verschiedene Formeln, die sich auf eine Externe Datenbank beziehen, und pro Monat müssen die drei Spalten dann um eine Spalte nach rechts verschoben werden. Es sind 3 Spalten, da in der Spalte 1 die Actual Zahlen für den Monat, in Spalte 2 die Zahlen für den Rest des Monats, und in Spalte 3 die Zahlen der Vergangenen 12 Monate stehen.
- Und da ich die vergangenen Monate auch aufzeigen möchte, müssen die Zeilen Kopiert und nicht verschoben werden.
Ich hoffe ich das ist ausreichend. Anbei aber mal eine kleines Bsp ich hoffe dadurch wird es klarer.
https://www.herber.de/bbs/user/68244.xls
Gruß
Hagen
Anzeige
versuch mal das...
25.02.2010 12:17:03
Björn
Hallo Hagen,
bitte teste mal folgenden Code (bitte in den Code-Bereich des enstprechenden Blattes einfügen, NICHT in ein Modul!!!):
Sub Spalten_kopieren()
Dim spalte As Integer
'letzte Spalte ermitteln (in Zeile 2, da Zeile 1 nicht durchgehend befüllt)
spalte = Range("IV2").End(xlToLeft).Column
Range(Cells(1, spalte - 2), Cells(10, spalte)).Copy Cells(1, spalte - 1)
End Sub
Klappt das so, wie Du es brauchst?
Gruß
Björn B.
DANKE!
25.02.2010 14:41:40
Hagen
Hallo Björn,
Danke dir für deine Hilfe, du hast mir heute den Tag gerettet!!!
Das funktioniert alles soweit! und auch genau wie ich es brauche!
Grüße
Hagen
Anzeige

333 Forumthreads zu ähnlichen Themen

Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Anzeige
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
In Zwischenablage kopieren
Claudia

Hallo liebe VBA-Profis,
ich habe eine sehr einfache Bitte. Ich möchte die Daten aus den ersten drei Spalten (ab Zeile 2 einschließlich der letzten befüllten Zelle in Spalte A) mittelsn Makro in die Zwischenablage kopieren. Mehr nicht. :-)
Ich könnte das natürlich mit der Hand machen, d...
15.12.2008 18:19:49
Thread-ID: 1033106
4 Beiträge
Anzeige
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
suchen kopieren einfügen vba
Bea

Hallo zusammen
Ich hab folgendes Problem.
in der angehängten Beispielmappe möchte ich, das die in Arbeitsblatt "Nummern" hinterlegten Anfänge von Telefonnummern in Arbeitsblatt "evnachweis" gesucht die jeweiligen Zeilen kopiert und dann in Arbeitsblatt in dem Fall "Februar" (am besten...
10.03.2009 11:55:49
Thread-ID: 1058557
9 Beiträge
variable Zeilenanzahl kopieren, einfügen (VBA)
Alex

Hallo Leute,
In meiner Arbeitsmappe kopiere ich eine! Zeile (aus dem TabBlatt „Grundformular“) - via Doppelklick auf einen Namen in „Übersicht“ - in andere TabBlätter.
(das geht wunderbar)
Sieht jemand eine Möglichkeit ob/wie das ganze mit einer variablen Zeilenanzahl, die im „Grund...
18.03.2009 17:23:56
Thread-ID: 1061522
3 Beiträge
Mit VBA Zeilen in neue Register kopieren
Andreas

Ein Tabellenblatt soll nach einem bestimmten Kriterium durchsucht werden. Immer wenn das Suchkriterium gefunden wird, soll die Zeile kopiert und in ein neues Tabellenblatt eingefügt werden. Dies soll solange geschehen bis alle Zeilen durchsucht worden sind.
Im Detail soll dies wie folgt fun...
08.06.2009 12:29:49
Thread-ID: 1079883
3 Beiträge
Gesperrte Zellen in Zwischenablage kopieren
Elias

Hallo Forum,
ich habe eine Tabelle, in welcher ein Datenbereich von B5:B20 per Button in die Zwischenablage kopiert werden soll.
Der Kram mit dem Button ist alles kein Problem, aber die Crux ist:
-Die Zellen sind gesperrt.
-Das PW darf nicht im VBA-Code hinterlegt werden, da das...
13.06.2009 23:26:05
Thread-ID: 1081337
6 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
7
1
2
3
10
2
8
2
2
5
7
6
1
4
3
1
5
5
6
8
2
2
8
1
9