Следуйте инструкциям в видео ниже, чтобы узнать, как установить наш сайт как веб-приложение на главный экран вашего устройства.
Примечание: Эта функция может быть недоступна в некоторых браузерах.
Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нем неправильно. Необходимо обновить браузер или попробовать использовать другой.
Для этого существуют договоры. Или вы копираст и таким образом надеетесь застолбить за собой права на изображения, чтобы потом таскать в суд всех, кто по неосторожности перепостит эту картинку или пошлёт в мессенджере бабушке?
Мегамозг предложил
Option Explicit
Sub FixedMacro()
Dim oScript As Object
If AcrossLayers Then
' Попытка использовать CorelScript (совместимость)
On Error Resume Next
Set oScript = Application.CorelScript
If Not oScript Is Nothing Then...
Первый вариант рабочий, который не учитывает, где закончился рез горизонтальных. Это уже потом я что-то наговноляпил. ;)
Но не нужен он не по этой причине.
Будем честны, большинство в отрасли слабо понимает, что такое ps. А уж залезть в него руками, что-то там поправить и как-то потом...
Кажись понял, где накосячил.
А моя версия нужна кому-нибудь? Дорабатывать?
Кстати, если возврат к парковке в конце реза считать порожняком, то требование начать вертикальные резы с того угла, где закончили горизонтальные уже на кажется таким разумным. ;)
На данном сайте используются cookie-файлы, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших cookie-файлов.