ich möchte gerne einzelne Werte einer Zelle von bspw. Spalte D, Zelle 6-17 nach Spalte B Zelle 6 kopieren/verschieben und das zufällig.
Beim nächsten ausführen des Makros soll die bereits kopierte Zelle (dann ja leer) nicht mehr berücksichtigt werden.
Außerdem soll die zweite zufällig ausgewählte Zelle in Spalte B Zelle 7 kopiert/verschoben werden. Das geht solange bis in Spalte D Zelle 6-17 keine Einträge mehr sind.
Mein Lösungsansatz bisher ist folgender:
Public Sub Zufall()
'Code für ein allgemeines Modul
Dim wksQ As Worksheet
Dim wksZ As Worksheet
Dim lngZ As Long
Set wksQ = Worksheets("Tabelle2") '
Vielleicht kann mir hier jemand weiterhelfen. Vielen Dank :-)