![]() |
|
#2
|
|||
|
|||
|
With a lot of trial and many errors i found this works.
Code:
Intersect(ActiveCell.EntireRow, tblColumns("Notes").Range).Comment.Shape.Width = 600
Intersect(ActiveCell.EntireRow, tblColumns("Notes").Range).Comment.Shape.Height = 800
|
|
|
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 |