Selektierte Datei(en) in fest vorgegebenen Ordner verschieben

Hallo,

um meine Bilder zu sortieren, die noch in einem Sammelverzeichnis liegen,
benötige ich ein Makro, das die selektierte(n) Datei(en) in einen fest vorgegebenen Ordner - ohne Rückfrage - verschiebt.
Für jeden Zielordner würde ich ein eigenes Makro anlegen und in die Symbolleiste ziehen.
Dann könnte ich bei aktivierter Vorschau nur das entsprechende Symbol anklicken und die Dateien wären im Zielort.

Danke im Voraus!