Mit Button spalten nach bestimmten wert kopieren Zentral

[Fuzzy62]

In Tabelle Lehrer1 einfügen

Private Sub Worksheet_Activate()
    Name = Worksheets("Zentral").Range("A1").Value
End Sub



für jedes Tabellenblatt Lehrer wiederholen und anpassen