Se usi fogli di lavoro che contengono un bel po ‘di testo, potrebbero esserci delle volte in cui desideri una funzione come Word che converte facilmente tra maiuscole e minuscole. Excel contiene tali funzioni, ma sono progettate per essere utilizzate nelle macro, non come comandi dai menu.

Se vuoi convertire rapidamente grandi intervalli di testo senza la necessità di ridigitare il testo nelle celle dell’intervallo, puoi usare la seguente macro:

Sub MakeUpper()

Dim MyText As String     Dim MyRange As Range     Dim CellCount As Integer

Set MyRange = ActiveSheet.Range(ActiveWindow.Selection.Address)

For CellCount = 1 To MyRange.Cells.Count         If Not MyRange.Cells(CellCount).HasFormula Then             MyText = MyRange.Cells(CellCount).Value             MyRange.Cells(CellCount).Value = UCase(MyText)

End If     Next CellCount End Sub

Questa macro scorre le celle in un intervallo selezionato, converte in maiuscolo il contenuto di qualsiasi cella che non contiene una formula. Puoi facilmente modificare la macro in modo che venga convertita in minuscolo cambiando la funzione UCase (usata vicino alla parte inferiore della macro) in LCase. Un’altra modifica interessante è se si desidera utilizzare le maiuscole del titolo anziché le maiuscole o le minuscole. (Il caso del titolo è dove solo la prima lettera di ogni parola è maiuscola.) A tale scopo, sostituire UCase (MyText) con Application.Proper (MyText).

_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.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (1970) si applica a Microsoft Excel 97, 2000, 2002 e 2003.