by Allen Wyatt
(last updated May 27, 2017)
Lorraine often works with transcripts of interviews. Interviewers will ask interviewees to spell out their names. When she types these up, she needs to insert dashes between letters to show they are being spelled, as in J-O-H-N D-O-E. Lorraine wonders if there is a way to select the name and then run a macro to capitalize the name and insert the requisite dashes between letters.
Macros are very well suited for doing this type of text processing. In fact, there are probably a dozen or so ways you could approach the problem in your macro. The following is a rather simple way to do it:
Sub CapDashNames() Dim sTemp As String Dim sName As String Dim J As Integer sTemp = UCase(Selection.Range.Text) ' Make all uppercase If Len(sTemp) > 1 Then sName = "" For J = 1 To Len(sTemp) - 1 ' Add new character to name sName = sName & Mid(sTemp, J, 1) If Mid(sTemp, J, 1) >= "A" And Mid(sTemp, J, 1) <= "Z" Then ' Add a dash if character was a letter sName = sName & "-" Else ' Character added was not a letter If Mid(sName, Len(sName) - 1, 1) = "-" Then ' If there is a dash just before non-letter, ' get rid of it sName = Left(sName, Len(sName) - 2) sName = sName & Mid(sTemp, J, 1) End If End If Next J ' Add final character sName = sName & Right(sTemp, 1) Selection = sName End If End Sub
Basically, the macro steps through whatever you've selected and adds a dash after each alphabetic character. If that dash is then followed by a non-alphabetic character, then the dash is removed. (That way you don't, for example, end up with a dash before or after a space.)
In order to use the macro, simply select the name you want to modify, and then run the macro.
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (1354) applies to Microsoft Word 2007, 2010, 2013, and 2016.
Do More in Less Time! Are you ready to harness the full power of Word 2013 to create professional documents? In this comprehensive guide you'll learn the skills and techniques for efficiently building the documents you need for your professional and your personal life. Check out Word 2013 In Depth today!
You get a document from a colleague and you notice that each paragraph starts with a tab character. Here are a couple of ...Discover More
Add more than one space after the end of a sentence, and you may find that the extra spaces wrap to the start of new ...Discover More
You may want to determine if a document contains a certain set of words or phrases. There are a couple of ways you can ...Discover More
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Got a version of Word that uses the ribbon interface (Word 2007 or later)? This site is for you! If you use an earlier version of Word, visit our WordTips site focusing on the menu interface.