Julian Carr Posted May 12, 2020 Share Posted May 12, 2020 Anyone have a script handy that will export a list containing sheet layer names and numbers? TIA. Quote Link to comment
Pat Stanford Posted May 12, 2020 Share Posted May 12, 2020 No, but this thread has a script that will make a worksheet of design layers. Change the GetObjectVariableInt(H2,154)= 1. (I think Sheet Layers are 2) and you should get a worksheet of the sheet layers. Adding the Sheet Numbers should be relatively easy. I would probably change LayerSort to a Struct with two strings. Store the name and number in the struct and then add a second SetWSCellFormula line. HTH. Quote Link to comment
MullinRJ Posted May 12, 2020 Share Posted May 12, 2020 (edited) Hi Julian, Do you mean something like this? PROCEDURE xxx; CONST CR = chr(13); VAR H :Handle; BEGIN H := FLayer; while (H <> nil) do begin if (GetObjectVariableInt(H, 154) = 2) then AlrtDialog(concat('Sheet # = ', GetLName(H), CR, 'Sheet # [Title] = ', GetObjectVariableString(H, 162))); H := NextLayer(H); end; { while } END; Run(xxx); By Export, do you mean write to a file? If not, how to format it? Raymond Edited May 12, 2020 by MullinRJ Quote Link to comment
Julian Carr Posted May 12, 2020 Author Share Posted May 12, 2020 Thanks a lot Pat and Ray. I cobbled something together from what you sent. Quote Link to comment
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.