range de página

hola Jose,

1 Como se en que numero de pagina esta el cursor?

1) por ejemplo puedes aplicar el mismo codigo de tu consulta anterior, solo
que utilizando la constante [wdStatisticPages] y no sumando ningun valor >>

'[]

Sub demo_c()

Dim rango As Range
Dim x As String

Set rango = ActiveDocument.Range(0, Selection.End)
x = rango.ComputeStatistics(wdStatisticPages)

MsgBox "estas en la pagina nº " & x

End Sub

'[]

2 Como hacer un range de la pagina

Como range a que te refieres a seleccionar partes de tu documento ???

Mira en la ayuda de VBA de Word por >>

Range (objeto)

ahi te vienen dos o tres ejemplos de seleccion de parrafo
yComentanos...!

Saludos
Monica


www.fermu.com
www.teladearana.es

Hola Monica
Mucha gracias por tu respuesta
en cuanto a lo del range, lo que quiero hacer es un range de toda la
página en la que estoy.

Saludos
José López

Hola Jose,

en cuanto a lo del range,
lo que quiero hacer es un range de toda la
pagina en la que estoy.

pues por ejemplo, para seleccionar toda la pagina donde se encuentre el
cursor ...[ que sera la siempre sera la pagina en la que estes] ...puedes
por ejemplo utilizar >>

'[]

Sub demo_d()
Dim y As Range
Selection.GoTo wdGoToLine, 1
Set y = Selection.Range
y.End = Selection.Bookmarks("\Page").Range.End
y.Select
End Sub

'[]


y gracias a ti ... Comentanos.!

Saludos
Monica


www.fermu.com
www.teladearana.es

Gracias Monica
Como siempre impresionante

Saludos
José López

Gracias a ti Jose :) !!

Saludos
Monica