Excel Redaction / Cell Formatting Macro for Mouse Selected Area
The VBA code used in this macro is:
Sub redactrange()
Dim Specifiedrange As Range
Set Specifiedrange = Application.InputBox("Specifiy the range to be named: 'Table'", Type:=8)
MsgBox "This is the range you selected " & Specifiedrange.Address
Specifiedrange.MergeCells = True
Specifiedrange.Font.Color = vbWhite
Specifiedrange.Interior.ColorIndex = 1
Specifiedrange.Value = "Redacted"
Specifiedrange.VerticalAlignment = xlCenter
End Sub
For more information see: http://www.litigationsupporttipofthen...