Excel VBA:获取与FitToPageWide对应的缩放级别

我试图在Excel中build立一个循环遍历所有工作表的macros,并且基于最大的工作表,为所有工作表设置缩放级别,使它们都适合一个页面,但是具有相同的缩放比例(这是需要的打印)。

然而,我确定缩放级别,确保最大的页面适合1页宽度的麻烦。

当通过使用.PageSetup.FitToPagesWide = 1将工作表宽度设置为适合一个页面时, .PageSetup.Zoom属性会自动设置为FALSE。

将FitToPage属性重新设置为false,缩放级别与assembly到一个页面之前的缩放级别相同。

当手动设置表格使其适合一页宽时,Excel会显示与此相对应的缩放级别,但似乎无法在VBA中读取该表格。 有人可以帮我解决这个问题吗?