PDA

View Full Version : personal.xlsb



aoc
06-16-2011, 10:50 PM
Dear All,

I put below code to "vba project ( default workbook ) this workbook" section it works but when I put it to "vba project ( personal.xlsb ) this workbook" it does not work. My aim is to use it when I open any excel workbook

version 2007


Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)

Static OldRange As Range
On Error Resume Next
Target.Interior.ColorIndex = 3
OldRange.Interior.ColorIndex = xlColorIndexNone

Set OldRange = Target
End Sub