Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
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
1392to1396
1392to1396
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen analog zu Spalten einfügen

Forumthread: Zeilen analog zu Spalten einfügen

Zeilen analog zu Spalten einfügen
02.12.2014 10:54:29
Gast
Hallo zusammen,
ich möchte, dass wenn ich eine Spalte in meine erste Arbeitsmappe einfüge, Excel eine Zeile in eine andere einfügt. Das ganze dann um 2 verschoben, sprich z.B. Spalte vor Spalte E einfügen in Arbeitsmappe 1, heißt Zeile vor Zeile 3 einfügen in Arbeitsmappe 2.

Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
ich glaube nicht das das geht
02.12.2014 10:59:40
Matthias
Hallo
Das Einfügen einer Spalte löst kein Ereignis aus welches man dann benutzen könnte, ein Makro zu starten.
mE müsstest Du das Makro selbst starten(z.B. über ein Button).
Gruß Matthias

AW: ich glaube nicht das das geht
02.12.2014 11:16:37
Gast
OK Danke, hab ich mir schon fast gedacht. Kann man evtl. eine Eingabe in die neue Spalte als Ausgangsereignis nutzen, um dann die Zeile zu erstellen? Am besten sollte auch noch die Eingabe in die neue Zeile kopiert werden aber das ist das kleinste Problem.
Danke und Gruß

Anzeige
AW: ich glaube nicht das das geht
02.12.2014 11:25:26
Gast
Oder kann jmd so gütig sein und mir ein VBA für das Szenario erstellen das ich mit Tastencombo auf einem markierten feld auslösen kann? Makroaufnahme funktioniert leider nicht.
Danke

AW: ich glaube nicht das das geht
02.12.2014 11:33:35
Rudi
Hallo,
vom Prinzip her so: 
Sub SpalteZeileRein()
If ActiveCell.Column > 2 Then
ActiveCell.EntireColumn.Insert
Workbooks("Mappe2").Sheets(1).Rows(ActiveCell.Column - 2).Insert
End If
End Sub

Gruß
Rudi

Anzeige
AW: ich glaube nicht das das geht
02.12.2014 14:14:12
Gast
danke, nur die auswahl der Zeilen stimmt noch nicht, da ist noch ein Fehler drin. Ich hab das so gemacht. Ich weiss es ist nicht gerade gut, aber der Rest funktioniert. Wo ist mein Fehler? 
ActiveCell.Columns("A:A").EntireColumn.Select
Selection.Insert Shift:=xlToRight
Sheets("Jahresprognose").Select
Rows(ActiveCell.Columns("Stücklistenübersicht")-2).Select    
Selection.Insert Shift:=xlDown
End Sub

Danke Gruß

Anzeige
AW: ich glaube nicht das das geht
02.12.2014 16:04:17
Rudi
Hallo,
wenn du in Spalte A einfügst, kannst du keine Zeile in 1-2=-1 einfügen!
Wahrscheinlich meinst du so: 
  If ActiveCell.Column > 2 Then
ActiveCell.EntireColumn.Insert Shift:=xlToRight
Sheets("Jahresprognose").Sheets("Stücklistenübersicht").Rows(ActiveCell.Row - 2).Insert Shift: _
=xlDown
End If
Gruß
Rudi

Anzeige
Das stimmt nicht, Matti, es wird IMMER ...
02.12.2014 15:12:19
Luc:-?
…das Wsh_Change-Ereignis ausgelöst!
Gruß, Luc :-?

Thx ... ok, erfolgreich getestet ;-) owT
02.12.2014 16:23:41
Matthias

AW: funktoniert nicht
02.12.2014 17:28:49
Gast
Dein Code funktioniert leider nicht. Passt aber schon ich hab ne andre Lösung gefunden. Trotzdem danke das hier so schnell Anworten kommen.

Anzeige
Ich hab Dir keinen Code gepostet ...
02.12.2014 18:25:45
Matthias
Hallo
Dein Code funktioniert leider nicht
Ich hab Dir keinen Code gepostet.
Gruß Matthias

