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

excel數據有效性 使EXCEL里數據有效性列表顯示得更大些的方法，今天給大家帶來的這篇文章主要講的是，excel數據有效性的相關知識，或許有很多人都曾被這個問題困擾，但是當你看完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 = 0Application.EnableEvents = FalseOn Error Resume NextlDVType = Target.Validation.TypeOn Error GoTo errHandlerIf lDVType <> 3 ThenWith ActiveWindowIf .Zoom <> lZoom Then.Zoom = lZoomEnd IfEnd WithElseWith ActiveWindowIf .Zoom <> lZoomDV Then.Zoom = lZoomDVEnd IfEnd WithEnd IfexitHandler:Application.EnableEvents = TrueExit SuberrHandler:GoTo exitHandlerEnd Sub