View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Freshman Freshman is offline
external usenet poster
 
Posts: 158
Default User form problem

Dear all,

I follow a book's example which teaches how to transfer the data (Name &
Sex) from an user form onto a spreadsheet. I follow the procedures
step-by-step but when I clicked the "OK" button which executives the transfer
action, a compile error occurred stating "variables not defined" and
highlighted the wording "NextRow =" in the VBA code below. Please kindly
advise what's wrong with the code and how to remedy it. Thanks.

Sheets("Sheet1").Activate

NextRow = _
Application.WorksheetFunction.CountA(Range("A:A")) + 1
Cells(NextRow, 1) = TextName.Text

If OptionMale Then Cells(NextRow, 2) = "Male"
If OptionFemale Then Cells(NextRow, 2) = "Female"
If OptionUnknown Then Cells(NextRow, 2) = "Unknown"

TextName.Text = ""
OptionUnknown = True
TextName.Text.SetFocus