userform help ... combobox times textbox = emptyrow

[eric86vabeach]

hello im working on a userform in excel i would like to have a combobox that has the words "yes" and "no" then after the user picks "yes" then it would take the textbox187.value * 4 (it needs to times it by 4) then it puts the value in emptyrow, 26 ...... OR if the user picks "no" then it would take the textbox187.value * 4 (it needs to times it by 4) then it puts the value in enptyrow, 27


If Me.ComboBox26.Value = "YES" Then
Me.ComboBox26.Value = Int(Me.TextBox187.Value) * 4
Cells(emptyRow, 26).Value = Me.ComboBox26.Value


If Me.ComboBox26.Value = "NO" Then
Me.ComboBox26.Value = Int(Me.TextBox187.Value) * 4
Cells(emptyRow, 27).Value = Me.ComboBox26.Value
End If


this is what i have tryed but its not working plz help me !!!


thanks for your time
eric​

 

[Momentman]

Have you defined your emptyrow?

Something like this maybe

Private Sub ComboBox1_Change()
    emptyrow = Range("A" & Rows.Count).End(xlUp).Offset(1, 0).Row
    
    If Me.ComboBox26.Value = "YES" Then
        Me.ComboBox26.Value = Int(Me.TextBox187.Value) * 4
        Cells(emptyrow, 26).Value = Me.ComboBox26.Value
    ElseIf Me.ComboBox26.Value = "NO" Then
        Me.ComboBox26.Value = Int(Me.TextBox187.Value) * 4
        Cells(emptyrow, 27).Value = Me.ComboBox26.Value
    End If
End Sub

 

[eric86vabeach]

emptyrow
emptyrow = WorksheetFunction.CountA(Range("A:A")) + 1

THANKS SO MUCH IT WORKS !! !! ! ! ! YOUR THE BEST ! ! ! ! !! ! THANKS FOR YOUR TIME