Automatic Code Indenting 1

[RSfromCO]

I wrote a procedure to generate a bunch of standard code I use within MS-Access for a class module. I didn't worry about formatting the code (indenting) that was generated into the text file. However, when I actually put the code into the class module I would like it to indent propery for readablity. Is there a way to get code to 'indent' when it is pasted into the code editor? Or once the code is in the code editor window, can I select it and tell it to auto-indent or auto-format somehow?


For example.... if part of the code I paste into the class module looks like this...

Public Property Let CustomerID(var As Long)
lngCustomer = var
End Property
Public Property Get CustomerID() As Long
CustomerID = lngCustomerID
End Property

I would like to end up with something more like this...

    Public Property Let CustomerID(var As Long)
        lngCustomer = var
    End Property
    Public Property Get CustomerID() As Long
        CustomerID = lngCustomerID
    End Property

 

[PHV]

Have a look here:

http://www.oaltd.co.uk/Indenter/Default.htm

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886