Hi,

I'm having a lot of trouble with my textbox percentages.

I am using this to save the value to the worksheet:

'Save Rental Tax
With .Cells(Choice, 8)
.HorizontalAlignment = xlCenter
.NumberFormat = "0.00%;;"
Select Case frmStoreData.txtRentalTax
Case ""
.Value = Val(frmStoreData.txtRentalTax.Value)
Case 0
.Value = frmStoreData.txtRentalTax.Value
Case Is 0
.Value = frmStoreData.txtRentalTax.Value / 100
End Select
End With

I am using this to load it into the textbox:

Me.txtRentalTax.Value = Format(.Cells(Choice, 8).Value, "0.00%")

If no change is made in that particular textbox or if the value is changed
by deleting digits, i.e. change 2.45% to 2.4% by only deleting the 5, I get a
#13 Type Mismatch error.

How would I correct this?


Thanks for your help.
--

Karen