I currently have a procedure that allows the users to click on a button
to move a selected row up or down in a list. The problem I'm having is
that when they move the rows down the conditional formating on the
cells get screwed up. Below is an example of what happens when I try to
move row 1 down to row 2.

Conditional Formatting Formulas Prior to Move.
(There is actually 2 conditions in each, but for simplicty I just used
1).
Row 1 = "=$A1"
Row 2 = "=$A2"
Row 3 = "=$A3"

Conditional Formatting After I moved row one down to row 2.

Row 1 = Formatting is gone
Row 2 = "=$A4"
Row 3 = "=$A5"

Here is the part of the code that I use to move the rows. The problem
seems to occur when I use the insert statement.

MoveFrom = Selection.Row
Rows(MoveFrom).Select
Selection.Cut
Rows(MoveFrom + 2).Select
Selection.Insert shift:=xlDown
Rows(MoveFrom + 1).Select

The thing that makes this more frustrating is that I don't get the same
problem when the user moves a row up. It's basically the same logic.
Any help would be greatlty appreciated.

Thanks,
James