Inserimento testo nella pagina

Question

Buon giorno,

ho un documento di 4000 pagine in ogni pagina c'è il suo salto pagina ed io dovrei inserire un testo con un numero progressivo e farlo diventare "Titolo 1" come posso fare?

Grazie

*********

Answer 1

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Ciao GIOVACCHINI Alberto

Qualche progresso sul tuo problema?

Se hai dei buoni metodi che puoi anche condividere qui, puoi anche scegliere 'Sì' nel post prezioso, in modo che incontrato e lo stesso problema degli utenti, puoi fare riferimento alla tua esperienza per risolvere il problema, e così via.

Non esitate a pubblicare qualsiasi progresso sul vostro problema Grazie!

Saluti sinceri.

Petter.Y - MSFT | Specialista del supporto della community Microsoft

Answer 2

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Ciao GIOVACCHINI Alberto

Ho un codice VBA, Questa funzione si trova all'inizio di ogni pagina della prima riga, modificare il contenuto, e centrato, è possibile fare riferimento al

Sub AddCenteredPageNumberAtStartOfLine()

    Dim totalPages As Integer    
    Dim i As Integer

    Dim pageRange As Range    
    Dim para As Paragraph

    totalPages = ActiveWindow.ActivePane.Pages.Count

    For i = 1 To totalPages

        Set pageRange = ActiveDocument.GoTo(What:=wdGoToPage, Which:=wdGoToAbsolute, Name:=i)

 ' Passa alla prima riga della pagina

        pageRange.Start = pageRange.Paragraphs(1).Range.Start

 ' Inserire il numero

        pageRange.InsertBefore "Titolo" & i

 ' Ottenere l'oggetto paragrafo

        Set para = pageRange.Paragraphs(1)

 ' Impostazione dell'allineamento al centro del paragrafo

        para.Alignment = wdAlignParagraphCenter    
    Next i
End Sub

Saluti sinceri.

Petter.Y - MSFT | Specialista del supporto della community Microsoft.

Answer 3

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Grazie, ma no, è quello che volevo fare, mi spiego meglio: ho un documento di 4000 pagine, ogni pagina è separata dall'altra con un salto di pagina e volevo mettere come riga un testo con un numero progressivo all'inizio di ogni pagina o al massimo dopo un numero preciso di righe.

Tuttavia, grazie per il suggerimento che mi hai dato.

*********

Answer 4

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Ciao GIOVACCHINI Alberto

Ho un codice VBA, puoi provarlo!

Apri un file word, premi "Alt+F11", fai clic su "Inserisci" >> "Modulo".

Inserisci il codice VBA

Sub InsertTextAtPageBreaks()

  Dim i As Integer

  Dim pageBreaks As Integer

  Dim docRange As Range

   ' Initialise the variable

  i = 1

  pageBreaks = 0

  Set docRange = ActiveDocument.Content

   ' Iterate over the entire document

  With docRange.Find

      .Text = "^m" 'Find page breaks

      .Forward = True

      .Wrap = wdFindStop

      ' Loop over all page breaks

      Do While .Execute

          pageBreaks = pageBreaks + 1

          docRange.Collapse Direction:=wdCollapseEnd

          docRange.InsertAfter "kkk" & pageBreaks

          docRange.Collapse Direction:=wdCollapseEnd
      Loop

  End With

  MsgBox "Insertion completed, total number of page breaks: " & pageBreaks

End Sub

Salva, alla parola interfaccia, premere 'Alt + F8', selezionare"

InsertTextAtPageBreaks

", correre.

Saluti sinceri.

Petter.Y - MSFT | Specialista del supporto della community Microsoft.

Answer 5

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Ciao GIOVACCHINI Alberto

Grazie per aver utilizzato i prodotti Microsoft e per aver pubblicato post nella community.

Capisco che hai riscontrato un problema con Excel.

1.Se si desidera inserire un numero di pagina. Fai clic su "Inserisci" >> "Numero di pagina", scegli il tipo che desideri, quindi fai doppio clic sull'intestazione e digita "Affianca".

2.To inserire il testo con un numero di serie per ogni pagina in Microsoft Word e denominarlo "Titolo" + numero di pagina corrente, puoi seguire questi passaggi:

1. Apri il tuo documento Word.
2. Premere Ctrl + H per aprire la finestra di dialogo Trova e sostituisci.
3. Nella casella Trova contenuto, digitare "^m", che rappresenta un'interruzione di pagina.
4. Digitare quanto segue nella casella Sostituisci con.
5. "^m Titolo 1"

In questo modo viene inserito il testo 'Titolo' che segue l'interruzione di pagina e viene numerato automaticamente.

6. Fare clic sul pulsante Sostituisci tutto.

Word inserirà quindi il "Titolo" dopo ogni interruzione di pagina e li numererà automaticamente.

Se vuoi cambiare il numero, puoi farlo solo sostituendolo pagina per pagina.

Se pensi che il metodo di appello non sia soddisfatto, puoi inviarmi un messaggio privato di contenuto di parole vento, cercherò di modificare.

Di seguito sono riportati i passaggi per visualizzare i messaggi privati:

• Fai clic su Immagine del profilo in alto a destra > seleziona l'opzione Il mio profilo.

• Quindi, fai clic su Visualizza messaggi diretti in "Modifica profilo" nella pagina Informazioni personali.

Spero che questo aiuti, fammi sapere se questo è contrario a ciò di cui hai bisogno.

Saluti sinceri.

Petter.Y - MSFT | Specialista del supporto della community Microsoft.