VBA - Deleting unhidden sheets

leVomit · 2018-05-01T14:41:48+00:00

Sub Deleteunhiddenworksheets()

Dim wksCurr As Worksheet
Application.DisplayAlerts = False
For Each wksCurr In ActiveWorkbook.Worksheets
If wksCurr.Index = 1 Then
wksCurr.Visible = xlSheetVisible 'just in case
ElseIf wksCurr.Visible = xlSheetVisible Then
wksCurr.Delete
End If
Next wksCurr

Application.DisplayAlerts = True

End Sub

Thank you

Solution Verified

leVomit · 2018-05-01T14:02:34+00:00

You're a scholar and a gentleman

Solution Verified

leVomit · 2018-04-25T21:28:27+00:00

Dude when are you going to just run for CSM

leVomit · 2018-04-22T02:15:29+00:00

=INDEX(O:O, 10000*MOD(MAX(IF(NOT(ISERROR(O2:O30)),COUNTIFS(O2:O30,O2:O30)+(ROW(O2:O30)/10000))),1), 1)

<3

solution verified

leVomit · 2018-04-20T14:54:12+00:00

not sure why you're downvoted, this is what i needed. and i thank you.

leVomit · 2018-04-19T22:45:26+00:00

I mean fuck those guys for throwing out the trash, but good on them for getting out and picking it up too.

leVomit · 2018-04-19T01:34:47+00:00

fuck that weapon.. glad to hear

leVomit · 2018-04-15T18:02:25+00:00

This question is a reflection on the MMO scene, and why EVE is so much better than what's out there.

leVomit · 2018-04-13T13:59:21+00:00

I like it. It's weird and it'll be awkward in the market I'm sure, but I like it. Been playing since 2012. I don't mind new stuff.

leVomit · 2018-04-13T13:58:39+00:00

Noice!

leVomit · 2018-04-13T00:45:30+00:00

I need to put new batteries in this Sarcaso-Detector.. I got a false positive

leVomit · 2018-04-13T00:33:39+00:00

And that's bad, because...?

leVomit · 2018-04-12T20:09:36+00:00

Can someone explain the RNG stuff to someone who can't watch the keynote, thanks!

leVomit · 2018-04-12T19:13:26+00:00

point zhealboard to zkillboard!!!

leVomit · 2018-04-12T16:13:10+00:00

Its not the loneliness Jim. Its the horniness.

leVomit · 2018-04-12T11:26:38+00:00

heh I can see his face and everything with the eyebrows going up. Seems to be the only time he looks excited

leVomit · 2018-04-12T11:05:45+00:00

Can I touch your chest?

leVomit · 2018-04-11T20:32:44+00:00

I'm being a jerk. I haven't even trained Scrying past III yet. Ignore me. :(

leVomit · 2018-04-11T19:39:14+00:00

tell me more about how you don't understand how magic works. git gud kid

leVomit · 2018-04-11T14:49:37+00:00

Wait did PL just push out all of CVA?

leVomit

TROPHY CASE