selamlar
Kodunu,
If DCount("*", "Qry ismi") = 0 Then
end
else
----DoCmd.OutputTo acOutputQuery, "CKR05Y0", acFormatXLS, "CKR05Y0.XLS", False------
end if

olarak düzenleyebilirsin...