How to add member without overwriting the old member?

[Baked_potato]

I have no background in programming and currently still going on self study.


Private Sub OKcmdb_Click()

Dim x As Long

x = 1


Worksheets("Members").Cells(x, 1).Value = Idtb.Value

Worksheets("Members").Cells(x, 2).Value = Fullnametb.Value

Worksheets("Members").Cells(x, 3).Value = JPositiontb.Value

Worksheets("Members").Cells(x, 4).Value = Sectiontb.Value

Sheets("Members").Activate

End Sub


Thanks in advance,
Baked potato

 

[Baked_potato]

Should you have data that far down?
If not I suggest you delete all those rows.

Hi sir,

Sorry for delayed response. The code is running so well right now.

Thanks a lot. I really appreciate your help especially to a newbie like me.

 

[Fluff]

You're welcome & thanks for the feedback.