Zellen kopieren

Bild

Betrifft: Zellen kopieren
von: Frank
Geschrieben am: 02.12.2003 17:51:12

Hallo zusammen,

habe ein für mich lang andauerndes Problem.

Habe 2 Tabellen. Wenn ich in Tab1 A1 anklicke,soll A1 bis A7 in Tab2
kopiert werden und zwar in C1,C4,D4,E4,G4,I4,J4.
Wenn B1 angeklickt wird, dann B1 bis B7 zu Tab2 in die o. g. Zellen
kopieren.

Komme einfach nicht klar. Vielen Dank. Frank

Bild


Betrifft: AW: Zellen kopieren
von: RainerW
Geschrieben am: 02.12.2003 18:13:30

Hallo Frank,

kopiere folgenden Code ins Codefenster von "Tabelle1":

Gruß Rainer


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim wks As Worksheet
    Set wks = Worksheets("Tabelle1")
    If ActiveCell = wks.Range("A1") Then
        Range("A1:A7").Copy Worksheets("Tabelle2").Range("C1,C4,D4,E4,G4,I4,J4")
    End If
End Sub



Bild


Betrifft: AW: Zellen kopieren
von: Frank
Geschrieben am: 03.12.2003 16:23:49

Hallo Rainer,
Erstmal vielen Dank für Deine Antwort, aber bekomme Fehlermeldung:
Fehler beim Kompilieren:Mehrdeutiger Name Worksheet_SelectionChange.
Was könnte man da noch machen?
Mit der Hilfe finde ich nichts.
Besten Dank. Frank


Bild

Beiträge aus den Excel-Beispielen zum Thema " Zellen kopieren"