Home     Contact Us    
Main Board Job Seeker's Board Job Wanted Board Resume Bank Company Board Word Help Medquist New MTs Classifieds Offshore Concerns VR/Speech Recognition Tech Help Coding/Medical Billing
Gab Board Politics Comedy Stop Health Issues
ADVERTISEMENT




Serving Over 20,000 US Medical Transcriptionists

That list in the macro box is just awesome. Thanks SO much!!! sm

Posted By: Karen on 2006-01-15
In Reply to: Keyboard shortcut for spellcheck is F7 for full doc, Alt + F7 for individual words. - sm

I noticed that the control/alt/L inserts the bulleted list.  Any idea how I can easily insert the numbered list?


Thanks so much for your help.




Complete Discussion Below: marks the location of current message within thread

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


Other related messages found in our database

macro to import expansion list into MSWord Autocorrect

Here is my macro that will import your expansions into MSWord.  Your list needs to be in the following format for this macro to work:


tp=the patient


copd=COPD


chf=CHF



There needs to be a hard return at the end of each entry.  If you have any expansions that contain an equal sign or a hard return, you will need to enter those into your autocorrect manually.  Here is the macro:


Sub Add2AutoCorrectList()
Dim AddName, AddValue As String
Dim W, C, A, L, Y, T, N As Long
Dim CountWords As Boolean
Selection.WholeStory: Selection.Collapse
N = ActiveDocument.Words.Count: C = 0: A = 0: T = 0
ScreenUpdating = False
While N > 0
x = Selection.MoveEndUntil(cset:=("=), Count:=wdForward)
    If x = 0 Then
        End
    End If
Selection.MoveEndUntil cset:=("=), Count:=wdForward
AddName = Trim(Selection.Text)
L = Selection.Words.Count
With Selection
    .Delete: .Delete
    .MoveEndUntil cset:=Chr$(13), Count:=wdForward
End With
AddValue = Trim(Selection.Text)
Y = Selection.Words.Count
AutoCorrect.Entries.Add (AddName), Value:=(AddValue)
Selection.Delete , Count:=2
T = L + 2
N = N - T
C = C + 1
A = A + 1
If N < 1000 Then
ScreenUpdating = True
N = ActiveDocument.Words.Count
End If


If A = 100 Then
Application.ScreenRefresh
'ScreenUpdating = True
StatusBar = N & " " & C & " " & " entries processed!"
A = 0
End If
Wend


  
End Sub


One word of warning:  When I posted a line counting macro here some time ago, I could not get a quote mark in the code to post, so the macro as posted would not work, and I had to followup with a post explaining how to correct that.  This macro is a bit more complicated than the other one was, and although I will look at the code as soon as this posts, if it doesn't come through perfectly, and you don't understand my corrections, you can e-mail and I will send it to you.


Also, I wrote a companion macro that will list your autocorrect into a document so that you can import it into another computer or just keep it as a backup in case you lose your normal.dot.


 


I need step-by-step instructions to make a macro in word that aligns automatic numbered list to the
HELP!!!!! Thanks in advance.
You can use Shorthand to make a Macro, then bring the macro up in WP. nm
nm
take essential oil and mix with salt and do a hand scrub. feels awesome, smells awesome, and very r
;
Re companion macro. Do you know there is already a macro
in Word that will create a document with all entries from both the normal.dot and the .acl file? The normal.dot only stores the formatted entries.
medical abbreviation list and medical drug list
Hi,

Anyone there who could help me out finding the latest abbreviations list.
I even want the latest drug list because my current program does not have many drugs.

So if anyone could suggest anything which is available online for informationd quick look purposes.

any help for medical abbreviation list and medical drug list would be very helpful.

Me too - with a macro. nm
x
Macro

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.


 

Now try the combination.
You don't need a macro for this.
Just insert fields in your template with Ctrl+F9 and when you create new docs, hit F11 to jump to the fields and start typing.
Macro
Go to this page which will display the macro that you need. You will have to edit one of the lines in order to create one space, instead of two.

http://wordtips.vitalnews.com/Pages/T1497_An_Automatic_Two_Spaces_After_a_Period.html:



Don't know if this will help you with your macro, but
see the link below.
macro help
Help!!! I made a macro in Microsoft Word for formatting and font.  When I use the macro, the words on the last line of each paragraph are spaced too far apart. Any advice greatly appreciated. 
Macro Help
Anyone know an easy way to set up macros in MS Word 2007?  I have tried and tried and cannot figure it out.  Thanks in advance!  sb
macro help

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


You don't need a macro for this.
Use blank fields instead and all you have to do is hit F11 to jump to each field. Ctrl + F9 inserts a blank field. Search here for fields and you will see examples.
macro help
Thanks that works!
macro okay
it should work

Macro
Need help i  using macros. I need to use find and replace words. For some reason the word is being highlighted when I run the macro, but not being replaced by the assigned word. Please advice on the use of macros.
macro
I recorded Macro using record button, wihtout any code.Find and replace is working alright now, but would like to know whether I can enter multiple words to replace. I have a long list of words to be entered, and right now I am unable to do that all in one Macro. Please help.
Macro help

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!!!!!


NSS: Here's the macro instructions

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.


you have to create it as a macro (sm)
hit F3 for help and then M or C to create Macros...
when you follow these instructions, it will create an ALT(whatever). Then, in your docutment, you would do ALT-K or ALT-J, or ALT(whatever you name it)
just did it.. it's CTL-10 and then define macro (nm)
x
How do you make that macro?

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.  ?


Here is a link to a macro (sm)

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.


You have to create a macro. SM for how I did it.

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.


MACRO FOR JUMP

Could you email it to me too?  I have not had 100% success with this in Word, having typed in WordPerfect for years and years.  I appreciate any help you may provide in this regard. 


keystroke to macro
Hi, I tried to look at my old "jump" macro, but in XP I cannot do this.  Assuming you are using an Expander (I used PRD back then) you create the name of the macro (mine was ALT-J) by inserting a "find" (so it will find @ or ? or whatever you call your place for the insert) and there the key is to create a destructive backspace so that your work will be without extra space/spaces.  This destructive backspace will remove your @ or ? or whatever you use on your template and allow you to insert your data.  If I could pull mine up (and wish I could do this more easily) I would just paste it here for you.  Good luck!  If I manage to get mine out of its "resting place" I will post it to you. 
Here is a macro from Productivity.com
/
Macro had a life of its own...
My funny is a little different -- my macro for "erectile dysfunction" was of course ed but little did I know that every time I typed a word that ended in "ed" (which are a lot of words!) "erectile dysfunction" would pop up instead. Like in my private emails and stuff. It was difficult to explain to non-MTs...
I have never made a macro yet nor do I know how
and I've been doing MT for over 13 years now.  I have used PRD, Instant Text and auto correct and auto text in Word - I could not make a macro if my job depended on it!
Macro help...error?!

I have set up several macros with my docs thank yous, closing and signatures.  They seemed to work fine whenever I set them up and then tried them out but now everytime I try and use one, it plugs in something that I earlier cut and pasted.  For instance, the thank you and closing are there but instead of the docs sig it is something wierd that I cut and pasted earlier.  I go into my macros and it looks right.  Anyone have any suggestions on how to fix this??  As always, thanks!  I don't know what I'd do without this website!!


Try using an autoclose macro

Since I don't know what platform you are using, this may not work for you --  if the normal dot is open somewhere else.  I do have another solution if this does not work; if you like, you can write me and I will send you the suite of macros and instructions that I use that will work around this problem that occurs with some transcription platforms.


I don't know anything about this acl file that is supposed to be saved but maybe the person who has written me about this will put up a post that will provide some information on what needs to be done to do this.


This macro needs to be posted into your macro editor.  Since I have had problems in the past with macro code not posting to this forum correctly, I will take a quick look at it and make sure it's okay, and post a follow-up note that it is okay to use.


Sub AutoClose()
on error resume next
If NormalTemplate.Saved = False Then NormalTemplate.Save
End sub


the autoclose macro is okay
hope it works for you

macro - fixed
between windows & mac, something got squashed in the file name reference. Let's see if it pastes cleanly now.

Make sure you create a text file c:
eplacetext.txt and put the entries in the format specified

findthis|replacewiththis
teh|the
mjsmithx|Michael J. Smith, MD,
HIPPA|HIPAA
etc....

Note - if you want to change the file name or location, change the corresponding OPEN statement in the macro below. Also, if you want to change the delimiter character from the hardcoded (single pipe) value to something else, change the delimchar line below and the text file accordingly.

You can insert this into a module in your normal document template -- or in a specific document or template if you don't want it in Normal -- post here if you need more details

This will run through every entry in the text file and make the corresponding replacement in the target document.


Sub replacemulti()

Dim TextRaw, FindText, ReplaceText As String

Dim delim As Integer

Dim delimchar As String


delimchar = "|"                 'Must be a single character for this version.

Open "c:
eplacetext.txt" For Input As #1    ' Open the find/replace source file.

Do While Not EOF(1)             'Loop until end of file   
Line Input #1, TextRaw      'Read file, one line at a time
   
delim = InStr(1, TextRaw, delimchar, 0) 'Get the position of the delimiter

 FindText = Left(TextRaw, delim - 1) 'FindText = text to left of delimiter
ReplaceText = Mid(TextRaw, delim + 1, Len(TextRaw))  'ReplaceText = text to right of delimiter
'Do the replacement

Selection.Find.ClearFormatting

    Selection.Find.Replacement.ClearFormatting

    With Selection.Find 
.Text = FindText
.Replacement.Text = ReplaceText

.Forward = True
       
.Wrap = wdFindContinue

        .Format = False

        .MatchCase = True

        .MatchWholeWord = True

        .MatchWildcards = False

        .MatchSoundsLike = False

        .MatchAllWordForms = False

    End With

    Selection.Find.Execute Replace:=wdReplaceAll
Loop

Close #1    ' Close file.

End Sub

Macro expander
Have any of you used that new Windows Expanderex product advertised on this site? What kind of file does it use?  Is it compatible with Shorthand? Sure wish they would make one available that isn't so expensive. Would like one for home use but don't want to spend over $100.
If possible, make a macro...
to add 2 spaces after each period.  At the end of the report, run the macro and it will make the changes for you.
If you don't know how to create a macro
an unhelpful post to someone asking for help? Especially since someone else had already given her good instructions for what she wanted to do and another poster had pointed her in the direction of a board devoted to increasing productivity.
To NSS: Instructs for the macro you asked about are
posted below under the thread about Hints and Tips.  I listed some other ideas on how macros can work for you.  Hope these help.
To SnowBunny--thank you for the macro link.
xx
Co. I work for only gives you three spaces for a macro!
dd
Need Macro program for Works!

I am about to start a job as an IC for the first time.  I thought the company provided a macro program, but now it seems they don't.  I can't be productive without one, but I have never had to purchase one on my own, having used company-supplied programs for the previous 12 years.  Does anyone know a program that will work in Microsoft Works that has macros that will expand with the spacebar?  I need something easy to understand and as inexpensive as possible but that will hold maybe 2,000-3,000 shortcuts!   Thanks!


Re: Need Macro program for Works!
Thanks so much!
There is a word macro that can change that
for you.  Not sure if it will work on your platform, though.  If you need it, just answer on here and I will post the macro so you can paste it into your program macros and assign a shortcut
Mine too. I actually did have to make a macro for
zz
No, not within SH. However, if you use Word, you can make a macro.nm
nm
macro / shortcut question

Hi guys ... I'm having a mental block. Years ago, in WP51, I had set up shortcuts for formats, such as "alt L" for a Letter, or "alt C" for consults, etc.  Now I type in MSWord, but I want to set something up for a new doc Im typing for.  What were those shortcut called?  How do I set them up?  They were not macros ... something else, less complicated.  I either used the ALT key or maybe it was the CTRL key - not sure.


Please help; I want to set up some quick hospital formats, one for an H&P, one for an OP, etc.  Thanks again !


JMK


When recording a macro in MS Word
what do you do in order to be able to jump from heading to heading; i.e., how do I get from HISTORY: to FINDINGS: ? Thanks for your help.
RE: Create a macro for "jump"
Could you please send me the instructions for creating such a macro? I would be forever thankful. Thanks....thinking of you in kind. KO
Cannot remember macro for jumping

I need a macro for Word 2003 to jump to ?? as the next field and, even though I've done this before, I cannot for the LIFE of me remember how to do it.  


 


Any clues? THANKS in advance!


I use / and record a macro which I assign
to an F key. Then I put / wherever in the template I need to input.

So moving around is as simple as pushing the F2 key as many times as needed...

I also use the macro record and assign to an F key functions like block and copy. Then if you have to move a whole section of words to another page, it's one key to block and copy and one click of the mouse to paste and you're done.