Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: freagger am Juni 23, 2015, 16:15:58 Nachmittag

Titel: Makro Kopierfunktion
Beitrag von: freagger am Juni 23, 2015, 16:15:58 Nachmittag
Guten Tag.
Ich brauche für ein Projekt in Excel ein bisschen Hilfe.
Unszwar hier meine Frage:

Die Datei besteht aus 4 Mappen.
Einer Hauptmappe (Mappe 1), und halt 3 weiteren Mappen. Jetzt möchte ich in der Hauptmappe einen Knopf haben (Wie man den einfügt und und das Programm einfügt weiß ich auch).
Der Button soll folgende Funktion haben sprich ich brauch nur den VBA Code oder wie das heißt:

1. Ich markiere eine oder mehere beliebige Zellen mit der Maus in der Mappe 1.
2. Jetzt kommt der Button ins Spiel
3.Wenn ich die Zellen markiert habe und dann auf den Button klicke soll folgendes passieren:

Der Inhalt der makierten Zellen (mit Rahmen fals vorhanden) soll kopiert werden in den Mappen 2,3 und 4 eingefügt werden an den selben Zellen.

Sprich Ich markiere die Zellen zum beispiel C1 und D1 in der Mappe 1 schreibe dort irgendwas rein, drücke dann auf den Button und dann sollen die Zellen kopiert/gespiegelt werden in die anderen 3 Mappen an selber stelle sprich C1 und D1.
Nur kopiert und nicht verknüpft..

MFG Torben
Titel: Antw: Makro Kopierfunktion
Beitrag von: gmg-cc am Juni 23, 2015, 16:21:00 Nachmittag
Moin Torben,

im Sinne des Lerneffekts: Zeichne das Ganze doch einfach einmal mit dem Makrorecorder auf. Das ist schon einmal die halbe Miete :). Vielleicht findest du dann schon alleine den Weg, sonst findet sich gewiss hier jemand, der das Ganze "abrundet".
Titel: Antw: Makro Kopierfunktion
Beitrag von: freagger am Juni 23, 2015, 16:45:59 Nachmittag
das mit dem makrorecorder ist kein problem aber da nimmt er immer halt nur die selben zellen ich will aber immer die haben die ich vorher markiert habe das ist ja das große Problem.
Ich weiß wie man im Programm die Aktive Zelle anwählt aber nicht wie er in den anderen mappen halt die selbe zellen anwählt wie in der mappe 1
Titel: Antw: Makro Kopierfunktion
Beitrag von: gmg-cc am Juni 23, 2015, 17:02:52 Nachmittag
Dass der Makrorecorder immer eine Momentaufnahme macht ist schon klar ...

Sub GMG()
   Dim TopLeft As String
   TopLeft = Selection.Cells(1, 1).Address
   Selection.Copy Sheets("Tabelle2").Range(TopLeft)
End Sub