Macro Not Shown with Alt+F8

[Philip1957]

I created a macro in my Personal.xlsb but it does not appear in the macro window when I hit Alt+F8. All my other macros show, only this one does not. The macro runs just fine from the VBA editor.

Sub DeleteColumns()
Dim ColAry, i As Long, fc As Long
Application.ScreenUpdating = False

ColAry = Array("looptest", "StationName", "TestStatus", "IsFirstTest", _
  "TesterStartTime", "UnitStatus", "PO")

With ActiveSheet
  For i = LBound(ColAry) To UBound(ColAry)
    fc = 0
    On Error Resume Next
    fc = Application.Match(ColAry(i), .Rows(1), 0)
    On Error GoTo 0
    If fc > 0 Then
      .Columns(fc).Delete
    End If
  Next i
End With

Application.ScreenUpdating = True
End Sub

Any suggestions?

Thanks in advance for your time.
~ Phil

 

[Philip1957]

This particular module only contained a single macro.

Other modules in my Personal.xlsb with one or more macros each were all properly displayed in the F8 window.

 

[Fluff]

In that case it's possible you had

Option Private Module

at the very top of the module, before the code.

 

[Philip1957]

Nope. Just

Option Explicit

.

My best guess is that the module got corrupted somehow.

 

[Fluff]

That's another possibility.

 

[roma_white]

Son-of-a-gun!

I copied my code to notepad, and deleted the module. Then I created a new module and pasted the code from notepad back into the VBE.

And now it shows in the Alt-F8 list. Don't ask me why, there is nothing different about the new module that I can see.

Thanks for your time. I really appreciate it.

~ Phil

This has helped me too. Many thanks , Philip for the sharing !