Hi kapeller,
Welcome to the forum
change
With Sheets("KOLETSIS")
to
 With activesheet