Office: WEnn Commando Button dann Tabellesheet kopieren

Hi!
Folgendes Problem!
Ich möchte ein Haupttabellenblatt haben. Dort sind zwei commando-button. drück ich den commandobutton a, dann soll aus einem tabelleblatt a die komplette tabelle ins haupttabellenblatt kopiert werden. drücke ich commandobutton b, dann so die tabelle aus dem tabellenblatt b in das haupttabellenblatt kopiert werden.

kann mir einer dabei helfen! wäre super und vielen dank im voraus!

 

Hallo Totti15485,

Du hast ja eigentlich bereits am 7.2. von mir und von Schatzi 2 Vorschläge erhalten ??

Wenn es sich bei den CommandButtons um die Variante mit den ActiveX-Steuerelementen handelt, ist in etwa so vorzugehen:

1) Den Entwurfsmodus für den CommandButton A einschalten; einen Rechtsklick auf den CommandButton ausführen; im erscheinenden Kontextmenü die Eintrag 'Code anzeigen' auswählen; darauf springt Excel automatisch in den VBA-Editor, erzeugt ein Code-Modul mit einem Programmaufruf, der bereits auf den Namen des CommandButtons abgestimmt ist:
Private Sub CommandButtonA_Click()

End Sub

2) In den Leerbereich zwischen diesen 2 Zeilen gibst Du folgende 2 VBA-Codezeilen ein:
Sheets("Master").Range("A1").CurrentRegion.Delete
Sheets("A").Range("A1").CurrentRegion.Copy Sheets("Master").Range("A1")
Diese 2 Zeilen setzen Folgendes voraus:
1.Zeile: Du hast ein Haupttabellenblatt namens "Master", das ab Zelle A1 eine Tabelle enthält. Diese wird gelöscht.
2.Zeile: In das Haupttabelleblatt "Master" wird ab Zelle A1 Deine Tabelle aus Arbeitsblatt "A" kopiert. Dabei wird vorausgesetzt, dass auch im Blatt "A" die linke obere Ecke der Tabelle in Zelle A1 liegt.

3) In ähnlicher Weise ist auch beim 2. CommandButton vorzugehen.
Dort musst Du statt "A" ein "B" in der 2. einzugebenden VBA-Zeile einsetzen (also: Sheets("B").Range("A1")....).

4) Wieder ins Excel-Arbeitsblatt zurückkehren, den Entwurfsmodus für die Buttons ausschalten.