Set Focus

[llmiller]

I have developed many Excel 97 spreadsheets over the last few years utilizing userforms, textboxes, and 'setfocus' without any problem. Recently, I upgraded to Excel 2000 (I know... I am still a few updates behind) and now have encountered a problem with 'setfocus'. It simply does not seem to work.

Can anyone offer an insight into what might be causing this problem?

Thanks,

Logan

 

[dk]

What's the code that's giving you a problem?

 

[llmiller]

DK,

An example of code follows. This code has worked perfectly in Excel 97 for over two years. After the upgrade to Excel 2000, it fails to perform.

Private Sub CommandButton2_Click()
Range("e2,f2").Value = ""
Me.Hide
Find_Subtotal.TextBox1.SetFocus
Find_Subtotal.Show
End Sub

Thanks,

Logan

 

[dk]

Logan,

Is the ShowModal property of the Find_Subtotal true or false? My guess is that it's currently false. Try changing it to true and see what happens.

 

[llmiller]

dk

Thanks for the suggestion. However, the ShowModal property of the form is set to 'True'.


Logan

 

[dk]

In that case I'm not sure what could be wrong. I tried out your code and it worked for me. If you want, you can send me a sample workbook with the stuff that doesn't work.

 

[llmiller]

dk,

I played around with this a little further and created a brand new workbook in 97 with a simple userform and textboxes. The setfocus routine worked fine in both Excel 97 and 2000.

It appears that some sort of anomaly must have occurred during the creation of the original spreadsheets in Excel 97 a couple of years ago. I can't find anything else that explains the problem.

Thanks again for all your assistance. Much appreciated.

Logan