WATERMARK WITHIN EXCEL

  • Thread starter Thread starter Nancy Ritchie
  • Start date Start date
N

Nancy Ritchie

I am attempting to add a watermark to an excel spreadsheet
and am unable to send the watermark behind the text. Have
tried Order, setting image to Watermark etc. but it is not
working. Can anyone help?

Thanks,
Nancy
 
Here is a macro I recorded to add a watermark to one of my sheets. It
doesn't print on every page as a true watermark would, but then my report is
only one page. Look at it, modify it, use it if you can or just trash it.

Carlos

Sub GreyWatermark()
'
' GreyWatermark Macro
' Macro recorded
' Keyboard Shortcut: Ctrl+Shift+G
'
ActiveSheet.Shapes.AddTextEffect(msoTextEffect1, "Partial", "Arial
Black", _
72#, msoFalse, msoFalse, 237.75, 154.5).Select
Selection.ShapeRange.Fill.Visible = msoTrue
Selection.ShapeRange.Fill.Solid
Selection.ShapeRange.Fill.ForeColor.SchemeColor = 22
Selection.ShapeRange.Fill.Transparency = 0.5
Selection.ShapeRange.Line.Weight = 0.75
Selection.ShapeRange.Line.DashStyle = msoLineSolid
Selection.ShapeRange.Line.Style = msoLineSingle
Selection.ShapeRange.Line.Transparency = 0#
Selection.ShapeRange.Line.Visible = msoFalse
Selection.ShapeRange.LockAspectRatio = msoTrue
Selection.ShapeRange.Height = 102#
Selection.ShapeRange.Width = 260.25
Selection.ShapeRange.Rotation = 0#
Selection.ShapeRange.IncrementRotation -26.1
Selection.ShapeRange.ScaleWidth 1.29, msoFalse, msoScaleFromBottomRight
Selection.ShapeRange.ScaleHeight 1.33, msoFalse, msoScaleFromTopLeft
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top