Hi, I am creating a tracker. I have already loaded the data into it and there are organizations and affiliates that come under those organizations so I have created groups that users can expand and collapse to view affiliates of the organization. I am using Excel 2007. The issue that I have is with the prospect of others adding on to the tracker whereby they would have to complete the same formatting rules that I have put in and that could be tedious.
The macro I have been trying has been ineffective for entering new data as well as automatically grouping it since I am not able to figure out how to apply the macro to the new data entered rather than the existing set. Is there a way I can create a system where the new data entered will automatically format to the way I already have it?
I am entering the macro from what I have recorded to give you an idea. I was planning to put a button that users could click and format their cells into the preset format to make it easy to use.
Macro Code
Thanks in advance for your help and let me know if you need any additional infoSub TrackerTest()
'
' TrackerTest Macro
'
' Keyboard Shortcut: Ctrl+u
'
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 5296274
.TintAndShade = 0
.PatternTintAndShade = 0
End With
With Selection.Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
End With
Selection.Font.Bold = True
Range("A2").Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 192
.TintAndShade = 0
.PatternTintAndShade = 0
End With
With Selection.Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
End With
Selection.Font.Bold = True
Range("A1").Select
Selection.Rows.Group
End Sub![]()
Bookmarks