Come eliminare righe e colonne indesiderate in un foglio di lavoro di Excel
( Non ci vorrà fino a quando un primo sguardo potrebbe suggerire ed è sicuro!)
Vi sono due fogli a cui si fa riferimento nella procedura seguente.
Chiamiamo il tuo foglio originale YourOriginalSheet
(rappresenta il nome effettivo del tuo foglio originale).
Chiamiamo l'altro foglio ShortSheet
, che conterrà una copia delle sole celle pertinenti.
(1) In YourOriginalSheet
, Select
e Copy
l'intervallo di celle rilevanti (non incollare da nessuna parte).
(2) Aggiungi un nuovo foglio chiamato ShortSheet
, posiziona il cursore nella cella che rappresenta l' angolo in alto a sinistra dell'intervallo da copiare (probabilmente A1
) e incolla in questo modo:
(2a) Paste Special...
> Formulas
[fare clic con il pulsante destro del mouse sulla cella nell'angolo in alto a sinistra]
(2b) Paste Special...
>Values
(2c) Paste Special...
>Formats
(2d) Paste Special...
>Column Widths
(2e) Includi altre Paste Special
opzioni che ritieni possano aiutare a migliorare l'aspetto del foglio.
(3) Premere Ctrl-Shift-End
per trovare l'angolo in basso a destra di ShortSheet
per assicurarsi che contenga tutti i dati rilevanti.
(4) Save
la cartella di lavoro. ( Save As ...
un nuovo file se si desidera un backup.)
(5) Elimina YourOriginalSheet
(i dati rilevanti sono attualmente salvati in ShortSheet
.)
(6) Rinomina ShortSheet
con il nome effettivo del foglio originale ».
Nulla è cambiato se non per rendere la cartella di lavoro molto più piccola, quindi tutte le macro, i riferimenti esterni a questo foglio di lavoro, ecc. Dovrebbero comunque funzionare.
Ecco un macro
per eseguire i passaggi in (2).
Sub pasteSpecialAll()
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub
Prima di utilizzare la macro Select
e Copy
l'intervallo pertinente, come è stato fatto nel passaggio (1).
Ho salvato la mia macro nella mia Personal.xlsb
cartella di lavoro per un utilizzo futuro ovunque e gli Ctrl + Shift + V
ho assegnato un tasto .