有没有办法锁定一个单元格的格式？

jonathan-zc

有一个查询表，其中A5单元格被设置为查找输入格。
现在发现很多人直接在邮件里或网页上copy了关键字词后黏贴到A5格子里，然后A5就会变成各种颜色各种字体左右不对齐上下不对齐的状态。
有没有什么办法可以锁定A5单元格的格式，例如指定左右居中上下居中，指定字体和大小这样

bridgeyao

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 4 And Target.Row = 3 Then
        With Target
             .HorizontalAlignment = xlCenter
             .VerticalAlignment = xlCenter
             .Interior.Color = 65535
             With .Font
                    .Name = "宋体"
                    .FontStyle = "常规"
                    .Size = 10
             End With
        End With
    End If
End Sub
附件参考