Replaceの使用例
ユーザーフォームで指定したセルの値がが該当の値の時置き換える
Check_Row = Val(Label10)
Check_Column = Val(Label11)
Sheets(1).Cells(Check_Row, Check_Column).Replace What:="△", Replacement:="▲"
Sheets(1).Cells(Check_Row, Check_Column).Replace What:="☆", Replacement:="★"
Sheets(1).Cells(Check_Row, Check_Column).Replace What:="□", Replacement:="■"