希望实现单元格内在有内容的时,我再输入任何数据,表格会提示我是否覆盖当前数据。或相似的其他方法。
请ææ
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)Dim x, y As Integerx = Target.Rowy = Target.ColumnIf Cells(x, y) "" ThenMsgBox "æ¯å¦ä¿®æ¹æ°æ®"End IfEnd Sub