yalnız bir şeyi belirtmeyi unuttum bu kodlar sadece veri yazmaya yarar
verileri silmediği için diyelim ki önceden 10 kayıt vardı şimdi 3 kayıt çıktı ilk 3 kaydı değiştirir ama silinmesi gereken diğer 7 kayda dokunmaz o nedenle kodlar çalışmadan önce sayfayı silecek kodlar da eklenmeli en başa
worksheets("sayfaAdi").Cells.ClearContents
benzeri bir kod eklenmeli
Worksheets("ürüngiris").Cells.ClearContents
Worksheets("ürüncikisveri").Cells.ClearContents