On 30 Jun. Kurt wrote:
> > > 1. The comment in this code has as an example, "ShadeAlternateRows
> > > Range("A1:D50"), 27, 2", but where in the actual code do you put this
> > > information?

Stuart Redmann wrote:
> > That depends on when the highlighting should happen.

Kurt wrote:
> I'm most interested in learning how to do it manually (e.g., after
> manually selecting a range).

Ok. First of all, you can only use subs that take no arguments (and
then it does not matter where you put it). The macro must be re-
designed to use the current selection (also we have to fix the step
width and the color):

Public Sub ShadeAlternateRows()
  With Selection
        ' remove any previous shading
        .Interior.ColorIndex = xlColorIndexNone

        ' Shade every second row in yellow (= color index 27)
        Dim r As Long
        For r = 2 To .Rows.Count Step 2
           .Rows(r).Interior.ColorIndex = 27
        Next r
    End With
End Sub

Now you this sub appears in the macro list and can be assigned a
shortcut. If you need to be able to use different colors, you'll have
to pop up a dialog that lets the user choose a color.

Regards,
Stuart

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to [email protected]

<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!

We reach over 7000 subscribers worldwide and receive many nice notes about the 
learning and support from the group.Let friends and co-workers know they can 
subscribe to group at http://groups.google.com/group/excel-macros/subscribe

Reply via email to