Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
I have text in my document below where my cursor is. How do I create
a tab stop that will be set for the rest of the document forward? I know if I just enter a tab stop normally, it won't be in effect for any text below my cursor position. Thanks. |
#2
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
Rick wrote:
I have text in my document below where my cursor is. How do I create a tab stop that will be set for the rest of the document forward? I know if I just enter a tab stop normally, it won't be in effect for any text below my cursor position. Thanks. Select all of the text where you want the tab stop to be set (most easily by pressing Ctrl+Shift+End) and then set the tab stop. -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. |
#3
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
Thanks; that does it. Is there an easy way to then return to where I
was before pressing Ctrl+Shift+End? On May 19, 4:45*pm, "Jay Freedman" wrote: Rick wrote: I have text in my document below where my cursor is. *How do I create a tab stop that will be set for the rest of the document forward? *I know if I just enter a tab stop normally, it won't be in effect for any text below my cursor position. *Thanks. Select all of the text where you want the tab stop to be set (most easily by pressing Ctrl+Shift+End) and then set the tab stop. -- Regards, Jay Freedman Microsoft Word MVP * * * *FAQ:http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. |
#4
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
Sorry -- I really meant to ask how to do this in VBA code -- should
have posted in the VBA forum... On May 22, 4:00*pm, Rick wrote: Thanks; that does it. *Is there an easy way to then return to where I was before pressing Ctrl+Shift+End? On May 19, 4:45*pm, "Jay Freedman" wrote: Rick wrote: I have text in my document below where my cursor is. *How do I create a tab stop that will be set for the rest of the document forward? *I know if I just enter a tab stop normally, it won't be in effect for any text below my cursor position. *Thanks. Select all of the text where you want the tab stop to be set (most easily by pressing Ctrl+Shift+End) and then set the tab stop. -- Regards, Jay Freedman Microsoft Word MVP * * * *FAQ:http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit.- Hide quoted text - - Show quoted text - |
#5
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
This is kind of clumsy about getting the tab stop position, and you could
also ask the user for the alignment and leader type, but you get the idea... Sub SetTabStopToEndOfDoc() Dim strStop As String Dim nStop As Single Dim oRg As Range strStop = InputBox("Position of tab stop in inches:") If Len(strStop) 0 Then nStop = CSng(Val(strStop)) If nStop 0 Then Set oRg = Selection.Range oRg.End = ActiveDocument.Range.End oRg.Paragraphs.TabStops.Add _ Position:=InchesToPoints(nStop), _ Alignment:=wdAlignTabLeft, _ Leader:=wdTabLeaderSpaces Set oRg = Nothing End If End If End Sub -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. Rick wrote: Sorry -- I really meant to ask how to do this in VBA code -- should have posted in the VBA forum... On May 22, 4:00 pm, Rick wrote: Thanks; that does it. Is there an easy way to then return to where I was before pressing Ctrl+Shift+End? On May 19, 4:45 pm, "Jay Freedman" wrote: Rick wrote: I have text in my document below where my cursor is. How do I create a tab stop that will be set for the rest of the document forward? I know if I just enter a tab stop normally, it won't be in effect for any text below my cursor position. Thanks. Select all of the text where you want the tab stop to be set (most easily by pressing Ctrl+Shift+End) and then set the tab stop. |
#6
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
Fabulous; thank you. I'm trying to teach myself about
the Range object. How would I set a tab stop for the current Section only (rather than the rest of the document)? Do I still use Range for that? In article , says... This is kind of clumsy about getting the tab stop position, and you could also ask the user for the alignment and leader type, but you get the idea... Sub SetTabStopToEndOfDoc() Dim strStop As String Dim nStop As Single Dim oRg As Range strStop = InputBox("Position of tab stop in inches:") If Len(strStop) 0 Then nStop = CSng(Val(strStop)) If nStop 0 Then Set oRg = Selection.Range oRg.End = ActiveDocument.Range.End oRg.Paragraphs.TabStops.Add _ Position:=InchesToPoints(nStop), _ Alignment:=wdAlignTabLeft, _ Leader:=wdTabLeaderSpaces Set oRg = Nothing End If End If End Sub |
#7
Posted to microsoft.public.word.pagelayout
|
|||
|
|||
insert tab stop from this point forward
Yes, you can use a Range. Replace the lines
Set oRg = Selection.Range oRg.End = ActiveDocument.Range.End with Set oRg = Selection.Sections(1).Range This may not make much sense at first sight, but it means "the range of the first section of which any part is in the Selection". If the Selection is wholly within one section, then that is the section that will be affected. On Fri, 22 May 2009 20:57:44 -0400, Rick wrote: Fabulous; thank you. I'm trying to teach myself about the Range object. How would I set a tab stop for the current Section only (rather than the rest of the document)? Do I still use Range for that? In article , says... This is kind of clumsy about getting the tab stop position, and you could also ask the user for the alignment and leader type, but you get the idea... Sub SetTabStopToEndOfDoc() Dim strStop As String Dim nStop As Single Dim oRg As Range strStop = InputBox("Position of tab stop in inches:") If Len(strStop) 0 Then nStop = CSng(Val(strStop)) If nStop 0 Then Set oRg = Selection.Range oRg.End = ActiveDocument.Range.End oRg.Paragraphs.TabStops.Add _ Position:=InchesToPoints(nStop), _ Alignment:=wdAlignTabLeft, _ Leader:=wdTabLeaderSpaces Set oRg = Nothing End If End If End Sub |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
insert optional space after forward slash character | Microsoft Word Help | |||
Create an auto-forward (forward to a friend) button in html email | Mailmerge | |||
Is it possible to insert back/forward links in a non-website? | Page Layout | |||
how to stop text from moving forward if a word or words are added. | Microsoft Word Help | |||
From this point forward? | Microsoft Word Help |