BruceMutton
New Member
- Joined
- Feb 16, 2002
- Messages
- 10
The intrinsic constant data types, such as xlCVError or xlPaperSize are like collections in concept I think, however I do not seem to be able to use collection syntax, such as xlPaperSize.Count or For Each lngConst In xlPaperSize......
The problem I am trying to solve is...
Let PSize = WorkSheets(1).PageSetup.PaperSize
'PSize as returned is a Double or Long integer number, this functions OK
'Now I want to find the text string of the intrinsic constant that evaluates to this number, PSize
'ie is the paper size "xlA4", "xlLetter", "xlUser" or any other of the 50 or so paper size constants??
Suggestions much appreciated
The problem I am trying to solve is...
Let PSize = WorkSheets(1).PageSetup.PaperSize
'PSize as returned is a Double or Long integer number, this functions OK
'Now I want to find the text string of the intrinsic constant that evaluates to this number, PSize
'ie is the paper size "xlA4", "xlLetter", "xlUser" or any other of the 50 or so paper size constants??
Suggestions much appreciated