Code Snippets

ActiveWorkbook.Colors(42) = RGB(50, 100, 150) 
ActiveWorkbook.ResetColors 
ActiveWorkbook.Colors = Workbooks("Book2.xls").Colors 

Application.CellDragAndDrop = True 
Application.AlertBeforeOverwriting = True 
Application.ExtendList = True 
Application.AutoPercentEntry = True 
Application.FixedDecimal = True 
Application.FixedDecimalPlaces = 2 
Application.CopyObjectsWithCells = True 
Application.AskToUpdateLinks = True 
Application.EnableAnimations = True 

Application.MapPaperSize = False 

Application.DefaultSheetDirection = xlLTR | xlRTL 
ActiveSheet.DisplayRightToLeft = True 
Application.CursorMovement = xlLogicalCursor | xlVisualCursor 
Application.ControlCharacters = True 

Application.TransitionMenuKey = "\" 
Application.TransitionMenuKeyAction = xlExcelMenus | xlLotusHelp 
Application.TransitionNavigKeys = True 

ActiveSheet.TransitionExpEval = True 
ActiveSheet.TransitionFormEntry = True