From b9f06820f9c08352b777f44b63ec8fcdd169a9d9 Mon Sep 17 00:00:00 2001 From: simple321vip <635344988@qq.com> Date: Tue, 14 Apr 2026 03:24:41 +0000 Subject: [PATCH] =?UTF-8?q?=E6=9B=B4=E6=96=B0=20vba=5Fcode=5Fcommon.bas?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- vba_code_common.bas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vba_code_common.bas b/vba_code_common.bas index b862490..fb34f36 100644 --- a/vba_code_common.bas +++ b/vba_code_common.bas @@ -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