Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
inlineshape
Hello List
Is there anyway, when I insert a picture with InlineShapes.Add to make the image as big as it can be without exceeding the height or width of its current container? It container is currently a merged table cell from b3 to f4. By that I mean row 2 column 3 to row 6 column 4. Thankyou very much kind regards nathan |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
inlineshape
Hi Nathan,
Is there anyway, when I insert a picture with InlineShapes.Add to make the image as big as it can be without exceeding the height or width of its current container? It container is currently a merged table cell from b3 to f4. By that I mean row 2 column 3 to row 6 column 4. The macro needs to help things along :-) You should be able to pick up the dimensions of the current cell and use that information to set the size. Roughly (untested): Dim sngWidth as Single Set ils = Selection.Range.Inlineshapes.AddPicture("filename" ) ils.ScaleWidth = 100 + (ils.Width/sngWidth) Cindy Meister INTER-Solutions, Switzerland http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004) http://www.word.mvps.org This reply is posted in the Newsgroup; please post any follow question or reply in the newsgroup and not by e-mail :-) |