Cancel olayı hatası için yanılmıyorsam 
If Gveri= "" then  exit sub

Gibi olabilir yanlış yazmadıysam kodu.

Yada 
If Gveri = "" then
Msgbox "iptal edildi"
Exit sub
End if

Dediğim gibi kodu kafadan yazdım mantıken böyle olacak

="" yerine = false 
De olabilir unuttum kodu chancel için.