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
1644to1648
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
1644to1648
1644to1648
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aufgezeichnetes Makro eine Zeile tiefer

Aufgezeichnetes Makro eine Zeile tiefer
17.09.2018 08:40:32
Saskia
Guten Morgen liebe Formun Mitglieder,
ich habe länger nach einer Lösung für mein Problem gesucht, aber bin leider nicht fündig geworden.
Ich hoffe ihr könnte mir helfen!
Ich habe in der Datei, die ich hier noch anhänge, ein Makro aufgezeichnet das folgendes ausführt.
Ich klicke auf den Button "Schritt 1:..." und dadurch werden die Zellen A2, B2 und C2 markiert und in Zelle A13, B13 und C13 kopiert.
Jetzt möchte ich, dass beim nächsten klick geprüft wird ob in den Zellen A13, B13 und C13 bereits etwas steht und wenn ja, dann sollen die Werte eine Zeile tiefer enigefügt werden, also in A14, B14 und C14. Der nächste klick wieder eine Zeile tiefer und so weiter....
Es sollen also immer die Cellen A2, B2 und C2 kopiert werden und das einfügen soll bewirken, dass meine Tabelle immer weiter ausgefüllt wird.

Hier ist die Datei um die es geht.
https://www.herber.de/bbs/user/124003.xlsm
Ich hoffe sehr, dass ihr mir helfen könnt.
Danke schon mal im Voraus und einen guten Start in die Woche.
Saskia

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: eine Zeile tiefer
17.09.2018 08:52:03
hary
Moin 
Sub Makro2()
Dim naechste As Long
naechste = Cells(Rows.Count, 1).End(xlUp).Row + 1
Range("A2:C2").Cut Cells(naechste, 1)
Rows(naechste).RowHeight = 24.75
End Sub

gruss hary
AW: eine Zeile tiefer
17.09.2018 09:02:22
Saskia
Guten Morgen Hary,
Danke für die schnelle Antwort.
Scheinbar füge ich den Code an falscher Stelle ein, denn so funtioniert es leider nicht. Könntest du mir vielleicht sagen an welchter Setlle des Codes, den ich verwende, ich deinen einfügen müsste?
Entschuldige die Umstände.
Lieben Gruß
Saskia
AW: eine Zeile tiefer
17.09.2018 09:14:18
Saskia
Ich hab mich nicht genau erklärt Verzeihung.
ich habe die Code so eingefügt:

Sub Makro2()
' Makro2 Makro
Range("A2:C2").Select
Selection.Copy
Range("A13").Select
Dim naechste As Long
naechste = Cells(Rows.Count, 1).End(xlUp).Row + 1
Range("A2:C2").Cut Cells(naechste, 1)
Rows(naechste).RowHeight = 24.75
ActiveSheet.Paste
Range("A2").Select
Rows("13:13").RowHeight = 24.75
Range("A2").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = ""
Range("B2").Select
ActiveCell.FormulaR1C1 = ""
Range("C2").Select
ActiveCell.FormulaR1C1 = ""
Range("D3").Select
Wenn ich jetzt den Button benutze macht er was er soll, aber ich bekomme die Meldung:
Laufzeitfehler 1004: Die Paste-Methode des Worksheet-Objektes konnte nicht ausgeführt werden.
Noch mal Danke.
Lieben Gruß
Saskia
Anzeige
Tausch das Makro2 in Modul5 aus owT
17.09.2018 09:14:26
Matthias

303 Forumthreads zu ähnlichen Themen

von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Anzeige
aktive Zelle eine Zeile tiefer
Jürgen

Hallo liebe Helferleins,
habe schon die Suche bemüht und das gefunden:
ACTIVECELL.Offset(1, 0).Select
funktioniert an für sich schon, aber...
in dem Blatt in dem ich das anwenden will ist zur zeit der Makroausführung immer ein Autofilter aktiv.
Sprich es sind z.B. die zeilen...
17.11.2009 12:27:48
Thread-ID: 1117923
6 Beiträge
Wenn Wert 0 dann MsgBox
Heinz

Schönen Vormittag im Forum
Ich habe eine Arbeitsmappe mit "Jänner" bis "Dezember"
In den jeweiligen Sheets steht das Datum in C1:AG1
Ich möchte nun wenn zum Beispiel im "Oktober" D1 ist der 2.Oktober und D168 ist gleich 0 das eine MsgBox erscheint "2.Okt. in Schicht 1 kein "VA"
...
15.09.2010 07:02:26
Thread-ID: 1177448
23 Beiträge
Anzeige
Ähnlich Sverweis Bereich von bis...
bis...

Hallo und schönen Guten Abend zusammen,
leider bisher erfolglos bei meiner Suche nach einer passenden Formel. Deshalb wende ich mich an die Experten in diesem Forum.
Beschreibung:
Ich habe ca. 100 Zeilen, in denen in Spalte A und Spalte B jeweils 5 stellige Zahlen enthalten sind.
14.12.2011 19:57:06
Thread-ID: 1242163
8 Beiträge
Ähnlich Sverweis Bereich von bis...
bis...

Hallo und schönen Guten Abend zusammen,
leider bisher erfolglos bei meiner Suche nach einer passenden Formel. Deshalb wende ich mich an die Experten in diesem Forum.
Beschreibung:
Ich habe ca. 100 Zeilen, in denen in Spalte A und Spalte B jeweils 5 stellige Zahlen enthalten sind.
14.12.2011 20:28:17
Thread-ID: 1242164
3 Beiträge
Ähnlich Sverweis Bereich von bis...
bis...

Hallo und schönen Guten Abend zusammen,
leider bisher erfolglos bei meiner Suche nach einer passenden Formel. Deshalb wende ich mich an die Experten in diesem Forum.
Beschreibung:
Ich habe ca. 100 Zeilen, in denen in Spalte A und Spalte B jeweils 5 stellige Zahlen enthalten sind.
14.12.2011 20:38:58
Thread-ID: 1242172
3 Beiträge
sverweis ; mehrere werte ausgeben
Nobs

hallo zusammen,
suche Lösung für folgendes problem:
C2 ist der bezug; A:A die Matrix und B:B der wert der zurückgegeben werden soll; allerdings benötige ich die werte 501 & 502 & 503 in jeweils einer zelle (also in D2; e2; F2)
mit der formel "index(B:B;vergleich(c2;A:A;0) w...
05.01.2012 17:25:15
Thread-ID: 1244765
6 Beiträge
sverweis - nächster Wert
SvenE

Hallo zusammen,
mal wieder benötige ich eure Hilfe.
Ich habe versucht mein Problem mit diesem Archiv Post zu lösen : https://www.herber.de/forum/archiv/304to308/t304315.htm - aber leider fehlt mir das Verständnis dies anzupassen.
Ich habe folgenden SVERWEIS :
SVERWEIS($C$3;'Pre...
22.02.2012 15:26:46
Thread-ID: 1251950
3 Beiträge

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
5
22
8
7
2
2
5
2
3
9
9
5
3
3
14
3
2
6
3
3
9
4
5