更新 vba_code_common.bas
This commit is contained in:
@@ -189,6 +189,6 @@ Sub AutoFitColumnWidth(Optional ByVal fitColumnStart As Long = 2, _
|
||||
Set ws = ActiveSheet
|
||||
|
||||
If fitColumnStart <= fitColumnEnd Then
|
||||
ws.Columns(fitColumnStart & ":" & fitColumnEnd).AutoFit
|
||||
ws.Range(ws.Columns(fitColumnStart), ws.Columns(fitColumnEnd)).AutoFit
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user