I select a range in a row and begin formatting per the code below, I am
having trouble getting this code to work.
It will find the first cell with "TRG" but none of the others?  It appears
to complete the Font changes but not the alignment changes (less the first
cell with "TRG").
'======
   Range("F10:F29").Select
   Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
       Formula1:="=""TRG#"""
   
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
   With Selection.FormatConditions(1).Font
       .Bold = True
       .Italic = True
       .TintAndShade = 0
   End With
   With Selection
       If Left(ActiveCell.Value, 3) = "TRG" Then
       .HorizontalAlignment = xlGeneral
       .VerticalAlignment = xlBottom
       End If
   End With
   Selection.FormatConditions(1).StopIfTrue = False
   Range("D10").Select
'======