Need help to add sheet, rename and update in TOC

[kets0985]

Hello,

I want to create a database spreadsheet for collecting data.

Tried :
Code 1: I want a button to add new sheet and rename it by using inputbox. (Done by me)
Code 2: the table of contents should be updated with name of the newly added sheet.

Needed Help:
Code 3: Before adding sheet it should check if sheet name already exists. If not add new sheet, else Msgbox (" Sheets exists") (Help needed)
In Code 1: (Imp for me) when the input box is cancelled or left blank and clicked ok, the macros should end without adding sheet, else if the number is entered the sheet should be created.(Help needed)
Also, the patient no entered in the input box should be added in cell.value for cell A2
In Code 2: The table of contents should not contain Main & Main_1 sheet name and the Sr No should be updates with rows filled. Also the cell should be automated once filled.

Patients_Details.xlsm

If somebody could hep me to build such code, it will really help me a lot. And your help is much appreciated.

Patients_Details.xlsm

Waiting for replies.

Thanks,

Ketan Bhole