Use a custom function in Word to count specific characters

gmaxey · #6 07-20-2023, 02:33 PM

I don't want anything. You are the one who came here looking for help. You mention that you have experience with Excel and Access. A function in Word is nothing like a function that you might enter into an Excel field.

Typically with a Word VBA "function," you will pass arguments to it and it returns a value:

Code:

Sub Demo()
  MsgBox Add(2.5, 1.5), vbOKOnly, "SUM"
End Sub


Function Add(a, b) As Single
  Add = a + b
End Function

Your function will return the value (and place it at the end of a document, a table cell, a content control or whatever target you define) each time you run it. Word has no built-in change event that automatically detects a user adding text (or specific characters in your case) or calls a procedure e.g., your function.

Now, if you put a content control adjacent to each of your objectives and use it to enter your "**" marks then you could use the Document _ContentControlOnExit event to call your function.

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
'Call your function here.
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Select a specific number of characters in word using VBA	mrwoggie	Word VBA	1	01-18-2022 03:08 PM
Looking for a macro for word count in one specific column of table, only rows with white background	mobj	Word VBA	2	10-17-2019 03:09 AM
Deleting Characters in a specific location in Word 2010	ppayaw	Word VBA	8	12-13-2016 08:11 AM
Custom ribbon button or shortcut for a specific function	Nicobisgaard	Word	6	04-22-2015 04:39 AM
Count characters on the fly	NobodysPerfect	Word VBA	1	04-20-2014 03:39 PM