Selecting a text block

[John Doue]

Hi,

I would like to write a simple macro what would activate "block select"
(Ctrl+Shift+F8) and leave the block select" active until an appropriate
action concerning the selected bloc is taking.

I find that it is not possible to simply record the Ctrl+shift+F8
sequence. Can someone give me pointers?

Thanks

 

[Helmut Weber]

Hi John,

hm...

Sub Macro20()
Selection.ColumnSelectMode = True
Selection.MoveRight Unit:=wdCharacter, Count:=12
Selection.MoveDown Unit:=wdLine, Count:=4
End Sub

If you click in the doc, the block vanishes. :-(
But you could click on buttons or menu-items.


--
Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"

 

[John Doue]

Hi John,

hm...

Sub Macro20()
Selection.ColumnSelectMode = True
Selection.MoveRight Unit:=wdCharacter, Count:=12
Selection.MoveDown Unit:=wdLine, Count:=4
End Sub

If you click in the doc, the block vanishes. :-(
But you could click on buttons or menu-items.

Thanks Helmut, I had tried this before I posted ...

 

[Tony Jollans]

If I understand exactly what you're asking, I'm not sure if you can do it.
Setting ColumnSelectMode in a macro only seems to have effect until the
macro ends.

 

[John Doue]

If I understand exactly what you're asking, I'm not sure if you can do it.
Setting ColumnSelectMode in a macro only seems to have effect until the
macro ends.

Yes, you did understand and aparrently, you stumble onto the same
problem I found when I tried to write a macro.
Thanks

 

[Helmut Weber]

Hi John,

you may select some text in ColumnSelectMode
activate a userform,
and offer some actions to be taken.

--
Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"