private sub workbook_sheetselectionchange(byval sh as object,byval target as range)
tempstr=activecell.value
end sub
private sub workbook_sheetchange(byval sh as object,byval target as range)
application.enableevents=false
target.value=tempstr
application.enableevents=true
输入这些代码是为了保护工作薄不被人修改数据,现在输入完这些代码后,再去修改数据都为空值了呢。请高手帮忙修改一下是哪里的问题,谢谢!