Mae VBA yn Arbed Tabiau yn unigol gydag enwau wedi'u diffinio ymlaen llaw yn rhannol

Rwy'n gobeithio y gall rhywun fy helpu i ddatrys pos yma. Mae gen i lyfr gwaith gyda nifer o dabiau yr wyf wedi creu macro ar eu cyfer i arbed pob un o'r rhain fel ei ffeil VBA ei hun. Pan fydd y ffeiliau'n cael eu cadw mae'r macro wedi'i gynllunio i ddefnyddio enw'r tab wedi'i gyfuno â gwerth rhagosodol a dyddiad ac amser.

Dyma fy rhifyn. Dim ond un tab sydd gennyf yr hoffwn ei eithrio, gan fod angen confensiwn enwi gwahanol arno ond ni allaf ddarganfod sut i'w eithrio o'r macro sydd gennyf ac yna cael yr un macro i achub y ffeil honno gyda chonfensiwn enwi gwahanol.

Dyma beth sydd gen i:

Is-Daflenni Gwaith Arbed CyhoeddusAsCsv222()
Dim xWs Fel Taflen Waith
Dim xDir Fel Llinyn
Dim ffolder Fel FileDialog
dt = Fformat(CStr(Nawr), "YYYYMMDDHHMM")
Gosod ffolder = Application.FileDialog(msoFileDialogFolderPicker)
Os folder.Show <> -1 Yna Ymadael Is
xDir = ffolder.SelectedItems(1)
Ar gyfer Pob xWs Mewn Cymhwysiad.ActiveWorkbook.sheets
xWs.SaveAs xDir &"\"&"US_DGF_" &xWs.Name &"_CARe_" &dt, xlCSV, Lleol:=Gwir
Digwyddiadau
Is-End

Yr hyn sydd ei angen arnaf yw i dab o'r enw USCS gael ei gadw gan ddefnyddio'r un meini prawf ond yn lle "CARe: mae angen iddo fod yn CARe2 - Dim ond y tab hwn yn unig.

All unrhyw un helpu os gwelwch yn dda?