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

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

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

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

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

代碼

Private Sub Worksheet_SelectionChange(ByVal Target As Range)Dim lZoom As LongDim lZoomDV As LongDim lDVType As LonglZoom = 100lZoomDV = 120lDVType = 0

Application.EnableEvents = FalseOn Error Resume NextlDVType = Target.Validation.Type

On Error GoTo errHandlerIf lDVType <> 3 ThenWith ActiveWindowIf .Zoom <> lZoom Then.Zoom = lZoomEnd IfEnd WithElseWith ActiveWindowIf .Zoom <> lZoomDV Then.Zoom = lZoomDVEnd IfEnd WithEnd If

exitHandler:Application.EnableEvents = TrueExit SuberrHandler:GoTo exitHandlerEnd Sub

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

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