Office: Makro: Kopieren und untereinander Einfügen

Hallo zusammen!

Ich hoffe, dass ihr mir weiterhelfen könnt.

Mithilfe des Makrorekorders habe ich einen einfachen Copy-Paste-Vorgang aufgezeichnet und diesen einem Button zugewiesen. KOpiert wird aus TB2 eine Tabelle, die anschließend in TB1 eingefügt wird. Bei der Tabelle ahndelt es sich um eine Vorlage, die jeden Tag bearbeitet wird. Ich möchte, dass die aktuelle dann bei Betätigung des Buttons unterhalb der Tabelle des jeweiligen Vortages eingefügt wird. Kann mir dabei bitte jemand helfen? Ich weiß nicht wie ich das hinbekomme.

Der Code sieht bisher so aus:
Sub Makro3()
' Makro3 Makro
Range("A3:N7").Select
Range("N7").Activate
Selection.Copy
Sheets("Datenbank").Select
Range("A8").Select
ActiveSheet.Paste
End Sub

Vielen Dank schonmal im voraus!

Grüße
Jan

:)

 

Hallo Jan,

Code:

 

Hallo Hajo!

Vielen Dank für die schnelle Antwort!

Ich habe den Code einfach blauäugig so übernommen und meiner Schaltfläche auf TB2 zugewiesen. Leider bekomme ich eine Fehlermeldung und werde zum Debugger verwiesen, in dem mir die Zeile "Range("A3:N7").Copy Cells(Loletzte, 1)" gelb markiert angezeigt wird.
Liegt es daran, dass ich deinen Code in den aufgezeichneten mit einfließen lassen muss?
Bin, was VBA angeht, wirklich ein Anfänger.

Hoffe weiterhin auf Ihre Unterstützung.

 

es fehlte ein Punkt.
Range("A3:N7").Copy .Cells(Loletzte, 1)
auch der alte Code löste bei mir keinen Fehler aus.

 

Funktioniert! Genau so habe ich es mir vorgestellt, super!

vielen,vielen dank!

Grüße
Jan

 

Hallo!

Ich hätte noch ein weiteres Anliegen, vielleicht kann mir da nochmal jemand behilflich sein. Bitte schaut euch dazu die Excel-Datei an.

Ich möchte ein Makro erstellen, dass in TB1, in der Liste der Störfälle; im Bereich D14-D26 nach einem Wert sucht und dann ggf. die komplette Zeile in TB2 kopiert. Das Datum aus A4 sollte ebenfalls mitgenommen werden.

Wäre klasse, wenn jemand Zeit und Lust hat mir dabei zu helfen =)

Grüße
Jan

 

Hallo!

Könnte immernoch Hilfe gebrauchen!

Habe im Netz etwas brauchbares gefunden, scheitere aber daran, den Code für meine Bedürfnisse anzupassen. Wäre toll, wenn sich das jemand anschauen könnte!

Code:

Vielen Dank weiterhin!
Grüße
Jan