Use VBA to resize a note entry

trevorc · #1 12-19-2021, 04:02 PM

Hi All,
I'm trying to resize a note field using VBA, i recorded a macro to do what i wanted but if fails after adding the note.

The code below is what the recorded macro is for adding and resizing a basic note.
Any idea's ???

Code:

Sub Macro18()
    Range("W12").AddComment
    Range("W12").Comment.Visible = False
    Range("W12").Comment.Text Text:="Me:" & Chr(10) & ""
    Selection.ShapeRange.ScaleWidth 1.95, msoFalse, msoScaleFromTopLeft
    Selection.ShapeRange.ScaleHeight 2.12, msoFalse, msoScaleFromTopLeft
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
One Note Online not transferring to One Note App	Jaden	OneNote	0	06-14-2018 02:39 PM
End note Text Style and End note Reference Style	Kohawk65	Word	4	01-08-2016 08:29 AM
Help with VBA to resize images	Yuffster	Word VBA	2	01-30-2015 06:05 AM
Slide Minature Resize?	excelledsoftware	PowerPoint	2	02-01-2013 03:49 PM
Resize and align	AndyDDUK	PowerPoint	9	11-09-2012 05:23 AM