他シートに記載してあるデータを転記する必要がありました。特定の列を転記するので，転記す
る列を強調するにはどうしようかと考えていました。
メインとなっているBookから，転記するシートを開く，転記する列を選ぶ，転記する，との一連
の動作は，一通りできるようになってますが，よりわかりやすくするのに，転記する列を強調し
たくなり，その方法をいろいろかんがえていました。転記するBookに条件付き書式を手動で設定
すれば，事足りるのですが，手動では，あまりにも芸がないので，VBAから，できないか，思案し
ていました。
VBAからVBAに書き込むようかなとあれこれあさっていましたが，条件付き書式は，ブックを開いて
さえいれば，メインのBookから，他のBookに条件付き書式の書き込みができるようなので，実際に
実行してみました。
メインのVBAに
'読み込んだファイル名でブックを開く
Set wb = Workbooks.Open(fPath, UpdateLinks:=Ture, ReadOnly:=Ture)
Set Taisyou_Sheet = wb.Worksheets("受付名簿")
'対象シートに条件付き書式を設定
Taisyou_Sheet.Cells.FormatConditions.Delete
Range(Taisyou_Sheet.Cells(4, 2), Taisyou_Sheet.Cells(101, 14)).FormatConditions.Add(Type:=xlExpression, Formula1:="=CELL(""COL"")=COLUMN()").Interior.Color = rgbPowderBlueのように書き込むことで，条件付き書式の設定ができたようです。
ただ，これだけでは，だめで，
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub
を該当シートに書き込む必要があるので，やはり，VBAからVBAを操作する必要がありますね。