0

選択したセルの色を変更するコードを作成しました。通常、そのコードをSheet1 VBAファイル、またはそれを使用しているシートに入れます。

クラスモジュールファイルに入れたいので、別のワークシートやExcelファイルに簡単に実装できます。

クラスモジュールはそれを行うのに適した場所ですか? 私の全体的な考えは、そのようなイベントをいくつか用意し、それらをオンまたはオフにする簡単な方法と、コードを別の Excel ファイルに移行することです。

これに対する最善のアプローチは何だと思いますか？

コードは次のようになります。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If (Range("A1").Value = "yes") Then
        Dim iColor As Integer
        On Error Resume Next
        iColor = Target.Interior.ColorIndex
        iColor = 36
        Cells.FormatConditions.Delete
        Target.FormatConditions.Add Type:=2, Formula1:=iInternational
        Target.FormatConditions(1).Interior.ColorIndex = iColor
    Else
        Cells.FormatConditions.Delete
    End If
End Sub
4

1 に答える 1

1

シッダールスはその場にいます。クラスモジュールは必要ありません。問題を回避するには、ワークブックコードを更新するコードを記述して、give .basファイル内の任意のモジュールを取得し、ワークブック内の任意のオブジェクトにコピーできるようにします。

したがって、myLibrary.basにWorksheet_Changeコードがある場合は、それをコピーして、ワークブックの各Worksheetオブジェクトに配置できます。

これを始めるのに最適な場所です：モジュールの操作

于 2012-05-16T16:14:12.007 に答える