Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1328to1332
1328to1332
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle in Spalten kopieren

Forumthread: Zelle in Spalten kopieren

Zelle in Spalten kopieren
04.09.2013 22:18:28
Chris
Hallo zusammen,
ich habe eine Tabelle, die wie folgt aufgebaut ist:
alles in Spalte A
Zeile 1: "Titel_1"
Zeile 2: "Autor_1"
Zeile 3: "Keyword_1"
Zeile 4: "Link_1"
Zeile 5: "Titel_2"
Zeile 6: "Autor_2"
Zeile 7: "Keyword_2"
Zeile 8: "Link_2"
Zeile 9: "Titel_3"
Zeile 10: "Autor_3"
Zeile 11: "Keyword_3"
Zeile 12: "Link_3"
...
Zeile 2964
Ich möchte die Zellinhalte der Zeilen sinnvoll in Spalten kopieren, um damit besser auswerten zu können:
Spalte A | Spalte B | Spalte C | Spalte D
Titel_1 | Autor_1 | Keyword_1| Link_1
Titel_2 | Autor_2 | Keyword_2| Link_2
Titel_3 | Autor_3 | Keyword_3| Link_3
...
Kann man das mit einem Makro lösen und wenn ja, wie?
Danke für eure Unterstützung!
Gruß
Chris

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle in Spalten kopieren
04.09.2013 23:02:37
Gerd
Hallo Chris!
Sub trans()
Dim i As Long, j As Long
With Worksheets("Tabelle1")
j = 1
For i = 1 To .Cells(1, 1).End(xlDown).Row Step 4
j = j + 1
.Cells(i, 1).Resize(4, 1).Copy
Worksheets("Tabelle2").Cells(j, 1).Resize(1, 4). _
PasteSpecial Paste:=xlPasteAll, Transpose:=True
Application.CutCopyMode = False
Next
End With
End Sub
Gruß Gerd

Anzeige
AW: Zelle in Spalten kopieren
04.09.2013 23:06:47
Balder
Hallo Chris,
hier ein Vorschlag: 

Option Explicit
Sub Umschreiben()
Dim i As Long
Dim j As Integer
With Sheets(1)
For i = 1 To .Cells(.Cells.Rows.Count, 1).End(xlUp).Row
.Cells(i, 2) = .Cells(i + 1, 1)
.Cells(i, 3) = .Cells(i + 2, 1)
.Cells(i, 4) = .Cells(i + 3, 1)
For j = 1 To 3
.Rows(i + 1).Delete
Next j
Next i
End With
End Sub
Gruß Balder
http://www.youtube.com/BaldersWelt

Anzeige
AW: Zelle in Spalten kopieren
04.09.2013 23:23:11
Chris
perfekt! Vielen Dank
;

Forumthreads zu verwandten Themen

Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Anzeige
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
Spalten in Zeilen anhängen
Jörg

Hallo zusammen,
in einer Tabelle mit ~1000 Artikeln in Spalte A stehen jeweils in den Spalten B-M die 12 zum Artikel gehörenden Monatswerte des Verbrauchs.
Ich brauche diese Daten jetzt so angeordnet, dass weiterhin alle Artikel in Spalte A stehen, jedoch die einzelnen Monatswerte unter...
01.09.2008 18:03:42
Thread-ID: 1006570
11 Beiträge
Anzeige
wie Spalten in einem Arbeitsblatt zu Zeilen zusamm
Michael

Moin erstmal,
folgendes Problem als mittelmäßiger Anwender.
Ich habe mehrere identische Arbeitsblätter wo ich jeweils untereinander (eine Spalte) mehrer Werte habe. G1-G10.
Diese Werte möchte ich in einem Arbeitsblatt zusammenfassen , allerdings nun in einer Zeile. A1-J1.
Wi...
04.09.2008 19:48:05
Thread-ID: 1007497
4 Beiträge
Zeilen löschen in Abhängigkeit von 2 Spalten
2

Hallo zusammen,
ich habe ein Makro über den Rekorder aufgezeichnet und versuche es anzupassen. Leider kenn ich mich in der Syntax nicht aus.
Ziel:
In einem markierten Bereich die Zeilen löschen, die in Abhängigkeit von zwei Spalten eine 0 enthalten.
D.h. Spalten X und Y enthalte...
06.10.2008 14:00:00
Thread-ID: 1014434
3 Beiträge
Anzeige
Gefilterte Zeilen/ Spalten Kopieren
Falk

Hallo zusammen,
folgendes Problem für mich:
Ich filtere den Bereich von A1:CD1000. Der Filter wird je nach Anforderung auf verschiedene Spalten gesetzt.
In den Zellen von Spalte A befindet sich eine Formel, die den Blattnamen anzeigt wenn in Spalte D und F etwas eingetragen ist anso...
11.11.2008 10:13:33
Thread-ID: 1023442
3 Beiträge
kopieren/filtern von x-Spalten in x-Blättern
x-Spalten

So, anderes Thema:
Ich habe eine Arbeitsmappe mit verschiedenen Arbeitsblättern, diese Arbeitsblätter sind von der struktur her alle gleich aufgebaut, nur der Inhalt unterscheidet sich voneinander.
Ich möchte jetzt eine Auflistung generieren, die mir auf dem letzten Blatt der Arbeitsmap...
22.11.2008 16:34:00
Thread-ID: 1026984
16 Beiträge
Anzeige
Spalten in Zeilen vor Import in Access DB
mat

Hallo,
ich soll im Rahmen eines kleines Projektes einen SAP Export in eine Access DB importieren.
Das Problem liegt darin, dass die Exceldatei alle Umsätze und Absätze in einer Zeile hat. Hierbei bildet jeder Monat eine Spalte.
Für eine Datenbank macht es natürlich mehr Sinn je Mona...
08.12.2008 19:10:00
Thread-ID: 1031167
3 Beiträge
Formel mit VBA kopieren
Hartmut_M

Hallo, ich möchte mit VBA aus einem Bereich die Formeln in einen anderen Bereich kopieren.
Nutze hierfür folgenden code, wobei die variablen spalte und spalteneu für die Spaltennummern stehen:
Range(Cells(5, spalte), Cells(130, spalte)).Select
Selection.AutoFill Destination:=Range(C...
12.12.2008 10:02:26
Thread-ID: 1032307
3 Beiträge
nicht die Formel mitkopieren
TomTom

Hi,
Ich habe in meinem Sheet eine Funktion, mit der will ich verschiedene Zeilen kopieren:
MeineQuelle.Rows(lngZeile).Copy Destination:=MeinZiel.Cells(lngZeile, 1)
Wenn ich nun in einer gefundenen Zeile, die kopiert wird, irgendwo eine Formel drin habe, (die sich auf irgend was bezi...
30.01.2009 11:15:07
Thread-ID: 1045327
8 Beiträge
Zeilen mit ähnlichem Inhalt kopieren
Lauren

Hallo zusammen,
sitze wiedermal hier in VBA/Excel fest und hoffe auf Hilfe :)
Ich habe eine Excel Datei mit ca. 7000 Zeilen.........nun möchte ich die Inhalte etwas übersichtlicher gestalten aber händisch wäre das ja ein riiiiiiiiiesen Aufwand, daher bin ich auf der Suche nach einem Mak...
10.02.2009 14:31:49
Thread-ID: 1049097
4 Beiträge
Formel kopieren bei Leerzeilen
Catrin

Hallo,
ich stehe gerade auf dem Schlauch:
Ich habe in Tabelle 1 Daten ohne Leerzeilen stehen.
In Tabelle 2 möchte ich Daten aus Tabelle 1 stehen haben.
Die Formel lautet z.B:
A1=Tabelle1!B2 - wenn ich diese Formel nun in A5 kopiere, nimmt er mir nicht Tabelle1!B3, sondern Ta...
18.03.2009 14:42:09
Thread-ID: 1061436
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige