Страницы: 1
RSS
Увеличить строку чтобы штрих код остался без изменений
 
Всем привет
Возникла странная проблема.
Есть штрих-коды в ячейках. Штрих код сейчас очень близко друг к другую маркировку не порезать. Начинаю увеличивать высоту строк или ширину столбцов, но штрих-код увеличивается вместе с увеличением строк или столбцов. Каждый штрих-код вручную очень долго. Может есть универсальный вариант?
спасибо заранее
 
Привет
Запустите вот этот макрос, когда активен лист со штрих-кодами
Код
Sub MyShapes()
    Dim sh As Shape
    For Each sh In ActiveSheet.Shapes
        sh.Placement = xlMove
    Next
End Sub

Или выделите все объекты и поменяйте у них в Свойствах "Перемещать, но не изменять размеры"
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
Спасибо большое Вам
а что этот макрос собственно говоря делает? отделяет ячейки от изображения?
 
Циклом пробегает по штрих-кодам и устанавливает в свойствах флаг на "Перемещать, но не изменять размеры".
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
Интересно, спасибо Вам
Страницы: 1
Наверх