Before.xlsx shows the current state.
After.xlsx shows what I want.
In Before, for User 1, I recorded the macro to make it look like After.
Is there a way to make this more 'generic' so that it runs for the other Users, regardless of how many?
Sub Title_And_Total_Group()
Range("A4").Select
Selection.Copy
Range("C3").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Selection.Font.Bold = True
With Selection.Font
.Name = "Calibri"
.Size = 14
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ThemeColor = xlThemeColorLight1
.TintAndShade = 0
.ThemeFont = xlThemeFontMinor
End With
Range("F8").Select
ActiveCell.FormulaR1C1 = "=SUM(R[-4]C:R[-1]C)"
Range("F8").Select
Selection.Copy
Range("F8:M8").Select
ActiveSheet.Paste
Selection.Font.Bold = True
Selection.End(xlToLeft).Select
Range("A11").Select
End Sub
Open in new window
Before.xlsx
After.xlsx