Calculate Event Example

This example adjusts the size of columns A through F whenever the worksheet is recalculated.

Private Sub Worksheet_Calculate()
    Columns("A:F").AutoFit
End Sub

Send feedback to MSDN.Look here for MSDN Online resources.