![]() |
#1
|
|||
|
|||
![]()
Hi,
How generate the sequence id for existing number Example : <img id="img001" src=""/> <img id="img001" src=""/> <img id="img001" src=""/> i need for below format : <img id="img002" src=""/> <img id="img003" src=""/> <img id="img004" src=""/> |
#2
|
||||
|
||||
![]()
Hi ssarank,
It's not at all clear what you are starting with and what you want to do with whatever your starting data are. PS: Please don't add new topics to existing threads - I've split your post off to a new thread.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#3
|
|||
|
|||
![]()
[QUOTE=ssarank;56407]Hi,
The default the word document content is this below format: Example : <img id="img001" src=""/> <img id="img001" src=""/> <img id="img001" src=""/> <img id="img001" src=""/> i need replace then 001 number is replace order number : <img id="img001" src=""/> <img id="img002" src=""/> <img id="img003" src=""/> <img id="img004" src=""/> |
#4
|
||||
|
||||
![]()
You could do that with a macro like:
Code:
Sub Demo() Application.ScreenUpdating = False Dim i As Long With ActiveDocument.Range With .Find .ClearFormatting .Replacement.ClearFormatting .Text = "<img id=" & Chr(34) & "img001" & Chr(34) & " src=" & Chr(34) & Chr(34) & "/>" .Replacement.Text = "" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False .Execute End With Do While .Find.Found i = i + 1 .Start = .Start + 12 .End = .Start + 3 .Text = Format(i, "000") .Collapse wdCollapseEnd .Find.Execute Loop End With Application.ScreenUpdating = True MsgBox i & " tags found." End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
![]() |
Thread Tools | |
Display Modes | |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
sbianco | Word | 8 | 09-22-2012 06:54 AM |
![]() |
namedujour | Word | 2 | 08-13-2012 09:02 PM |
![]() |
Ulodesk | Forum Support | 1 | 07-12-2011 07:54 AM |
Generate tree structure, tool? | Troddel | PowerPoint | 0 | 10-13-2010 11:41 PM |
Generate Folder | streng | Excel | 0 | 11-11-2008 11:20 AM |