Link to home
Start Free TrialLog in
Avatar of RWayneH
RWayneHFlag for United States of America

asked on

Get Sheet tab to appear, to Select it.

Hello, I am having an issue with Ln 5 and 6.  The sheet name is not one of the ones that I want to leave alone.  Issue is Unable to set the Visible property of the worksheet class?
Any ideas?  Please advise and thanks.


Do 
        n = n + 1
        If Worksheets(n).Name <> "Budget Items" And Worksheets(n).Name <> "MasterPrimaryDepositAccount" And Worksheets(n).Name <> "DefaultAccountPg" And Worksheets(n).Name <> "BudgetSummaryPg" Then
           CurrentSheetTab = Worksheets(n).Name
           Sheets(CurrentSheetTab).Visible = True
           Sheets(CurrentSheetTab).Select
           Range("G4").Select
           CurrBal = ActiveCell.Value
           Sheets("BudgetSummaryPg").Select
           Range("A5").Select
           Do While Not ActiveCell = ""
                If ActiveCell = CurrentSheetTab Then
                    ActiveCell.Offset(0, 3).Select
                    ActiveCell.Value = CurrBal
                    Sheets(CurrentSheetTab).Select
                    Sheets(CurrentSheetTab).Visible = False
                    Exit Do
                Else
                    ActiveCell.Offset(1, 0).Select
                End If
            Loop
        End If
    Loop Until n = Worksheets.Count

Open in new window

ASKER CERTIFIED SOLUTION
Avatar of RWayneH
RWayneH
Flag of United States of America image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial