![]() |
|
#1
|
|||
|
|||
|
Hi,
I am writing a report for college. I need to use some graphics like pictures and graphs. I need to name them as Fig. 1, 2, 3, etc. I understand that Word can do this by adding a caption with a label to the picture. Nice! Also I can use styles/caption to modify. Nice! But, as writing goes in can be quite messy in early stages where the structure can get moved a lot, content added/removed. So my problem is as follows. I write and keep adding graphics from various sources. I add caption and references. Word keeps the numbering going automatically. Fig. 1, 2, 3, 4 etc. But when I decide to move a heading or the picture to a different position within the document, word doesn't change the numbering accordingly. As a matter of fact, it doesn't even moved the caption with the picture .Example, I have Fig. 1, Fig. 2, Fig 3. Fig. 3 now gets moved to the start of the document. Now we have Fig. 3, Fig. 2, Fig. 1 instead of the proper descending order. And the caption doesn't move with the picture. How do people deal with this issue? I supposed I could just add pictures and add captions in the final stage, but I would much prefer to do it as I go. Am I doing something wrong? |
|
#2
|
|||
|
|||
Last edited by Charles Kenyon; 12-02-2019 at 07:08 AM. |
|
#3
|
|||
|
|||
|
Quote:
Thank you! I did bit of digging around and found that Words lets you group them if you treat it as floating object. Add, format, or delete captions in Word - Word Last edited by Charles Kenyon; 12-02-2019 at 07:08 AM. |
|
#4
|
||||
|
||||
|
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
#5
|
|||
|
|||
|
Quote:
Works like a dream! Thanks! Last edited by Charles Kenyon; 12-02-2019 at 07:12 AM. |
|
#6
|
|||
|
|||
|
Glad that it helped. I took the opportunity to add a part to my page on Complex Documents on moving figures with captions.
|
|
#7
|
|||
|
|||
|
Rather than insert the shape and caption in a single cell table, I prefer to put them together in a group. The group is itself a floating shape that can be moved around, the sequence numbering changing if necessary – don’t forget to update all fields to get the new seq numbers.
The macro AddCaptionToFloatingShape will add a caption and group the caption with the shape. Code:
Sub AddCaptionToFloatingShape()
Dim aShape As Shape
Dim shpName1 As String
Dim shpName2 As String
If Selection.ShapeRange.Count <> 1 Then MsgBox "Floating shape not selected": Exit Sub
shpName1 = Selection.ShapeRange(1).Name
If Dialogs(wdDialogInsertCaption).Show Then
shpName2 = Selection.ShapeRange(1).Name
Selection.ShapeRange(1).Anchor.Select
Selection.Collapse
Set aShape = ActiveDocument.Shapes.Range(Array(shpName1, shpName2)).Group
End If
End Sub
|
|
| Tags |
| caption, caption; figures; tables |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
Macro to add captions to pictures inside word document
|
Navis | Word VBA | 18 | 12-11-2019 03:39 PM |
Table of tables and of other captions
|
Messoloras | Word | 2 | 08-15-2018 04:57 AM |
Different captions for tables & graphics
|
rebfein | Word | 3 | 07-28-2018 12:47 PM |
creating tables for row of figures and captions
|
gib65 | Word | 2 | 08-12-2011 01:25 PM |
Captions (tables and figures)
|
mcjohn | Word | 1 | 02-11-2010 10:36 PM |