AccessTr.neT

Benim gönderdiğim dosyada mı denediniz yoksa Excele Aktar butonundaki kodları kendi dosyanıza aktararak mı denediniz?

Sizin son dosyanız üzerinden

Bendeki hali.

Sizin dosyayı indirip referanslardan Microsoft Excel 16.0 Object Library yerine Microsoft Excel 15.0 Object Library seçmem gerekiyor. Sonra S. kodlu personelin mazeret ve gidiş-dönüş tarihlerini silip excele aktar diyorum. Yaptıklarım bu kadar. Son deneme sonucu Ek'tedir.

Excele Aktar butonundaki alttaki kodu bulun sizdekini alttaki ile değiştirip dener misiniz?

Cells.Replace What:="()", Replacement:=" ", LookAt:=xlPart, _

        SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False, _

        ReplaceFormat:=False

Sonuç değişmedi.