关于EXCEL的保护问题(50分)

EXCEL中，我想使C5：G20这一部分的数据其他人能看到，但不能修改；其他部分的数据可以任意修改，请问怎样可以作到？

宏的操作视这样
activesheet.Cells.Select
activesheet.Selection.Locked = False
activesheet.Range("C5:G20").Select
activesheet.Selection.Locked = True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:=False
转换为ole调用的方式就好了吧

excelworksheet3.Range['A1','A1'].Locked:=true;