LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 50
Default If then else if problem for DA

I know this macro doesn't work (bad syntax) and I also know there must
be more elegant ways to do this. Kindly help.

Sub HideUnusedHurdles()

If Range("NumberOfHurdles").Value = 4 Then GoTo 100

Else If Range("NumberOfHurdles").Value = 3 Then
Range("HideMonthlyRowsIfOnlyThreeHurdles").Select
Selection.EntireRow.Hidden = True
Range("HideQtrlyRowsIfOnlyThreeHurdles").Select
Selection.EntireRow.Hidden = True
Range("HideAnnualRowsIfOnlyThreeHurdles").Select
Selection.EntireRow.Hidden = True
GoTo 100



Else If Range("NumberOfHurdles").Value = 2 Then
Range("HideMonthlyRowsIfOnlyTwoHurdles").Select
Selection.EntireRow.Hidden = True
Range("HideQtrlyRowsIfOnlyTwoHurdles").Select
Selection.EntireRow.Hidden = True
Range("HideAnnualRowsIfOnlyTwoHurdles").Select
Selection.EntireRow.Hidden = True
GoTo 100

Else If Range("NumberOfHurdles").Value = 1 Then
Range("HideMonthlyRowsIfOnlyOneHurdle").Select
Selection.EntireRow.Hidden = True
Range("HideQtrlyRowsIfOnlyOneHurdle").Select
Selection.EntireRow.Hidden = True
Range("HideAnnualRowsIfOnlyOneHurdle").Select
Selection.EntireRow.Hidden = True
100
End If

End Sub
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Colon at the end of excel file name(ex: problem.xls:1, problem.xls financeguy New Users to Excel 2 January 15th 10 01:15 AM
Started out as an Access problem. Now an Excel problem RobertM Excel Discussion (Misc queries) 2 April 26th 06 07:30 PM
problem with a conditional max problem Brian Cornejo Excel Discussion (Misc queries) 1 February 18th 05 06:25 PM
Problem when multipple users access shared xl-file at the same time, macrocode for solve this problem? OCI Excel Programming 0 May 16th 04 10:40 PM


All times are GMT +1. The time now is 11:57 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"