Supportnet / Forum / Tabellenkalkulation
Kennt sich jemand mit Makros aus?
Frage
hallo,
Kennt jemand ein Makro, mit dem man folgendes machen kann:
Wenn man auf einen Button drückt und die Zelle A5 ist markiert, soll der inhalt der Zellen B1 bis D6 in Tabelle 2 in die Zellen A1 bis C6 eingefügt werden.
Ist jedoch die Zelle A6 markiert, so wird der Inhalt der Zellen B10 bis D16 in Tabelle 2 in die Zellen A1 bis C6 eingefügt werden.
Antwort 1 von Beverly
Hi Benni,
erstelle einen CommandButton aus der Steuerelement-Toolbox, mach einen Doppelklick darauf und schreibe dann folgenden Code in das sich öffnende Codefenster
Bis später,
Karin
erstelle einen CommandButton aus der Steuerelement-Toolbox, mach einen Doppelklick darauf und schreibe dann folgenden Code in das sich öffnende Codefenster
Private Sub CommandButton1_Click()
If ActiveCell.Address = "$A$5" Then
Range("B1:D6").Copy Worksheets("Tabelle2").Range("A1")
ElseIf ActiveCell.Address = "$A$6" Then Range("B10:D16").Copy Worksheets("Tabelle2").Range("A1")
End If
End Sub
Bis später,
Karin
Antwort 2 von benni921
hi karin,
vielen Dank!!!
mfg
Benni
vielen Dank!!!
mfg
Benni