Hi tom,

Thanks for the reply. I see where you are coming from. I have been
trying to use your code to cover my problem but couldn't come up with
the answer


Here is part of my original code:

If Txt_Height_A_1.Visible = True Then
Txt_Calc_Elev_HeightorDepth_1.Visible = True
Txt_Calc_Elev_Width_1.Visible = True
Txt_Calc_Mod_Qty_1.Visible = True
Worksheets("Solarfin").Range("f16").Value = "Calc Module Sizes &
Qty"
Selection.Font.Bold = True
Cmd_Calc_1.Visible = True
Else
Txt_Calc_Elev_HeightorDepth_1.Visible = False
Txt_Calc_Elev_Width_1.Visible = False
Txt_Calc_Mod_Qty_1.Visible = False
Worksheets("Solarfin").Range("f16").Value = ""
Cmd_Calc_1.Visible = False
End If

This repeats 6 times. The 6 textboxes only need to be visible if
Txt_Height_A_1.Visible = True or Txt_Height_A_2.Visible = True etc.
"Txt_Height_A_#".visible = true does not work. any ideas?


---
Message posted from http://www.ExcelForum.com/