Zelle kopieren wenn

Folgendes Problem!
Wie bekomme ich es über ein Makro hin, das Wert in der Zelle D1 kopiert und in die Spalte Q von oben her eingefügt wird. Aber mit der Einschränkung, daß wenn der Wert in der Spalte schon vorhanden dann nicht.
z.B.
in Zelle d1 steht Erwin
wird nach Q1 kopiert
als nächstes steht Paul in D1
wird nach Q1 kopiert
als nächstes steht Erwin in D1
wird nicht kopiert, da in Spalte Q schon vorhanden

Ich hoffe ich hab mich verständlich ausgedrückt

regnerische Grüsse vom Bodensee
Josi