Next without for??
Excel 2003 VBA
I'm getting an error "next without for" in the following, simple code. Doesn't make sense to me. Any help? Private Sub CommandButton3_Click() Dim MyControl As Control For Each MyControl In Me If TypeOf MyControl Is TextBox Then MyControl.Text = "" ElseIf TypeOf MyControl Is Label Then MyControl.Caption = "" Next MyControl End Sub |
Next without for??
Add and "End if" before the "next mycontrol" line.
Not matching if/end if's can give this kind of error. And I'd use If TypeOf MyControl Is msforms.TextBox Then MyControl.Text = "" ElseIf TypeOf MyControl Is msforms.Label Then Sometimes if you're not specific, bugs can be difficult to find. And since there's a textbox on the Drawing toolbar and a Label on the Forms toolbar, you can avoid confusion. ZootRot wrote: Excel 2003 VBA I'm getting an error "next without for" in the following, simple code. Doesn't make sense to me. Any help? Private Sub CommandButton3_Click() Dim MyControl As Control For Each MyControl In Me If TypeOf MyControl Is TextBox Then MyControl.Text = "" ElseIf TypeOf MyControl Is Label Then MyControl.Caption = "" Next MyControl End Sub -- Dave Peterson |
All times are GMT +1. The time now is 10:22 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com