How to Fix Error 500? - Http 500 Error Fixer
last updated on: 11/10/16 08:45AM
   Tech Support Determining Number of Word in a Section [27/09/16 05:09AM]   
Thank you!

Determining Number of Word in a Section

I need to count, using VBA, the number of words within the current section (i.e., between the forced hard page separators), including both the body of the text and all of the footnotes.
 
Since all of the footnotes are within the current section, technically, in my case, the result would be the same if we count all of the footnote words or just those associated with the section.
These are very long documents so manually selecting the area takes forever and that does not count the footnotes.
How is that done?
TIA

Anwsers to the Problem Determining Number of Word in a Section

Download Error Fixer (Free)

Your post is ambiguous.
You refer to sections but define them per hard page breaks.
Hard page breaks don't start/end a Section - Section breaks do.
The following macro counts the # words on the current page, including words in referenced footnotes & endnotes.
Sub PageWordCount()
Dim oFoot As Footnote, oEnd As Endnote
Dim iPg As Long, iCount1 As Long, iCount2 As Long, iCount3 As Long
iCount1 = 0: iCount2 = 0: iCount3 = 0
With ActiveDocument.Bookmarks("Page").Range
  iPg = .Information(wdActiveEndAdjustedPageNumber)
  iCount1 = .ComputeStatistics(wdStatisticWords)
  For Each oFoot In .Footnotes
    If oFoot.Range.Information(wdActiveEndAdjustedPageNumber) = iPg Then _
    iCount2 = iCount2 + oFoot.Range.ComputeStatistics(wdStatisticWords)
  Next
  For Each oEnd In .Endnotes
    If oEnd.Range.Information(wdActiveEndAdjustedPageNumber) = iPg Then _
    iCount3 = iCount3 + oEnd.Range.ComputeStatistics(wdStatisticWords)
  Next
End With
MsgBox Prompt:="Body: " & vbTab & vbTab & iCount1 & vbCr & _
  "Footnotes: " & vbTab & iCount2 & vbCr & _
  "Endnotes: " & vbTab & vbTab & iCount3 & vbCr & _
  "Total: " & vbTab & vbTab & iCount1 + iCount2 + iCount3, _
  Title:=" Word Count for Page " & iPg
End Sub
The following macro counts the # words in the current Section, including words in footnotes & endnotes.
Sub SectionWordCount()
Dim oFoot As Footnote, oEnd As Endnote
Dim iSct As Long, iCount1 As Long, iCount2 As Long, iCount3 As Long
iCount1 = 0: iCount2 = 0: iCount3 = 0
iSct = Selection.Information(wdActiveEndSectionNumber)
With ActiveDocument.Sections(iSct)
  iCount1 = .Range.ComputeStatistics(wdStatisticWords)
  For Each oFoot In .Range.Footnotes
    iCount2 = iCount2 + oFoot.Range.ComputeStatistics(wdStatisticWords)
  Next
  For Each oEnd In .Range.Endnotes
    iCount3 = iCount3 + oEnd.Range.ComputeStatistics(wdStatisticWords)
  Next
End With
MsgBox Prompt:="Body: " & vbTab & vbTab & iCount1 & vbCr & _
  "Footnotes: " & vbTab & iCount2 & vbCr & _
  "Endnotes: " & vbTab & vbTab & iCount3 & vbCr & _
  "Total: " & vbTab & vbTab & iCount1 + iCount2 + iCount3, _
  Title:=" Word Count for Section " & iSct
End Sub
Note: The footnote and endnote counts pertain to footnotes and endnotes attached to a footnote/endnote reference on the current page/section, even if some/all of their content is on another page/section.
Conversely, footnote
and endnote content on the current page/section is not reported if the footnote/endnote reference is on another page/section.
Neither macro counts content in page headers/footers or textboxes.

Using Windows troubleshooter:

  • Click on Search on Charm bar and type Troubleshooting. Click on the very first option.
  • A new window will open. Click View all from the left pane.
  • Scroll down to the bottom and click on Windows update.
  • Troubleshooter window for Windows update will pop up. Click on NEXT. It may ask you for administrative permission.
  • The troubleshooter will automatically detect problems and fix it.
  • Now, close this window and try download/install the app which was previously showing error.

