Menú Principal

Word / Wordperfect

Iniciado por qwerty, Julio 19, 2009, 10:39:08 AM

Tema anterior - Siguiente tema

qwerty

¿Hay algún modo de que Word/Wp te liste los números de página en las que aparece una determinada palabra?

Baku

Se me ocurre que lo más fácil es crear una macro con VBA.

It's very difficult todo esto.

qwerty

Cita de: Baku en Julio 19, 2009, 11:18:08 AM
Se me ocurre que lo más fácil es crear una macro con VBA.

Creo que tanto Word como Wordperfect permite macros (al menos editarlas).
Pero, ¿cómo hacerlo? ¿No existe alguna rutina en algún lado?

Baku

Yo no controlo de VBA y de WP ni me acuerdo pero la idea general en Word serí­a definir una macro tal que así­n:

Sub Macro1()
'
' Macro1 Macro
'
'
    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "texto que buscas"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
   
    Dim Contador As Integer
    Contador = 0
    Dim Paginas(1000) As Integer
    While Selection.Find.Execute
        Paginas(Contador) = Selection.Information(wdActiveEndPageNumber)
        Contador = Contador + 1
    Wend
   
    Dim resultado As String
    For i = 1 To Contador
        resultado = resultado & Paginas(i) & " - "
    Next i
    MsgBox resultado
   
End Sub


Los números de página quedarí­an recogidos en la matriz página.

Que conste que esto es un ejemplo bruto hecho por alguien sin idea, aunque funciona no está optimizado ni depurado. Eso es trabajo para ti, es sólo una idea de por donde empezar.
It's very difficult todo esto.