but on another PC i work absolutely fine, and may I know how to fix it?Your code doesn't specify the worksheet when clearing the ranges, so it will just clear whatever sheet is active at the time.
Thanks it workSpecify the sheet, as you have done in all the previous code - i.e. usews1.Range(A1:A25)
not justRange(A1:A25)