Приветствую всех. Особенно _Boroda_ т.к. в свое время Вы мне помогли с одной таблицей (надо было скрыть имена) в которой и был реализован данный макрос за что еще раз больше спасибо.
И вроде все хорошо работает, но я никак не мог понять, почему у меня в конечном итоге менялась область печати. Путем постепенного отсеивания выяснил, что после проигрывания вот этого макроса, область печати меняется с заданной мной на максимальную (там где введены какие-либо данные)
[vba]
Код
Private Sub SkrImen() For Each n_ In Me.Names n_.Visible = False Next n_ End Sub
[/vba]
Можно как-то это дело доработать или вставить еще какой кусок кода, чтоб область печати при любом раскладе была A20:D50 к примеру?
Приветствую всех. Особенно _Boroda_ т.к. в свое время Вы мне помогли с одной таблицей (надо было скрыть имена) в которой и был реализован данный макрос за что еще раз больше спасибо.
И вроде все хорошо работает, но я никак не мог понять, почему у меня в конечном итоге менялась область печати. Путем постепенного отсеивания выяснил, что после проигрывания вот этого макроса, область печати меняется с заданной мной на максимальную (там где введены какие-либо данные)
[vba]
Код
Private Sub SkrImen() For Each n_ In Me.Names n_.Visible = False Next n_ End Sub
[/vba]
Можно как-то это дело доработать или вставить еще какой кусок кода, чтоб область печати при любом раскладе была A20:D50 к примеру?heaven33rus
Ну да, это ж я писал не в VBA, а прямо на форуме. Да еще начальство над душой как всегда Еще и вместо End написал enf Короче, вот так должно быть [vba]
Код
Private Sub SkrImen() For Each n_ In Me.Names If n_.Name <> "Область_печати" Then n_.Visible = False End If Next n_ End Sub
[/vba]
Ну да, это ж я писал не в VBA, а прямо на форуме. Да еще начальство над душой как всегда Еще и вместо End написал enf Короче, вот так должно быть [vba]
Код
Private Sub SkrImen() For Each n_ In Me.Names If n_.Name <> "Область_печати" Then n_.Visible = False End If Next n_ End Sub
Не помогло. Область печати нормальная A20:D60, пока не скрываются имена. Область печати становится A1:AV104 - эта область содержащая какие-либо данные в моем случае ячейки закрашены. Если потом запустить макрос "показать имена" все становится на свои места. В диспетчере имен, имени Область_печати указан диапазон A20:D60
Может еще можно куда посмотреть? что за магия...
Не помогло. Область печати нормальная A20:D60, пока не скрываются имена. Область печати становится A1:AV104 - эта область содержащая какие-либо данные в моем случае ячейки закрашены. Если потом запустить макрос "показать имена" все становится на свои места. В диспетчере имен, имени Область_печати указан диапазон A20:D60
Может еще можно куда посмотреть? что за магия...heaven33rus
Сообщение отредактировал heaven33rus - Четверг, 14.06.2018, 09:36
Упихнул в 100 кб. Сам файл теперь ничего считать не может, но это сейчас не главное. Забыл сказать, что область печати меняется для случаев, когда печатаешь через ctrl+p, если печатать через кнопку внизу таблицы (макрос), то все естественно печатается хорошо.
Упихнул в 100 кб. Сам файл теперь ничего считать не может, но это сейчас не главное. Забыл сказать, что область печати меняется для случаев, когда печатаешь через ctrl+p, если печатать через кнопку внизу таблицы (макрос), то все естественно печатается хорошо.heaven33rus
Да, да, да!!! Работает. Не спряталось одно имя (Область_печати), ну да и ладно, видимо так надо... тут никто уже ничего не нахимичит. Спасибо большое!!!
Да, да, да!!! Работает. Не спряталось одно имя (Область_печати), ну да и ладно, видимо так надо... тут никто уже ничего не нахимичит. Спасибо большое!!!heaven33rus
Или оно есть, тогда будет область печати, или его нет, тогда не будет. Есть, конечно, вариант показывать его только перед самой печатью и после сразу же скрывать, но зачем?
Конечно не спряталось. Внимательно читайте второй пост
Или оно есть, тогда будет область печати, или его нет, тогда не будет. Есть, конечно, вариант показывать его только перед самой печатью и после сразу же скрывать, но зачем?_Boroda_