Sn Celoyce hocam butonun olay yordamındaki

Private Sub Komut0_Click()

On Error GoTo Err_komut0_Click


Set ExcelDosyasi = CreateObject("Excel.Application")

With ExcelDosyasi
.Application.Visible = True
.UserControl = True
.Workbooks.Open FileName:=CurrentProject.Path & "\tablo.xlsx"

x i silmen lazım.
Saygılar...