Why is this not working. It's showing up on row 30 and not erowing. Should be row 1 then row two..ect.
Private Sub cmdtranfer_Click()
'Range("C2").Value = txtname
'Range("D2").Value = cmbBCCfacility.Value
'Range("E2").Value = cmbhospital.Value
'Range("F2").Value = cmbadmitdr.Value
'Range("G2").Value = cmbHosattend.Value
'Range("H2").Value = cmbconsult.Value
'Range("I2").Value = cmbprimary.Value
'Range("J2").Value = cmbBccAtt.Value
'Range("K2").Value = cmbassigned.Value
eRow = Sheet1.Cells(Rows.Count, 1).End(x1Up).Offset(1, 0).Row
Cells(eRow, 3).Value = txtname.Text
Cells(eRow, 4).Value = cmbBCCfacility.Value
Cells(eRow, 5).Value = cmbhospital.Value
Cells(eRow, 6).Value = cmbadmitdr.Value
Cells(eRow, 7).Value = cmbHosattend.Value
Cells(eRow, 8).Value = cmbconsult.Value
Cells(eRow, 9).Value = cmbprimary.Value
Cells(eRow, 10).Value = cmbBccAtt.Value
Cells(eRow, 11).Value = cmbassigned.Value
Bookmarks