تعديل فى كود حفظ فى الاكسل

Dim x As System.IO.StreamWriter
With SaveFileDialog1
.Filter = "Excel sheet|*.xls"
End With
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
x = New System.IO.StreamWriter(SaveFileDialog1.FileName)
x.Write(DataGridView1.SelectedRows)
x.Close()
x = Nothing
End If

ممكن يا اخوانى حد يقولى ايه الغلط فى الكود السابق حيث انه بيدينى شيت اكسيل بس فاضى.... افيدونى افادكم الله