使EXCEL里數據有效性列表顯示得更大些的方法

使EXCEL里數據有效性列表顯示得更大些的方法

在使用excel時，當使用數據有效性創建下拉列表時，不能夠改變字體或字體大小。如果縮小工作表的尺寸，那么將難以閱讀列表中的項目。

要使列表中的文本看起來更大，可以使用VBA代碼，使得在選擇數據有效性單元格時增大工作表縮放尺寸設置，從而使數據有效性列表中的文本看起來更大。

下面的代碼在選擇數據有效性列表單元格時將工作表的尺寸縮放為120%。如果選擇的單元格中沒有設置數據有效性，那么工作表尺寸縮放為100%。

代碼

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim lZoom As Long Dim lZoomDV As Long Dim lDVType As Long lZoom = 100 lZoomDV = 120 lDVType = 0 Application.EnableEvents = False On Error Resume Next lDVType = Target.Validation.Type On Error GoTo errHandler If lDVType <> 3 Then With ActiveWindow If .Zoom <> lZoom Then .Zoom = lZoom End If End With Else With ActiveWindow If .Zoom <> lZoomDV Then .Zoom = lZoomDV End If End With End IfexitHandler: Application.EnableEvents = True Exit SuberrHandler: GoTo exitHandlerEnd Sub

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。