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 Brazil Local time: 18:38 English to Portuguese + ...
TOPIC STARTER
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 Brazil Local time: 18:38 English to Portuguese + ...
TOPIC STARTER
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 Spain Local time: 23:38 Member (2004) Spanish to English
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 Brazil Local time: 18:38 English to Portuguese + ...
TOPIC STARTER
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
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.
Exclusive discount for ProZ.com users!
Save over 13% when purchasing Wordfast Pro through ProZ.com. Wordfast is the world's #1 provider of platform-independent Translation Memory software. Consistently ranked the most user-friendly and highest value