Cycle Current Layer up or down the Layer List

[Anonymous]

Hello,

I'm trying to figure a way to switch the current layer up/down the layer list by 1 layer, in attempt to bind a lisp or macro to Page Up and Page Down keys on my keyboard.

Does anyone have a lisp built for handling something like this? Autocad doesn't seem to have anything built in to acheive this.

And I've tried binding marcos to my keyboard keys via the keyboard software (Razer) and using ALT+H etc. but since I use the menu bar it doesn't get to the ribbon to hit the Home tab. (Idea was to bind a macro for Alt+H, LA, Up Arrow, ESC)

[rushabhthakkar_910 · Accepted solution]

Here's a version with the same command names that bypasses any Frozen Layer(s), and notifies the User if it has done so.  It notifies the User of the new current Layer in any case [even though that will also be apparent in the Layer indicator in the Ribbon or Properties box or Layer pulldown].

[Kent1Cooper]

As the author of that routine, I would direct you to >where it came from<, in case there's anything else on the thread that you may find useful or informative.