locked textbox property set to true at worksheet

Question

Hello, I have textboxes (activeX controls) on my worksheet that I've locked to true from the property tab, but it doesn't seem to be working at all. The only way to stop the values in those textboxes from being manually changed was to set the enable property to false, but I can't make the font black. Does anyone have any recommendations?

This is the code I have used so far:

Private Sub locktextboxes()

Dim NamaBarangTextBox As Object
Set NamaBarangTextBox = Sheet1.NamaBarang

With NamaBarangTextBox
    .Locked = True
End With

End Sub