Come eliminare una pagina in Word: Microsoft Word è davvero un ottimo strumento, con tante funzionalità, ma c’è un aspetto in cui è carente, la cancellazione delle pagine.
Chi utilizza spesso Word, avrà infatti notato, che non è possibile cancellare rapidamente una pagina.
Per poterlo fare, dovremo selezionare tutto il suo contenuto e cancellarlo.
Non sarebbe comodo invece, semplicemente cliccare su un tasto ed eliminare la pagina?
Seguendo questo articolo, potrete aggiungere un pulsante che permette proprio di cancellare una pagina con un semplice click.
Per una guida più dettagliata, o se avete dei dubbi, vi consiglio di seguire il video a fine pagina che mostra ogni passaggio da compiere.
In questo articolo andremo a creare una Macro, che gestirà l’eliminazione delle pagine, se non avete mai creato una Macro, non preoccupatevi, seguendo la guida vedrete che è davvero semplicissimo.
Come eliminare una pagina in Word – Creare la Macro
Per cominciare portiamoci sulla scheda Visualizza e clicchiamo su Macro.
Ora assegniamo un nome alla Macro, io vi consiglio di utilizzare EliminaPagina, se usate un nome diverso, dovrete cambiare il nome all’interno della Macro, usando invece quello consigliato, vi basterà fare copia e incolla.
Dopo aver assegnato il nome, clicchiamo su Crea.
Si aprirà una nuova schermata, con del codice, non spaventatevi, qui basta fare semplicemente copia e incolla.
Cancellate il testo che trovate nella nuova finestra (eliminate tutto, in modo da avere una pagina vuota).
Quindi incollate questo:
Sub EliminaPagina()
'
' Macro Elimina Pagina
' Scaricato da www.claudiomasci.com
'
Dim IndiceInizioPagina As Long
Dim IndiceFinePagina As Long
Dim RangePagina As Range
Dim PaginaCorrente As Integer
Dim NumeroTotalePagine As Integer
PaginaCorrente = Selection.Information(wdActiveEndPageNumber)
NumeroTotalePagine = Selection.Information(wdNumberOfPagesInDocument)
' Trova posizione iniziale delle pagina
IndiceInizioPagina = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=PaginaCorrente).Start
' Trova posizione finale della pagina.
If PaginaCorrente = NumeroTotalePagine Then
IndiceFinePagina = ActiveDocument.Content.End
Else
IndiceFinePagina = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=PaginaCorrente + 1).Start
End If
' Seleziona la pagina.
Set RangePagina = ActiveDocument.Range(Start:=IndiceInizioPagina, End:=IndiceFinePagina)
RangePagina.Select
' Elimina la pagina
Selection.Delete Unit:=wdCharacter, Count:=1
' Scaricato da www.claudiomasci.com
End Sub
Dopo aver incollato il testo cliccate sul disco per salvare, o andate su File e cliccate su Salva Normal.
Aggiungere i pulsanti sulla barra di Word
La parte più difficile è fatta, ora non ci resta che aggiungere il pulsante sulla barra di Word, per poter usare la funzione quando ne abbiamo bisogno.
Aggiungeremo i pulsanti in 2 posizioni:
- barra di accesso rapido
- barra multifunzione
Per aggiungerli possiamo cliccare o sull’ultima icona della barra di accesso rapido (la freccia verso il basso), oppure cliccare con il tasto destro in qualsiasi punto della barra multifunzione.
Nel primo caso, clicchiamo poi sulla voce “Altri comandi…“, nel secondo invece clicchiamo su “Personalizza barra multifunzione…“.
Aggiungere il pulsante alla barra di accesso rapido
Controlliamo che sulla sinistra sia selezionata “Barra di accesso rapido“.
Dal menù “scegli comando da” selezioniamo Macro.
Facciamo click quindi sulla Macro che abbiamo appena creato, e clicchiamo su Aggiungi.
Dopo aver aggiunto la Macro, selezioniamola e clicchiamo su Modifica.
Da qui possiamo assegnarle un’icona e cambiare il testo visualizzato (che in questo caso può contenere degli spazi).
Aggiungere il pulsante alla barra multifunzione
Per la barra multifunzione il procedimento è simile, ma dobbiamo eseguire un passaggio extra.
Per prima cosa dobbiamo selezionare in quale scheda andare ad aggiungere il nostro pulsante.
Io ho scelto la scheda Home.
Non è possibile aggiungere i pulsanti all’interno dei gruppi predefiniti di Word, quindi dopo aver scelto la scheda dovremo andare a crearci un nuovo gruppo al suo interno.
Dopo aver creato il gruppo, possiamo cliccare su Rinomina per assegnargli un nome (ad esempio Pagine).
Una volta creato il gruppo, possiamo selezionare la Macro e cliccare su Aggiungi per aggiungerla a quel gruppo.
Anche in questo caso, possiamo poi andare a personalizzarla cambiando icona e testo.
Scarica la Macro da Importare
Nel video, oltre al copia e incolla spiegato qui, mostro anche come importare una Macro da un file già esistente.
Cosa molto utile nel caso in cui vogliate eseguire questa operazione su più dispositivi, o se volete conservare la macro per usarla anche in futuro.
Questo è il link per scaricare il file (in formato zip da estrarre).