jammer6_9
04-27-2007, 11:44 PM
Hi all,
How can I change the Checkbox value "True or False" into "Yes or No" and to be saved in the worksheet.
Private Sub chkFeasibilityYes_Click()
If chkFeasibilityYes.Value = True Then
chkFeasibilityYes.Value = "Yes"
End If
End Sub
Private Sub chkFeasibilityNo_Click()
If chkFeasibilityNo.Value = True Then
chkFeasibilityNo.Value = "No"
End If
End Sub
Private Sub cmdProceed_Click()
Set c = Range("a65536").End(xlUp).Offset(1, 0)
Application.ScreenUpdating = False
c.Value = Me.cmbCountry.Value
c.Offset(0, 1).Value = Me.chkFeasibilityYes.Value '<-- checkbox
Application.ScreenUpdating = True
End Sub
How can I change the Checkbox value "True or False" into "Yes or No" and to be saved in the worksheet.
Private Sub chkFeasibilityYes_Click()
If chkFeasibilityYes.Value = True Then
chkFeasibilityYes.Value = "Yes"
End If
End Sub
Private Sub chkFeasibilityNo_Click()
If chkFeasibilityNo.Value = True Then
chkFeasibilityNo.Value = "No"
End If
End Sub
Private Sub cmdProceed_Click()
Set c = Range("a65536").End(xlUp).Offset(1, 0)
Application.ScreenUpdating = False
c.Value = Me.cmbCountry.Value
c.Offset(0, 1).Value = Me.chkFeasibilityYes.Value '<-- checkbox
Application.ScreenUpdating = True
End Sub