亞寵展、全球?qū)櫸锂a(chǎn)業(yè)風(fēng)向標(biāo)——亞洲寵物展覽會(huì)深度解析
854
2025-03-31
excel怎么使用vba自動(dòng)調(diào)整列寬?
excel中使用vba來自動(dòng)調(diào)整所選列列寬。
1、首先我們打開一個(gè)工作樣表作為例子。
2、在例子中,我們屬于一些數(shù)值內(nèi)容,但是因?yàn)榱袑挼脑O(shè)置的太小,數(shù)值內(nèi)容以#號(hào)縮略的形式顯示,這個(gè)時(shí)候我們是看不到數(shù)值內(nèi)容的。
3、這個(gè)時(shí)候我們只需要修改一下列寬,加大列寬數(shù)值,即可以完整顯示原有的數(shù)值,調(diào)整方法很簡(jiǎn)單,可以直接拖拉,或者輸入數(shù)值。
4、這里我們可以使用更智能的方法,在vba里設(shè)置。使用alt+f11組合快捷鍵進(jìn)入vbe編輯器,插入一個(gè)新的模塊,并在模塊中輸入以下代碼:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Range("i:i").EntireColumn.AutoFit
End Sub
5、這里需要注意的是,因?yàn)槭禽斎耄詫儆趩卧竦男薷牟僮鳌D敲次覀冊(cè)趖hisworkbook中就要對(duì)其單元格修改操作做定義。也就是選擇sheetchange。
6、在thisworkbook中設(shè)置的動(dòng)作不需要運(yùn)行可以直接生效,我們可以現(xiàn)在在i列輸入數(shù)據(jù),可以看到i列自動(dòng)調(diào)整了符合i列內(nèi)容最長內(nèi)容列寬。
相關(guān)推薦:
excel中怎么利用VBA制作一個(gè)登錄數(shù)據(jù)驗(yàn)證窗口?
excel怎么利用vba實(shí)現(xiàn)批量套打快遞單批量打印單據(jù)?
excel中怎么使用Vba批量刪除指定文件夾下的所有文件?
版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。