Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.
Sub HideTabs() Dim w As Worksheet Set w = Worksheets.Add w.Name = "ListOfSheets" For x = 1 To Worksheets.Count w.Cells(x, 1) = Sheets(x).Name Next wSheets = Array("SHEET1", "SHEET2", "SHEET3") wsstat = Worksheets(wSheets(0)).Visible If wsstat = xlSheetVisible Then wsstat = xlSheetHidden Else wsstat = xlSheetVisible End If For n = 0 To UBound(wSheets) Worksheets(wSheets(n)).Visible = wsstat Next n End Sub
|Excel Pivot Chart - Need to show sum of totals||3||18|
|Best prediction based on two lists of numbers in excel||2||40|
|Excel Charts: How is this Chart made?||8||24|
|Need VBA to copy data from one worksheet to main worksheet||7||13|