This site uses cookies.
Some of these cookies are essential to the operation of the site,
while others help to improve your experience by providing insights into how the site is being used.
For more information, please see the ProZ.com privacy policy.
The contents of this post will automatically be included in the ticket generated. Please add any additional comments or explanation (optional)
Laerte da Silva Brazilië Local time: 00:33 Engels naar Portugees + ...
ONDERWERPSTARTER
Another macro
Nov 8, 2012
Also found this macro. Works wonderfully. I had a look at practicount but couldn't see it could count changes. I'll have a second look.
Sub GetTCStats() Dim lInsertsWords As Long Dim lInsertsChar As Long Dim lDeletesWords As Long Dim lDeletesChar As Long Dim sTemp As String Dim oRevision As Revision
lInsertsWords = 0 lInsertsChar = 0 lDeletesWords = 0 lDeletes... See more
Also found this macro. Works wonderfully. I had a look at practicount but couldn't see it could count changes. I'll have a second look.
Sub GetTCStats() Dim lInsertsWords As Long Dim lInsertsChar As Long Dim lDeletesWords As Long Dim lDeletesChar As Long Dim sTemp As String Dim oRevision As Revision
lInsertsWords = 0 lInsertsChar = 0 lDeletesWords = 0 lDeletesChar = 0 For Each oRevision In ActiveDocument.Revisions Select Case oRevision.Type Case wdRevisionInsert lInsertsChar = lInsertsChar + Len(oRevision.Range.Text) lInsertsWords = lInsertsWords + oRevision.Range.Words.Count Case wdRevisionDelete lDeletesChar = lDeletesChar + Len(oRevision.Range.Text) lDeletesWords = lDeletesWords + oRevision.Range.Words.Count End Select Next oRevision
The contents of this post will automatically be included in the ticket generated. Please add any additional comments or explanation (optional)
Laerte da Silva Brazilië Local time: 00:33 Engels naar Portugees + ...
ONDERWERPSTARTER
Error in macro
Nov 8, 2012
Hi Emma
The macro in your site had a mistake.
End Ifd should be End If
I corrected and tested it and worked all right.
The previous macro counts insertions and deletions as well.
All the best,
Laerte J Silva
Subject:
Comment:
The contents of this post will automatically be included in the ticket generated. Please add any additional comments or explanation (optional)
Emma Goldsmith Spanje Local time: 05:33 Lid 2004 Spaans naar Engels
Corrected!
Nov 8, 2012
Laerte da Silva wrote:
Hi Emma
The macro in your site had a mistake.
End Ifd should be End If
Thanks for the heads up, Laerte. I had a problem with file uploading/downloading on Wordpress and somehow an extra "d" slipped in along the way! I've sorted it out now.
I'll test your macro when I get a moment - it looks very useful as it accounts for deletions too.
Emma
Subject:
Comment:
The contents of this post will automatically be included in the ticket generated. Please add any additional comments or explanation (optional)
Laerte da Silva Brazilië Local time: 00:33 Engels naar Portugees + ...
ONDERWERPSTARTER
Word macros
Nov 8, 2012
Thanks a lot too!
Some might find this useful too:
Macro – extract tracked changes to new document
You may wish to get en overview of tracked changes (revisions) in a document. You can print the changes by selecting "List of Markup" in the "Print What" field in the Print dialog box. However, you may want the overview in electronic form. Here you will find a macro that lets you extract the tracked changes to a new document. Note that only insertion... See more
Thanks a lot too!
Some might find this useful too:
Macro – extract tracked changes to new document
You may wish to get en overview of tracked changes (revisions) in a document. You can print the changes by selecting "List of Markup" in the "Print What" field in the Print dialog box. However, you may want the overview in electronic form. Here you will find a macro that lets you extract the tracked changes to a new document. Note that only insertions and deletions will be included whereas other types of changes (formatting changes etc.) will be skipped. Also note that the macro will only include insertions and deletions in the main body of the document (i.e. changes in headers, footers, footnotes and endnotes will not be included). BulletREAD TIP Macro – extract tracked changes to new document
Manage your TMs and Terms ... and boost your translation business
Are you ready for something fresh in the industry? TM-Town is a unique new site for you -- the freelance translator -- to store, manage and share translation memories (TMs) and glossaries...and potentially meet new clients on the basis of your prior work.
Create your account in minutes, and start working! 3-month trial for agencies, and free for freelancers!
The system lets you keep client/vendor database, with contacts and rates, manage projects and assign jobs to vendors, issue invoices, track payments, store and manage project files, generate business reports on turnover profit per client/manager etc.