Ws.Range("A1:E8").HorizontalAlignment= xlCenter
yerine ws.Range("A1:E8").HorizontalAlignment = -4108
olarak dener misiniz? Access tarafından açıldığı için xlCenter neye karşılık geliyor bilemiyor olabilirama eğer referanslara microsoft Excel xx.x objectlibraryyi eklerseniz sorun ortadan kalkabilir xlCenter de kullanabilirsiniz