Making textboxes invisible and visible on cell input

[redmar007]

Hi there,

After some hours spend and not getting any closer to the solution I decided to login again and call in the troops.
I understand how it works but not how I can make it work. So any help will be greatly appreciated.

I have a couple of textboxes and comboxes which I would like to have invisible and appear on cell input for example cell A1 for textbox 1 and A2 for textbox 2 etc. The idea is to have only the first textbox visible and the user must fill in textbox 1 to be able to continue to the next textbox automatically and after the second textbox is filled he/she is able to move on to the combobox etc.

I tried several things but cant make it work some how. Perhaps I am also putting the VBA code in the wrong module.

Kind regards

Redmar

 

[Norie]

Where are these textboxes located?

 

[redmar007]

The textboxes are located in the standard tab Sheet1 as an object through developer

 

[redmar007]

Someone posted something yesterdag and I think I am on the path to salvation:


Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveSheet.Range("a1").Value = 1 Then
ActiveSheet.Shapes("Textbox1").Visible = True
Else
ActiveSheet.Shapes("Textbox1").Visible = False
End If
End Sub

 

[redmar007]

Getting there... but now the refresh rate is too slow.


Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveSheet.Range("a1").Value = "" Then
ActiveSheet.Shapes("Textbox1").Visible = True
Else
ActiveSheet.Shapes("Textbox1").Visible = False
End If
If ActiveSheet.Range("c3").Value = 1 Then
ActiveSheet.Shapes("Textbox2").Visible = True
Else
ActiveSheet.Shapes("Textbox2").Visible = False
End If

End Sub


If I type a 1 in C3 it is suppose to instantly show the other textbox