ich habe hier bei Euch diesen code gefunden der mir eine Spalte in
eine neues Tabellen Blatt kopiert
Sub Kopieren()
Dim WkSh_Q As Worksheet ' Tabellenblatt Quelle / Herkunft
Dim WkSh_Z As Worksheet ' Tabellenblatt Ziel
Dim lZeile As Long ' For/Next Zeilen-Index
Dim iSpalte As Integer ' For/Next Spalten-Index
Dim lZeile_Z As Long ' Zeilenindex im Ziel Blatt
Set WkSh_Q = Worksheets("Tabelle1") '
Das ist leider nicht ganz was ich suche.
Ich würde gerne daraus folgendes machen
habe aber vom programmieren nicht viel Ahnung, außer immer gute Ideen
Also: Jede Spalte im Tabellenblatt1,
die in der ersten Zeile gefüllt ist wird auf ein neues Tabellenblatt
kopiert und das Tabellenblatt erhält den Namen der ersten Zeile, der kopierten Spalte, kann mir da jemand weiter helfen
Vielen Dank im Voraus