There is a word macro that can change that

• space changes - noname
  • We started the new spacing about 2 months ago. At first I said "oh no". sm - carolyn
  • quick change tip - Aeb
    • Thank you!!!! - noname
    • Oops... forgot to say this is for DQS. (nm) - Aeb
  • yes, I got it last night...sm - MQgrrr
  • There is a word macro that can change that - quick fix
  • When did you get the memo? - nm
    • Just now - noname

The messages you are viewing are archived/old.
To view latest messages and participate in discussions, select the boards given in left menu

Hi

  I recently lost all my stuff because hard drive crashed.  Someone years ago had given me instructions on how to make a simple macro that changed the colors for typing. I do a bowling program that I need to switch from green to black, from red to black and from green to red.  I had something that I could just hit ALT & R for red, ALT & B for black and ALT & G for green, so no hving to use mouse for it.

I cant find my instructions for this and can not remember how she had me do this.

Anyone have a suggestion?

thanx

Dak

I sure hope someone can help me here.  I have recently started using Word 2007 and am absolutely lost!  I finally figured out how to create a macro....but now cannot figure how how to call up that macro when I need it.  does this make sense???  example, ddd stands for degenerative disc disease..when I type "ddd"  do I hit a function key, just the tab key, CTL + function key?????  can't figure this out.  please help me!

thanks.  Rita

All of sudden all my macros give me the "Code Execution has been Interrupted."  Then I have to click Continue, End, Debug, or Help.

Why is this happening?  I've tried deleting the macros and re-recording them, but it keeps doing it.  HELP!  It's making me crazy.

For some reason, I am unable to use the F11 key to jump to headers within a report when I use my macroed reports in EXtext.  So, I wanted to know how I could macro to jump from header to header in the word document and use a hot key.  If I could make a macro using word, I think I could still use my macro reports. 

Thanks

Hi,

The solutions others gave are good, but if I just needed to get the number of lines with typing (and don't need an invoice or a report), I'd use a Word macro.

The other solutions offered have this drawback: If the body of your document contains tables, the count Word gives you is vastly inflated, for Word counts each cell in that table as a line. This is not what the eye sees, and becomes problematic when you try to justify such to your client.

Below is a macro for counting what we at Emmaus call Lines Strict. (i.e. Lines with typing on them, vs Lines Extended that includes the blank lines).

To use it, copy from Public Sub through End Sub, and paste it into your macros along with your other macros. Easiest way of doing this is (after you have copied the appropriate lines):

1. Click Tools | Macros, and select an existing macro.

2. Click the Edit button.

3. Once the Visual Basic Editor opens, press Ctrl+End to move to the bottom.

4. Paste the clipboard contents.

5. Click File | Compile Normal. (If you've pasted things that don't belong, it won't compile.)

6. Click File | Close and Return to MS Word.

Merry Christmas!
vJoe
http://www.mpword.com

OOPS! I looked at the HTML code after I pasted the code into the editor on this board, and it added things that when pasted into the Visual Basic Editor in Word will not compile. Here's the code if you want to retype it, but pasting won't work. If you send me an email, I'll attach the code into a .txt document, and you won't have any problems.  vjoet@attglobal.net

Public Sub GetLinesStrictCount()
    Dim CharsStrict As Long
    Dim Count As Long
    Dim ParaswBlanks As Long
    Dim ParasWOBlanks As Long
    Dim LineswBlanks As Long
    Dim BlankLines As Long
    Dim LinesWOBlanks As Long
    Dim NumOfTables As Long
    Dim NumOfRows As Long
    Dim TableRowCount As Long
    Dim x As Integer
   
    TableRowCount = 0
    NumOfTables = 0
    NumOfRows = 0
   
    ActiveDocument.ComputeStatistics (wdStatisticCharacters)
    ActiveDocument.ComputeStatistics (wdStatisticLines)
    CharsStrict = ActiveDocument.BuiltInDocumentProperties(wdPropertyCharacters)
    ParasWOBlanks = ActiveDocument.BuiltInDocumentProperties(wdPropertyParas)
    LineswBlanks = ActiveDocument.BuiltInDocumentProperties(wdPropertyLines)

    NumOfTables = ActiveDocument.Content.Tables.Count
    If NumOfTables > 0 Then
        For x = 1 To NumOfTables
            With ActiveDocument.Content.Tables.Item(x)
                NumOfRows = NumOfRows + .Rows.Count
            End With
        Next
        TableRowCount = NumOfRows
    End If
   
    If CharsStrict > 0 Then
        ParaswBlanks = ActiveDocument.Range(wdMainTextStory).Paragraphs.Count
    Else
        ParaswBlanks = 1
    End If
       
    If LineswBlanks > 1 Then
        LineswBlanks = LineswBlanks + 1
    End If
   
    If ParaswBlanks = 1 And ParasWOBlanks = 1 Then
        BlankLines = 0
    Else
        BlankLines = ParaswBlanks - ParasWOBlanks
    End If
   
    LinesWOBlanks = LineswBlanks - BlankLines
    Count = LinesWOBlanks
   
    MsgBox "Lines Strict (with typing) = " & CStr(Count + TableRowCount)
End Sub

for line numbering?  It keeps indenting 1-2-3,etc. to the first tab and I need the numbers along the left margin.  I went to <format>, <bullets and numbering>, <customize>, and changed the number position and alignment, and it lines everything up on the left margin. 

However, if I have another numbered section in the report, it goes back to the default setting, indenting to the first tab. 

Is there a way to change the default, or do I have to go through these steps for each numbered list? 

Thanks!

nm

In your place, I would seriously consider changing providers if there were others available in your area, but I'd ask around about their service quality first.  It may not be any better.  If there are no other providers, then consider changing your service package to a business account rather than residential.  They're usually more expensive, but they also tend to get faster service if there's a problem.

Last summer, I had no electricity for 3 days due to severe storms, but there were some 600,000 in the same boat with me.  We just had to wait it out.  It's a downside of working at home.

1.         Open a blank document.

2.         Type 3-4 question marks down in a single line.

3.         Put your cursor back up at the top before the first ? mark.

4.         Open tools Macros – Record new macro.

5.         Click keyboard – type in the combination of keys you want to use to jump (make sure that combination is not assigned to anything else).  I used Shift+Control+Alt J.  Then close that box out.

6.         With your mouse click Edit - Find – type a ? in the find box, click Find Next.  It will take your cursor to the first question mark (make sure it’s highlighted).  Then hit cancel to close out the find box, and click STOP on the macro button.

can someone please tell me how to make a macro in word for go to *?

Can anyone give me instructions on how to create a period macro in word 2003.  I want to make a macro that inserts a period when I need it.  I use ASR, so I need this function to make corrections easier.

Thanks so much!!!!!

In a Word document, type a few words, like a diagnosis on a line.  Leave your cursor at the end of the line.

Click TOOLS, MACRO, RECORD NEW

A window called Record Macro pops up.  I suggest you put a name in the "Macro Name" field.  (Hint:  No spaces allowed in the name.)

Click KEYBOARD to assign it to the keyboard.

A window called "Customize Keyboard" pops up.  In the field "press new shortcut key", press what you want as the shortcut.  (Hint:  I use ALT+N so I can remember it for numbering.)  That key combination you type should populate that field.

Click ASSIGN, CLOSE

You will be back at your document (your cursor still at the end of the line of text you typed) and there will be a small window called "Stop" that has a solid square (the STOP RECORDING button) and another symbol (PAUSE RECORDING button).  At this point, every single thing you do is being recorded!

Press the HOME key (to put cursor at the beginning of the line).

Press the 1. keys and space twice (or however many times you space between your number/period for your account).

Press the END key (to return cursor to end of the line of text).

Press the RETURN key.

Press the 2. keys and space twice (or, again, however many spaces you put between your number/period for your account).

Click the STOP RECORDING button in the little window.

Your macro is complete.  I suggest you try it out.  Skip down a few lines and type a line of text.  At the end of that text, hit your macro shortcut.  It should run (you won't see it do anything but make the changes you recorded) and automatically go to the beginning of the line, number it as 1 with a period and spaces, and return at the end of your text and start the number 2, period, spaces and be ready for more text!!  Email me if you have problems. 

NOTE:  This will only work if the text you type is only 1 line long.  If it word-wraps to a second line, this will not work...you will just have to manually return to the beginning of the line and number. 

More ideas for building macros, at least the ones I use most: 

-- macro to increase the zoom to a certain percentage (I use 110%)

-- macro to scroll down 1 frame or page

-- macro to copy the preoperative diagnosis heading, the 1-line text below it, return a line blank and type postoperative diagnosis heading and paste (for when the dictation is for "postoperative diagnosis same").  I use ALT+; for postoperative diagnosis and ALT+' for postop diagnosis

-- macro to copy the physician names/credentials in the signature block and search for the header for SURGEON and fill it in, putting it in all capitals, etc.

Just a handful of ideas I use.  Hope these help.

I feel like MTs are being nickel and dimed to death with this.

How do you make that type of macro?  Do you type "." space, space?  I'm not sure my Expander recognizes spaces after an entry.  ?

for that.  Following the macro he gives instructions on how to modify the macro for one space.  When you modify the macro you will have to change the name also, so you could change it to read:

Sub OneSpace()

on the first line.

If you don't know how to add a macro, click Tools, Macros, Macro, then in the Macro Name: box put TwoSpaces, then click create.   Paste the macro provided in place of the "Sub TwoSpaces()" and "End Sub" that are there.  Go the end of the End Sub line and hit enter.  Paste the second macro there and click save again.

I assigned my macro to ALT-B, but you can assign any keys you want so long as they are not already in use for another function.

To create a new macro you click:

Tools -> Macros -> Record a new Macro

A window will open up that says:

Macro Name:  In the box type in the name you wish to give your macro. (I simply typed in AltB).

In the middle of the window you will see "Assign Macro to" with two buttons that say "Toolbar"  and "Keyboard".  Click the Keyboard button.

This opens a new window and your cursor will be in the field that says "Press new short cut key".  You will hit the series of keys you want to assign your macro to (in my case it was Alt+B).

Below you should see "Currently assigned to [unassigned}"  If it says it is assigned, you will need to pick other keys to assign your macro to.

Finally, click assign.

Now you are in your document and there will be a little box that has a stop button and pause button.  Every keystroke you make from this point on is recorded and will be assigned to your macro.

Now you want hit Ctrl+F which will bring up the find window and type in a character that you want your cursor to jump to.  I use the asterix (*).  Then click the stop button on the little box.

Then test our your macro.  I have report templates I use that look like this:

CHIEF COMPLAINT:  *

HISTORY OF PRESENT ILLNESS:  *

And every time I hit Alt+B, I jump to the next asterix.

I hope this helps.  It sounds kind of confusing when you are trying to explain how to do it, but once you do it it is really pretty simple.