macro which works in excel 2000 does not work in excel 2002
Hi, I have this code in the Worksheet/SheetCalculate event of my excel sheet which was created in excel 2000. It works very well. However when the same worksheet in opened in excel 2002 and a cell value changed . It does not execute the function as the unprotect worksheet code does not work in excel 2002. Can anyone help me with this. This is my code which works well in excel 2000. ActiveSheet.Unprotect On Error GoTo ERRMSG ActiveSheet.Shapes("SudhirP").Select Selection.Cut Range("d22:d36").Select With Selection ..HorizontalAlignment = xlLeft ..VerticalAlignment = xlTop ..WrapText = True ..Orientation = 0 ..AddIndent = False ..IndentLevel = 0 ..ShrinkToFit = False ..MergeCells = False End With Range("d37").Select ERRMSG: Range("d22:d36").Select With Selection ..HorizontalAlignment = xlLeft ..VerticalAlignment = xlTop ..WrapText = True ..Orientation = 0 ..AddIndent = False ..IndentLevel = 0 ..ShrinkToFit = False ..MergeCells = False End With ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:=True Range("a1").Select thanks Neeta -- nnayak ------------------------------------------------------------------------ nnayak's Profile: http://www.excelforum.com/member.php...o&userid=35493 View this thread: http://www.excelforum.com/showthread...hreadid=552655 |
All times are GMT +1. The time now is 11:50 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com