如何将图表最小比例设置为特定值

Question

如何将最小刻度设置为特定单元格值，单元格中的位置不是常量。 即：如果最小比例必须设置为45，如果值45不总是出现在单元格D14中？

.Axes(xlCategory, xlPrimary).MinimumScale = 45 ' Constant value

Answer 1

要将最小刻度设置为范围中的最小值，请使用MIN功能。现在，由于工作簿中没有图表但在您打开的csv文件中的范围，您必须完全限定范围

为此，声明一个范围对象，然后将其设置为相关范围

Dim Rng As Range

'
'~~> Rest of your code
'
Set wsTemp = wbTemp.Sheets(1)
Set Rng = wsTemp.Range("D3:D30")

'
'~~> Rest of your code
'
.Axes(xlCategory, xlPrimary).MinimumScale = Application.WorksheetFunction.Min(Rng)

HTH