Another Safe way to Repair the Problem: Determining Number of Word in a Section:

How to Fix Determining Number of Word in a Section with SmartPCFixer?

1. Click the button to download SmartPCFixer . Install it on your computer.  Run it, and it will scan your computer. The junk files will be shown in the list.

2. After the scan is done, you can see the errors and problems which need to be fixed.

3. The Fixing part is finished, the speed of your computer will be much higher than before and the errors have been fixed.


Related: Way to Update & Download SONY SVE14A2X1EH Wireless State Device driver,How to Update & Download SONY SVS1511X9RB Graphics Driver for D2 (Intel) v.9.17 - 9.17.10.2828,Method to Download SONY VGN-CR290N Realtek High Definition Audio Driver v.5.10.0.5433,Download SONY VGN-FS710/W Utilities DLL Update v.6.4.0.06290 driver,Method to Update & Download SONY VGN-NR460E/P Intel Graphics Media Accelerator Driver v.6.14.10.4847,How to Fix Error 0x0000c1f5 Solución?,Error 0x80071a91 Win7 Fix Patch,Error 0x800ccc60 Windows Live Mail [Solved],Error Message 0x800ccc79 Outlook 2000 Fix,What is Error 0xc1ab0001?,[Answered] x64 saplugin dll,How to Fix Problem - Kb943729 Download?,Troubleshooting: Bccode D1 Error,Java Runtime Tech Support,Troubleshooting: ERROR NO SUCH GROUP Error,Solution to ashoutxt.dll Missing Error,Solution to cxcore096.dll Missing Error,Where can I Find dsauth.dll File,How to Fix msde.dll Not Found Error,Best Method to Fix psizewizres.dll Error
Read More: Troubleshoot:Determine is shape object exists in a cell (VBA) Error,Fast Solution to Error: deactivate a hacked hotmail account , that has all my information on it,[Solution] De-activating admin accounts.,How Can You Fix - Default IME has stopped responding?,Fast Solution to Error: DEP closing down IE 8.0,Data validation question. Maintaining and updating named ranges.,Desktop Gadget Gallery on Windows 7,delete empty rows,Deleting a page and also how can I copy an exact page lay out on a new page,Date Formula for 1st Sunday of each Month (3rd to 9th)



   Trackbacks

      TRACKBACK URL: http://error500.blogghy.com/trackback/1032622

   Comments
Lace Front side Wigs for Black colored Women - What Makes Them So Popular?
It can be shocking in which ribbons top hairpieces with regard to dark for women who live turn into a extremely popular type and check out ladies of most walks of life. A big part of this Wigs is due to common developments collection by celebrities to do this Human Hair Wigs celebrity search. A lot of women who are supporters African American Wigs of celebs need to emulate that very same style but at reasonable prices. This specific form of head of hair and elegance is truly encouraged with the stars. Nevertheless, that's not the sole purpose Wigs they've got become so well received. Regarding stars and those that are certainly not celebrities, sporting design for wide lace top the front hairpieces regarding african american ladies is simply matter of ease because they are simple to operate, easy to take off as well as simple Wigs For Women to take care of. These kinds of hairpieces are not because distressing as making use of exts and provides your impression that this hair is in fact expanding Wigs For Women from the remaining hair.
Written by: Stevenphymn | 04/08/17 12:18PM

