У Гэри есть рабочая тетрадь с двенадцатью рабочими листами, по одному на каждый месяц.

Он поместил информацию на этих листах так, чтобы она умещалась на его экране. В какой-то момент он открывает свою рабочую книгу и обнаруживает, что ширина столбцов за июнь увеличилась так, что все они не помещаются на его экране. Расширяются только столбцы за июнь, но высота строк на всех листах будет увеличена с 12,75 до 13,50. Если Гэри изменит размер всего обратно, чтобы оно еще раз соответствовало его экрану, все будет хорошо в течение недели или около того, а затем изменение размера произойдет снова.

Неясно, что может вызвать эту проблему, но есть несколько вещей, которые вы можете проверить. Если книга хранится в сети, где к ней могут получить доступ другие люди, возможно, изменение происходит, когда книга открыта у кого-то другого. Кроме того, если книга открыта на разных машинах, может случиться так, что другие машины, на которых она открыта, могут влиять на книгу, при условии, что на них установлены разные разрешения экрана или разные шрифты принтера.

Если вы не уверены в причине, возможно, лучшим решением будет создание макроса, который запускается автоматически при открытии книги. Этот макрос может просматривать рабочие листы и устанавливать ширину столбцов и высоту строк, которые вам нужны. Следующий макрос выполнит эти шаги:

Private Sub Workbook_Open()

Dim wSheet As Worksheet

For Each wSheet In Worksheets         ' Change range to reflect columns and rows you need to affect         With wSheet.Range("A1:A15")

.ColumnWidth = 12     ' Change to column width desired             .RowHeight = 13       ' Change to row height desired         End With     Next wSheet End Sub

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (8774) применим к Microsoft Excel 2007, 2010, 2013, 2016, 2019 и Excel в Office 365. Вы можете найти версию этого совета для старого интерфейса меню Excel здесь:

link: / excel-Random_Width_and_Height_Changes [Случайные изменения ширины и высоты].