Come adattare automaticamente le colonne utilizzando vba (con esempio)
È possibile utilizzare il metodo Adattamento automatico in VBA per regolare automaticamente la larghezza di una o più colonne in un foglio di lavoro Excel.
Ecco un modo comune per utilizzare questo metodo nella pratica:
SubAutoFitColumns ()
Columns(" A:D ").AutoFit
End Sub
Questa particolare macro regola automaticamente la larghezza di ciascuna colonna nell’intervallo da A a D in modo che sia larga quanto necessario per visualizzare la cella più lunga in ciascuna colonna.
L’esempio seguente mostra come utilizzare nella pratica il metodo AutoFit .
Esempio: come adattare automaticamente le colonne utilizzando VBA
Supponiamo di avere il seguente set di dati in Excel che contiene informazioni su vari giocatori di basket:
Supponiamo di voler regolare automaticamente la larghezza di ciascuna colonna da A a D in modo che sia larga quanto necessario per visualizzare la cella più lunga in ciascuna colonna.
Per fare ciò possiamo creare la seguente macro:
SubAutoFitColumns ()
Columns(" A:D ").AutoFit
End Sub
Quando eseguiamo questa macro, riceviamo il seguente output:
Tieni presente che la larghezza di ciascuna colonna è stata regolata automaticamente per essere larga quanto necessario per visualizzare la cella più lunga in ciascuna colonna.
Tieni presente che se desideri regolare automaticamente ciascuna colonna in un foglio di lavoro specifico, puoi utilizzare la seguente sintassi:
SubAutoFitColumns ()
ThisWorkbook.Worksheets(" Sheet1 ").Cells.EntireColumn.AutoFit
End Sub
Questa particolare macro regolerà automaticamente la larghezza di ciascuna colonna nel Foglio1 in modo che sia larga quanto necessario per visualizzare la cella più lunga in ciascuna colonna.
Tieni presente che la larghezza di tutte le colonne senza dati rimarrà invariata.
Nota : qui è possibile trovare la documentazione completa del metodo AutoFit in VBA.
Risorse addizionali
I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:
VBA: come contare il numero di colonne utilizzate
VBA: come trovare l’ultima colonna utilizzata
VBA: come eliminare colonne