Eine automatische 1:1-Erzeugung einer ...
02.12.2014 19:15:00
Luc:-?
…EinfügeZeile in Blatt2 analog zur EinfügeSpalte in Blatt1 wäre mit folgender EreignisProzedur möglich, Gast (ohne Namen?): 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Const naRelBlatt$ = "Tabelle2"
Dim relZeile As Range, relBlatt As Worksheet
If Target.Columns.Count = 1 And Target.Rows.Count >= Me.UsedRange.Rows.Count Then
Set relBlatt = Worksheets(naRelBlatt)
With relBlatt
.Activate
Set relZeile = .Rows(Target.Column)
With relZeile.EntireRow
.Select: .Insert Shift:=xlDown
End With
End With
Me.Activate
End If
Set relZeile = Nothing: Set relBlatt = Nothing
End Sub
Gruß, Luc :-?
Besser informiert mit …
Anzeige
;

Forumthreads zu verwandten Themen

Maximum aus Zeile,ausgeblendete Spalte nicht berüc
HermannZ

Hi;
wie kann ich mit VBA in einer Zeile das Maximum ermitteln,aber ausgeblendete Spalten nicht berücksichtigen.
Mit einer Formel z.B könnte man das so machen.
 CEFGH1246  2     3     4     5&n...
13.08.2008 19:42:43
Thread-ID: 1001641
4 Beiträge
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
Zeilen einfärben abhängig von Zellwerten
Zellwerten

Hi Leute
Da ich nicht weiß, wie ich nach meinem Problem suchen kann, beschreibe ich es einfach mal kurz. Vielleicht kann mir ja jemand helfen.
Ich habe ein Excel-File, das xSpalten hat und xZeilen.
In einer Spalte (in meinem Fall Spalte F) stehen die verschiedenen Auftragsnummern, a...
18.08.2008 16:57:26
Thread-ID: 1002687
6 Beiträge
Jede 2te Zeile in eine Spalte kopieren
Eddie

Guten Morgen @ all
Ich habe mal wieder ein kleines problem :-)
Ich würde gerne Daten, die alle in einer Spalte sind auteilen.... dazu soll entweder der 1,3,5,7.... oder 2,4,6,8 ... Wert immer in die danebenliegende Spalte kopiert werden
IST:
Hallo
Hello
Gut
Good
...
20.08.2008 07:52:00
Thread-ID: 1003065
6 Beiträge
Anzeige
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
Spalten als Zeilen ziehen
Timo

Hallo,
ich habe ein relativ simples problem und hoffe, es auch möglichst simpel beschreiben zu können:
In einer Spalte (Sagen wir Spalte A) habe ich untereinander verschiedenen Werte stehen.
Jetzt möchte ich gern auf einem anderen Tabellenblatt genau diese Werte in eine Zeile sch...
03.09.2008 11:43:00
Thread-ID: 1007060
5 Beiträge
Letzter Eintrag von Zeile in Spalte A übernehmen
Zeile

Guten Tag
Ich suche nach einer Formel, die mir den letzten eingetragenen Wert (Wert aus hinterster Spalte) von verschiedenen Zeilen jeweils in die gleiche Zeile in Spalte A einträgt.
Hat mir jemanden einen Tipp?
Danke, Peter
03.09.2008 12:58:17
Thread-ID: 1007081
3 Beiträge
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
Änderung Zeilen und Spaltenbezug
lass

Hallo, ich habe folgendes Problem.
Ist
(Zeile2/Spalte A2): Auftrag xyz; (Zeile2/Spalte B2):Mitarbeiter 1; (Zeile2/Spalte C2)= Mitarbeiter 2
(Zeile3/Spalte A3): Auftrag xyz; (Zeile3/Spalte B3):Mitarbeiter 3; (Zeile3/Spalte C3)= Mitarbeiter 4
(Zeile4/Spalte A...
15.09.2008 08:29:55
Thread-ID: 1009654
17 Beiträge
Spalten mit Zeilen tauschen ?
Holger

Hallo zusammen,
gibt es in Excel eine Möglichkeit, Daten einer oderer mehrere Spalten nun quasi um 90° zu drehen und alles in eine oder mehrere Zeilen zu kopieren.
Gruss
Holger Wächter
18.09.2008 10:26:00
Thread-ID: 1010640
4 Beiträge
VBA-Werte aus Spalte in ComboBox
andreas

Hallo zusammen,
habe ein Formular da möchte ich die Daten nach den Werten in Spalte D Filtern. Dazu sollen die Daten ab Zeile 11 alphabetisch geordnet und jeder Eintrag nur einmal angezeigt in die Combobox eingelesen werden. Der ausgesuchte Wert wird dann als Criterium für die Filterfunktio...
25.09.2008 08:47:11
Thread-ID: 1012218
7 Beiträge
Anzeige
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
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