[mso] Re: Macro for Dropped Cap in Word 2002?

Hello Ray,
Sorry for not replying earlier. I did not have a chance to check the mail until 
now. I am pleased the code helped you at least partly.
Again, I am quite sure it is a matter of where the cursor (the selection) is. 
How do you call your macro at all? where is the selection when you do call the 
macro. did you change the code and write for example 
Selection.Paragraphs(1).Range.Characters(2).Select
Well, I absolutely do not understand how the second letter of the first 
paragraph would be "targeted" with the proposed code.
If I understand the code correctly, the first part of it invokes the DropCap of 
the first paragraph. I believe the DropCap can only be the first character of 
the paragraph.
the second part formats the selection to be Arial and size 52. That is where 
the position of the cursor is very important. because if you did not make sure 
to select the first letter of the paragraph, the format will be applyed to 
another character and you may have two "big letters" that will look like 
DropCaps.  
What don't you play with the code in order to be sure that you understand every 
part of it.
I would for example first use only the part of the dropCap and apply it to 
different paragraphs and see how it works. and then only would I use the second 
part of the formating. 

Hope this will help
Genevieve

----- Original Message ----
From: Ray Shapp <ras45@xxxxxxxxxxxxx>
To: mso@xxxxxxxxxxxxx
Sent: Tuesday, May 29, 2007 5:44:47 AM
Subject: [mso] Re: Macro for Dropped Cap in Word 2002?


Hi Genevieve,

Many thanks for fixing my macro (included below).

May I ask you how to reinitialize its focus. It works fine when it is invoked
for the first time, but when I try to apply it to a second paragraph, it
creates a drop cap out of the second letter in the first paragraph. IOW, after
the first use, I move to a different paragraph, and invoke it again. It
doesn't matter whether I highlight the first letter of the new paragraph or
not. A third invocation just makes the first drop cap double size.

How to "turn off" this macro? Does it need to be modified, or should I issue
an intervening command or keystroke? Pressing Esc doesn't help.

Thanks again,

Ray Shapp

Sub DropCap()
'
' DropCap Macro
' Macro recorded May 28, 2007 by Ray Shapp
' Extensively modified by Genevieve from MSO@xxxxxxxxxxxxx
'
    Selection.Paragraphs(1).Range.Characters(1).Select
    With Selection.Paragraphs(1).DropCap
        .Position = wdDropNormal
        .LinesToDrop = 3
        .DistanceFromText = InchesToPoints(0.08)
    End With
    With Selection.Font
        .Name = "Arial"
        .Size = 52
        .Color = wdColorGray50
        .Shadow = True
    End With
End Sub



----- Original Message ----- 
From: "Genevieve" <gene182000@xxxxxxxxx>
To: <mso@xxxxxxxxxxxxx>
Sent: Monday, May 28, 2007 8:01 AM
Subject: [mso] Re: Macro for Dropped Cap in Word 2002?


> Hello Ray,
> I believe your main problem is you are "supposing" that the cursor is at 
> beginning of paragraph when you run your macro.
> Well, if it is not the case, you may run into problems (You will have a 
> dropcap in the middle of a par. which is not what you  want I suppose). So 
> first, I would advise you to make sure the cursor is at the right position 
> and then apply the dropcap and the format.
> the following worked for me:
> sub DropCap()
>    Selection.Paragraphs(1).Range.Characters(1).Select
>    With Selection.Paragraphs(1).DropCap
>        .Position = wdDropNormal
>        .LinesToDrop = 3
>        .DistanceFromText = CentimetersToPoints(0)
>    End With
>    With Selection.Font
>        .Name = "Arial"
>        .Size = 52
>        .Shadow = True
>    End With
> end sub
>
> As you may see, I also deleted all the unecessary lines that you get when 
> you record a macro.
>
> Hope this will help you.
> Genevieve
>


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, visit the group's homepage and use the dropdown 
menu at the top.  This will allow you to unsubscribe your email address or 
change your email settings to digest or vacation (no mail).
http://www.freelists.org/webpage/mso

To be able to share files with the group, you must join our Yahoo sister group. 
 This group will not allow for posting of emails, but will allow you to join 
and share problem files, templates, etc.:  
http://tech.groups.yahoo.com/group/MicrosoftOffice . This group is for FILE 
SHARING ONLY.

If you are using Outlook and you see a lot of unnecessary code in your email 
messages, read these instructions that explain why and how to fix it:
http://personal-computer-tutor.com/abc3/v28/greg28.htm
*************************************************************


 
____________________________________________________________________________________
Don't get soaked.  Take a quick peak at the forecast
with the Yahoo! Search weather shortcut.
http://tools.search.yahoo.com/shortcuts/#loc_weather

*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, visit the group's homepage and use the dropdown 
menu at the top.  This will allow you to unsubscribe your email address or 
change your email settings to digest or vacation (no mail).
http://www.freelists.org/webpage/mso

To be able to share files with the group, you must join our Yahoo sister group. 
 This group will not allow for posting of emails, but will allow you to join 
and share problem files, templates, etc.:  
http://tech.groups.yahoo.com/group/MicrosoftOffice . This group is for FILE 
SHARING ONLY.

If you are using Outlook and you see a lot of unnecessary code in your email 
messages, read these instructions that explain why and how to fix it:
http://personal-computer-tutor.com/abc3/v28/greg28.htm
*************************************************************

Other related posts: