Modifica dei mesi in una cartella di lavoro (Microsoft Excel)
Non è insolito tenere traccia delle informazioni mensili, di un tipo o dell’altro, in una cartella di lavoro. Potresti tenere traccia delle spese, delle vendite, dei movimenti di inventario, dei prezzi delle azioni o di mille altre cose. Quando inizi un nuovo mese, puoi fare una copia della cartella di lavoro del mese precedente e quindi cercare un modo per apportare modifiche al nome del mese che appare in vari punti nella copia appena creata.
Se il nome del mese che si desidera modificare è archiviato come testo all’interno di vari fogli di lavoro, è possibile utilizzare la funzione Trova e sostituisci di Excel per apportare le modifiche. Segui questi passaggi:
-
Fare clic sulla scheda del primo foglio di lavoro in cui si desidera apportare modifiche.
-
Tieni premuto il tasto Maiusc mentre fai clic sulla scheda dell’ultimo foglio di lavoro in cui desideri apportare modifiche. Tutti i fogli di lavoro che desideri modificare dovrebbero ora essere selezionati.
-
Premere Ctrl + H per visualizzare la scheda Sostituisci della finestra di dialogo Trova e sostituisci.
-
Nella casella Trova, inserisci il nome del vecchio mese.
-
Nella casella Sostituisci con immettere il nome del nuovo mese.
-
Fare clic su Sostituisci tutto.
-
Chiudi la finestra di dialogo Trova e sostituisci.
Se questi passaggi non modificano il nome di un determinato mese come appare nella cartella di lavoro, potrebbe essere perché il nome del mese non è effettivamente testo, ma un valore di data formattato per mostrare solo il mese. In tal caso, non è possibile utilizzare Trova e sostituisci; invece devi semplicemente modificare il valore della data memorizzato nella cella.
Se vuoi un modo rapido per cambiare i nomi dei mesi nelle schede del foglio di lavoro, è un po ‘più complicato. La funzione Trova e sostituisci di Excel non troverà o sostituirà il testo nei nomi delle schede. Normalmente devono essere eseguiti a mano, ma se ne hai molti, potresti voler creare una macro che farà il cambiamento per te. La seguente macro richiede il testo che si sta cercando e il testo con cui si desidera sostituirlo. Quindi, passa attraverso ogni scheda del foglio di lavoro e apporta le modifiche per te.
Sub TabReplace() Dim I As Integer, J As Integer Dim sFind As String Dim sReplace As String Dim sTemp As String sFind = InputBox("Text to find?") sReplace = InputBox("Replace it with?") If (sFind & sReplace) = "" Then Exit Sub For I = 1 To Sheets.Count sTemp = Sheets(I).Name J = InStr(sTemp, sFind) While J > 0 sTemp = Left(sTemp, J - 1) & sReplace _ & Mid(sTemp, (J + Len(sFind))) J = InStr(sTemp, sFind) Wend If sTemp <> Sheets(I).Name Then Sheets(I).Name = sTemp End If Next I End Sub
Anche se i passaggi (e la macro) presentati qui possono semplificare il lavoro di aggiornamento della cartella di lavoro, potrebbe essere ancora più semplice ripensare semplicemente a come si fa la cartella di lavoro. Potrebbe essere più semplice impostare una cella per contenere il nome del mese corrente e quindi fare riferimento a tale nome nelle celle appropriate in tutta la cartella di lavoro. Quindi, tutto ciò che devi fare è cambiare il nome del mese in una singola cella e verrà modificato altrove, automaticamente. In altri ExcelTips hai persino imparato come modificare dinamicamente il nome di una scheda in base al contenuto di una determinata cella.
_Nota: _
Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.
ExcelTips è la tua fonte di formazione economica su Microsoft Excel.
Questo suggerimento (2748) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui: