[[20090430133425]]　『セルを位置づけた行全体の色をつける』（Ｃ３６ＡＭＧ）　ページの最後に飛ぶ

『セルを位置づけた行全体の色をつける』（Ｃ３６ＡＭＧ）
ＥＸＣＥＬのシートでセルが位置づいている行全体に色を付け
現在どこの行を見ているか知りたいのですが、何か良い方法があれば教えて下さい。

単純に行に位置づけ色を付けるのはＮＧです。
よろしくお願いいたします

 Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.Interior.ColorIndex = xlNone
    Rows(Target.Row).Interior.ColorIndex = 35

 End Sub

 受け売りですが、私はこんな感じでしています。
 いつかこの学校で教わったものです。
 シートモジュールに貼り付けます。
 ColorIndexの数字はお好みで変更してください。
 (tora)

 別案ですが、使い勝手はあまりよくないかも 
                                          F/Calfornia

 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 Application.EnableEvents = False
 With Target
     .EntireRow.Select
     .Activate
 End With
 Appliction.EnableEvents = True
 End Sub

ｔｏｒａさん

どうもありがとうございました

うまくできました。

Ｃ３６ＡＭＧ

コメント返信：

[ 一覧(最新更新順) ]

[[20090430133425]] 『セルを位置づけた行全体の色をつける』（Ｃ３６ＡＭＧ） ページの最後に飛ぶ

[[20090430133425]]　『セルを位置づけた行全体の色をつける』（Ｃ３６ＡＭＧ）　ページの最後に飛ぶ