Hi, I am having a problem that...
I have a worksheet2 with data of my Patients with following Headings,

A B C D ("Trtmnt") E ("Date") F ("Trtmnt") G ("Date") H ("Trtmnt") G ("Date") H ("Trtmnt")
11 S.No Name of Patient Symptoms Treatment

I made a userform1 to add the data to this sheet2 with 4 TextBoxes and a commandButton1 to enter the data which works perfect. But I want to add the next "date" and next "treatment" of any patient to the very next empty column of selected patient's name through another UserForm2 "Add Treatment" ComboBox1.value and repeat (loop) it as many time the patient is taking his treatment and visiting each time to the clinic by entering the data by pressing the CommandButton1 of UserForm2 "Add Treatment".

manual written on worksheet2
A B C D ("Trtmnt") E ("Date") F ("Trtmnt") G ("Date") H ("Trtmnt") G ("Date") H ("Trtmnt")
11 S.No Name of Patient Symtomps Medicines 01/01/2014 Medicines 02/02/2014 Medicines 03/03/2014 Medicines

Any one can solve my problem by sending me the right vba code to add the next info of "trtmnt" of any selected patient through userform2.

Thanks in advance for any effort for me.