(22/04/2021, 11:57)feraz yazdı: .Range("A" & son & ":A" & Rows.Count).Clear

Ya 10.mesajdaki yukardaki kodu alttaki gibi yapınki A sütunu silinsin.O kodun yukarısındaki son= ile olan stırda silinebilir.
Bir konuya daha bir sürü mesaj yazdım

.Range("A2:A" & Rows.Count).Clear