Dark-colored Hairpieces Can be a Fashion Assertion
A wig is surely an fast remedy for people Wigs For Women being affected by thinning hair difficulties. Additionally it is a powerful way to get yourself seem diverse at the halloween costume social gathering. Hair pieces are easy to acquire and rehearse and they are helpful too. In our occasions, sporting a new wig is not at all an upsetting encounter. Hair pieces possess progressed you might say Human Hair Wigs to be able to match your changing requirements involving people throughout the years. Both man made and also natural splendor wigs are loved by people of varied age ranges. Forms of Dark Hair pieces There are numerous types of hairpieces available in the market, the African American hair pieces staying one amongst these. Hair pieces can be bought in distinct prices Wigs with regards to the item as well as material. Man made Wigs For Women fibers wigs be cheaper compared to natural splendor hairpieces because last option seems to be a lot more practical. Natural splendor hairpieces are easy to sustain thus tend to be more popular. Swarthy complexioned men and women might have to go looking for Dark wigs in tones that may suit his or her Clip In Hair Extensions skin tone. They come in the two dim and also pale hues. Nonetheless, the most famous African American wig will be the Black wig making Black girls look stunning and beautiful. These kind of hairpieces can be purchased in a wide range of styles just like small, long, curly, curly, as well as directly. How big is the actual wig is really important. You have to check out the hairpiece meticulously before buying Wigs to enable you to be sure that no one in addition offers worn it prior to you.
Written by: Morganjal | 04/08/17 12:06PM

Inexpensive Real human hair Hair pieces For Black Women
Low cost human hair hairpieces Clip In Hair Extensions for african american women that search natural are not very easy to locate these days. Lots of women are in reality combating back again together with baldness that's caused on account of final years, cancer Wigs For Women as well as strain. Hair pieces are manufactured simply by diverse organizations throughout the world only handful of search normal as well as genuine. You will find a great deal of things to consider for dark-colored women to get the appropriate along with the Wigs best wig to use. If you are planning to obtain 1 for yourself, you have to figure out first the causes powering Wigs For Women the idea, whether or not is the costume for everyday make use of or perhaps a couple of seconds with regard to Wigs manner. There are many head of hair wig kinds that are offered in your case via online stores. One of the best Wigs hairpiece sorts in your case is certainly one that is created from natural splendor.
Written by: CharlesRirty | 04/08/17 10:17AM

Netting Coming Wigs Or All the way Thrash Wigs
If you're not used to hair pieces and even acquire one, after that whatever you decide to Wigs consider is that you simply only have to choose the color and style you like. But actually the actual searching of hairpieces is a bit more difficult than you've got Wigs For Women thought. To be able to buy the correct point for yourself, the first selection you simply must help to make would be to pick involving 2 kinds of hairpieces: the particular artificial Wigs For Women ones along with the real hair ones. Both of them are available in numerous styles and colors and possess his or her positives and negatives. An artificial hairpiece is cheap, nevertheless it is likely to appear fake which is more challenging to keep. Even though a person locks hairpiece is much more sensible Wigs hunting which lasts lengthier, but it's more expensive. An additional thing you have to consider when choosing wigs is which kind of cap is employed for that wigs. The particular Wigs cover is what you may draw over your head, a top quality limit could make you feel safe. Though there are lots of kinds of wig lids around to pick from, the ribbons limit is among the most common 1. The actual lace Wigs For Women cap can make you feel completely comfy since it allows your head to be able to "breathe".
Written by: Albertlip | 04/08/17 09:52AM


   Post a comment
Name:


Email:


2 + 5 = ?

Please write above the sum of these two integers

Title:


Comments:





About the author

Contact the author
Categories

Latest blog posts
Error Server not found when loading Facebook Tech Support
[11/10/16 08:45AM]
Tech Support Determining Number of Word in a Section
[27/09/16 05:09AM]
Troubleshooting Cannot save Office files to a network share
[14/09/16 04:42AM]
Internet explorer has encountered a problem error
[13/07/16 05:35AM]
Troubleshoot ntoskrnl exe 75c00 Error
[04/07/16 11:05AM]
Top views posts
Internet explorer has encountered a problem error
[13/07/16 05:35AM] Daily Views 11
Troubleshooting Cannot save Office files to a network share
[14/09/16 04:42AM] Daily Views 11
Troubleshoot ntoskrnl exe 75c00 Error
[04/07/16 11:05AM] Daily Views 5
Hi can t open any hotmail attachments Anwsered
[30/03/16 11:27AM] Daily Views 3
ntoskrnl exe bsod error
[04/07/16 11:04AM] Daily Views 3
Photo Albums








Powered by Blogghy

Page generated in 0.3463 seconds.