FAQ в категории Прочие

Содержание
  1. Подсчет количества элементов
  2. Изменение размеров рисунка
  3. Вычисление длин непрямых линий
  4. Перенос сканированного чертежа в VISIO
  5. Как добавить к объекту дополнительные точки привязки?
  6. Есть ли готовые библиотеки элементов, соответствующие Российскому ГОСТу?
  7. Подскажите, чем прочитать расширение vsd
  8. Как определить какая фигура данный Shape?
  9. Как сделать замкнутый объект из линий?
  10. Как запаролить документ?
  11. Как сделать, чтобы шейп попадал на нужный слой?
  12. Копирование и вставка в новую страницу в Visio 2002
  13. Почему виснет Visio?
  14. Почему пропадают русские буквы?
  15. Где настроить толщину соединительной линии?
  16. Как распечатать плакат А1?
  17. Куда положить новые шаблоны?
  18. Как установить положение текста у шейпа?
  19. Как увеличить размер мостиков на пересекающихся соединительных линиях?
  20. Можно ли в одном документе иметь листы с разной ориентацией?
  21. Как по двойному клику на объекте вызывать какой-нибудь исполняемый модуль?
  22. Как создать таблицу?
  23. Как можно защитить фон от изменений?
  24. Можно ли оставить доступ на редактирование всем страницам кроме фона?
  25. Почему точки соединения не всегда соединяются?
  26. Как снять ограничение в масштабе?
  27. Как снять ограничение в масштабе 2?
  28. Как подсчитать длины всех видимых линий?
  29. Как в фильтре указать нужный слой?
  30. Каким образом можно распечатать поля формата А4(А3) 5 мм от края?
  31. Как уменьшить шаблоны?
  32. Как запретить вытаскивание объекта из группы?
  33. Как распечатать все листы чертежа сразу если они имеют разную ориентацию?
  34. Почему в PostScript линии становятся плохими?
  35. Как редактировать в Visio 2002 файлы MS Excel?
  36. Можно ли создать самостоятельно линию типа пунктирной?
  37. Как сделать так, что бы при изменении размера шейпа, изменялся бы и размер текста?
  38. Как создать шаблон двухцветных линий?
  39. Подскажите, пожалуйста, как удалить макрос?
  40. Как к шейпам из Power Point добавить точки соединения?
  41. Как избавиться от Custom Properties на веб-странице?
  42. Как сделать, чтобы ссылки открывались в новом окне?
  43. Как изменить размер таблицы в ER модели?
  44. Как увидеть пользовательские свойства, просто щелкнув по страничке?
  45. Как увидеть пользовательские свойства при движении мыши над шейпом?
  46. Как убрать искажение текста?
  47. Как в Visio 2013 увеличить контраст сетки?
  48. Как найти аддоны в Visio 2003?
  49. Что нового в Visio 2013 для разработчика?
  50. Как установить Visio только для 1-го пользователя?
  51. Как установить только для одного пользователя?
  52. Размытие изображения в Visio 2013
  53. Как в Visio Pro 2013 отключить автопривязку?

Подсчет количества элементов

Имеется рисунок с большим количеством элементов порожденных 10-20 мастерами. Требуется посчитать количество элементов порожденных конкретным мастером. При добавлении поля в произвольный sheet функция ID считает общее количество всех sheet на странице включая саму себя. Может есть способ указать в ID имя конкретного мастера.

Буду рад, если кто-то меня опровергнет, но кажется на уровне ShapeSheet эта задача не имеет решения, так как в ячейке можно дать любую ссылку, но нельзя последовательно опросить множество Shape. И функция ID дает не количество, а номер последнего Shape, который только иногда совпадает с количеством.

Зато на программном уровне задача решается очень легко. Например:

— рисуем на листе единственный квадрат (для вывода результатов);

— вводим в документ макрос вот такого вида:

Sub ttt()

s1 = «»

For i = 1 To ActivePage.Shapes.Count

s1 = s1 + «Name= » + ActivePage.Shapes(i).Name

s1 = s1 + » Id= » + Str(ActivePage.Shapes(i).ID) + vbCrLf

Next

ActivePage.Shapes(1).Text = s1

End Sub

— и подцепляем его к нашему квадрату через Format/Behavior/Double-Click/RunMacro/TchisDocument.ttt

Теперь при двойном щелчке по этому квадрату наша функция будет последовательно опрашивать все имеющиеся на листе Shapes и писать в качестве текста их имена и ID. На этот лист можно набросать много мастеров или нарисовать Shape и двойным щелчком по первому квадрату обновить их список.

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

Этот небольшой пример можно загрузить с visio.artberg.ru/store/podchet.zip

Изменение размеров рисунка

Нарисовал планировку этажа здания. Теперь нужно весь рисунок увеличить в размерах. После его растягивания некоторые объекты остаются на месте, линии искажаются и т.д.

Как сделать грамотно увеличение? Не видя самого рисунка, точно не скажешь. Но есть варианты:

1. Если все объекты нарисованы, а не перетащены из трафарета, то нужно объединить их в группу и растягивать всю группу.

Это может не работать, если свойство Format/Behavior/Resize behavior каких-то объектов установлено не в Scale with group (изменяться с группой), а в Reposition only (перемещаться без масштабирования). Кстати, по умолчанию устанавливается Use group’s setting, что тоже может подойти, но тогда поведение будет зависеть от соответствующей установки в группе.

2. То есть нужно бы установить у всех объектов Resize behavior в состояние Scale with group.

Это тоже может не помочь, если в каких-то объектах установлены блокировки, то есть в Format/Protection установлены галочки на блокировку изменения каких-то параметров.

3. То есть нужно снять лишние блокировки.

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

4. Не растягивая рисунок пользоваться масштабированием.

Если все сконцентрировалось, например, в одном углу рисунка, можно сначала обрезать лист так, чтобы он подогнался под заполненную область (File/Page Setup/Page Size установить галочку в Size to fit drawing contents), а потом разместить этот лист на полном печатном листе. (File/Page Setup/Setup — галочки Center horizontally и Center vertically центрируют изображение, а установка Fit to 1 sheet(s) across by 1 sheet(s) down максимально растянет рисунок во весь печатный лист). Можно воспользоваться и процентным масштабированием.

Вычисление длин непрямых линий

Требуется вычислить длину произвольной линии (хотя бы дуги). Как это сделать? Есть способ узнать длину сколь угодно кривой линии и её площадь. Но хлопотный.

Сохрани файл в формате AutoCAD. Открой его AutoCAD-ом отметь нужный объект и набери команду LIST (AutoCAD имеет свою командную строку). В окне AREA площадь, а LENGTH длина линии либо периметр если объект замкнут. Для снятия отметок дави ESC.

Если при открытии файла на экране пусто а в заголовке окна указано имя файла, значит чертеж находится за пределами экрана. Выбери VIEW-ZOOM-ALL увидишь весь чертеж. При нажатом Control колесико мыши приближает или удаляет.

ВНИМАНИЕ: при создании чертежа в VISIO укажи правильно масштаб и единици измерения.

Перенос сканированного чертежа в VISIO

Существуют ли способы перенесения сканированного изображения чертежа в Visio?

Ответ 1. Насколько я знаю, прямого переноса нет. Я сканирую потом картинку помещаю либо на задний план или на нижележащий слой и на верхнем рисую.

Ответ 2. Ну, с помощью третьих программ такая возможность есть. Вот сегодня сосканировал картинку. Vextractor 1.60 (это, наверно, самый маленький векторизатор) перевел ее в вектора и записал в формате dxf. Visio этот формат напрямую не понял, хотя должен бы. Тогда прочитал его в AutoCAD и записал уже в формате dwg. Этот формат Visio заглотил очень легко.

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

Векторизаторы:

Easy Trace PRO http://www.easytrace.com/

MapEdit http://www.easytrace.com/

R2V for Windows www.ablesw.com/r2v/index.html

TracTrix 2000 www.trixsystems.com/tractrix.html

IRAS/B www.intergraph.com/imaging/raster_prods.asp

GTXRaster R2V www.gtx.com/products/detail.asp?id=3

Image Series http://www.hsgt.com/

VP HybridCAD http://www.hybridcad.com/

Draftsman Products www.arborimage.com/aihome.htm

Vectory www.graphikon.com/english/vectory.html

UCLID Software http://www.uclid.com/

Vectory вот довольно сильно хвалят. Только все это большое и какое-то дорогое. Так что для редкого применения, действительно, лучший способ — поместить сканированную картинку в background и прорисовать сверху вручную.

Как добавить к объекту дополнительные точки привязки?

Цитирую толстую книжку, которая лежит на сайте Visio.artberg.ru в двух видах: html и для печати.

Создание и удаление точек связи

…Для добавления новой точки связи на шейпе:

  1. Выберите шейп.
  2. В меню средств связи выберите точку связи. (Connection Point Tool)
  3. Придерживайте клавишу Ctrl и щелкните там, где нужно добавить точку связи.

Вы можете щелкнуть на периметре шейпа, внутри или вне его, Visio добавляет в этом месте значок X, чтобы показать новую точку связи.

Можно только добавить, что при этом в меню View должен быть отмечен галочкой пункт Connection Points, а то Visio отказывается их добавлять при выключенном отображении.

Есть ли готовые библиотеки элементов, соответствующие Российскому ГОСТу?

И есть ли готовые библиотеки элементов (диоды, сопротивления, транзисторы &…) соответствующие Российскому ГОСТ’у? Если да, интересен линк aka url.

Есть. Но у всех есть недостатки. Известные библиотеки рисовались для себя, то есть они включают только то что понадобилось автору. Ну и по поводу соответствия ГОСТу гарантий никто не дает (в общем-то это характерно для всего бесплатного).

Несколько трафаретов есть здесь — http://visio.artberg.ru/loading.htm, еще несколько — на http://oprmike.narod.ru/mvisio/mvisio.html.

Подскажите, чем прочитать расширение vsd

Подскажите чем прочитать расширение vsd если нет этой самой программы MS Visio, может какой-нибудь просмоторщик просматривает?

Файлы vsd читаются просмотрщиком vViewer, который скачивается бесплатно с Microsoft. Объем порядка 4 Мб. Устанавливается на W98 и старше. Работает как довесок к IE5 и старше. Смотрит файлы Visio5, 2000, 2002.

http://download.microsoft.com/download/VisioStandard2002/vviewer/2002/W98NT42KMeXP/EN-US/vviewer.exe

Как определить какая фигура данный Shape?

Мне хотелось бы знать можно ли определить какая фигура данный Shape в схеме, т.е. линия, круг, квадрат или еще что-то, и если можно то как?

Два варианта. Если шейп образован от какого-то мастер-шейпа (перетянут из шаблона), то его можно распознать по имени. Если он нарисован, то можно попытаться разобраться через секцию Geometry шейп-листа. Прямоугольник там представлен строкой MoveTo и четырьмя строками LineTo. Эллипс — только одной строкой Ellipse и т.д. То есть можно взять все фигуры, которые Вы собираетесь различать, посмотреть особенности данной секции в их шейп-листах, а потом при работе проверять наличие определенных ячеек в шейп-листе. В принципе можно даже выбирать из них значения и оперировать ими.

Как сделать замкнутый объект из линий?

Когда я рисую сразу замкнутый объект из линий (например многоугольник) я его могу красиво залить любым цветом (он замкнут), а вот когда я хочу составить этот многоугольник из набора углов, я заливку применить не могу. Думаю объект не замкнут.

Как мне соединить сложные кривые (ломанные) для получения якобы замкнутой фигуры и, выделив всё свое произведение, применить fill? Выделите нужные линии и примените операцию Shape/Operations/Fragment.

Как запаролить документ?

Хочу запаролить файл Visio, чтобы он открывался только для чтения (просмотра). Как?

Защита в Visio осуществляется в 2 этапа: сначала защищаются нужные элементы (в том числе и все), затем включается защита на рисунок. Например, вам нужно запретить все, что только можно, то делается это так.

1. На листе рисунка нажимаете Ctrl-A (или Edit/Select All), потом в меню Format/Protection нажимаете кнопку All и OK. При этом шейпы защищаются от всевозможных действий с ними. Но эту защиту еще всегда можно снять.

2. Открываете Drawing Explorer (меню View/Drawing Explorer Window). В окошке показывается структура вашего документа. Щелкаете правой кнопкой по верхнему уровню (… .vsd) и выбираете из меню Protect Document. Опять же ставите галочки во всех окошках, вводите пароль (не забудьте записать или запомнить) и жмете OK.

Теперь ваш рисунок стал неуправляемым — можно только смотреть на него, но ничего не изменишь. Спокойно сохраняйте его в файл и отдавайте кому хотите. Чтобы вернуть рисунок в прежнее состояние, нужно опять вызвать Drawing Explorer, нажать на Unprotect Document и ввести пароль.

Естественно, возможна частичная защита (если вы установите не все галочки, а только нужные). Механизм очень гибкий — то есть защищается не просто файл, а нужные свойства нужных объектов.

P.S. Это было сказано для Visio 2002. Для других версий пункты меню могут отличаться, но принцип тот же.

Как сделать, чтобы шейп попадал на нужный слой?

Может подскажет кто, как сделать чтобы шейп попадал на нужный слой автоматом. Пока что-то не могу допетрить…

Шейпы автоматически попадают на активный слой. Активным слой делается через View/Layer Properties и галочка Active.

Можно привязать мастер к определенному слою еще в трафарете (Edit Master/Format/Layer). Тогда при перетаскивании создаваемые экземпляры будут автоматически попадать на этот слой. Если слоя не будет в момент перетаскивания, он автоматически создастся. Естественно, функция Edit Master недоступна на трафаретах, открытых только для чтения.

Копирование и вставка в новую страницу в Visio 2002

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

Как победить это безобразие, чтобы все было на своих местах? И правда летает! Мне понравилось!

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

Если копировать все вместе с направляющими, выделив это по ctrl-A, то все копируется нормально и ничего не летает.

Способ борьбы можно построить на основе того, что при смещении шейпа некоторые расчетные формулы меняются на числовые значения. То есть если выделить все нужные шейпы (в Вашем случае это правая половина листа) и клавишами сместить всю эту кучу на шаг вправо, а потом на шаг влево, то рисунок внешне не изменится. Но на самом деле вместо формул в нем будут уже числа. Пропадет и мешающая привязка. Если теперь скопировать несколько шейпов на другую страницу, то они уже не улетят.

Почему виснет Visio?

При первом же запуске Visio 2002 появляется прогресс-индикатор с информацией о кэшировании каталогов и виснет. Что делать?

Запусти Visio с параметром -r, С:\Program Files\Office10\Visio.exe -r либо -regserver. Помогает!

Почему пропадают русские буквы?

Здравствуйте Друзья! Подскажите пожалуйста как решить проблему:

Я работая в visio2000, составил схемку и надписи сделал на русском языке, шрифтом Arial. При экспорте в картинку JPG у меня получаются лишь шейпы и надписей — нет. Пишу английскими буквами все — OK! Что делать?

Скорее всего это ошибка в Visio2000. По моим сведениям никому не удалось экспортировать из него русский текст в растровые форматы: gif, jpg,… В Visio 2002 все нормально.

Где настроить толщину соединительной линии?

Здравствуйте! Не подскажет ли кто-нибудь, где настроить чтобы толщина(weight) содинительной линии по умолчанию была 5pt. Очень уж большие ломы, у каждой линии толщину менять

Стиль надо менять. Format / Define Styles кнопка Line — Weight. Это для стиля Connector. А если совсем сильно, то стиль надо менять не в рисунке, а в шаблоне. Тогда будет действовать на все рисунки, создаваемые в этом шаблоне.

Как распечатать плакат А1?

Есть пара плакатов в размере А1, т.е. можно распечатать несколько А4, потом склеить и получится плакат, НО мне нужны маленькие копии этих документов, т.е. на А4 весь плакат, как сделать, ОЧЕНЬ нужно, помогите чайнику!

Нужно в меню File/Page Setup на вкладке Print Setup поставить галочку в окошке Fit и в подчиненных окошках установить обе единички. Paper size на этой вкладке должна быть установлена в A4. Для Visio это будет приказом любой рисунок уместить на листе A4. Естественно, ориентацию тоже надо установить правильно.

Куда положить новые шаблоны?

Помогите, пожалуйста. Нужно подцепить новые шаблоны. Куда их нужно кидать и как подцепить? Уже были попытки. Visio пишет что он не может открыть их или это не Visio файлы. Help!!!!!!!!!

В Tools/Options вкладка File Paths в строке Templates должен быть прописан путь, из которого Visio по умолчанию подбирает список имеющихся шаблонов. Туда и нужно кидать.

А в принципе открыть рисунок по шаблону можно из любого места. Достаточно просто щелкнуть по шаблону и откроется рисунок Visio, основанный на этом шаблоне. И если при этом Visio ругается, значит действительно шаблон не подходит, например, не от той версии или просто сломанный.

Как установить положение текста у шейпа?

Не понятно, как установить положение текста у шейпа. Поясню. Создал фигуру — скажем черный квадрат. При двойном щелчке пользователь должет иметь возможность вводить название для этой фигурины. Но название должно размещаться НЕ в центре фигуры, а внизу нее. Как мне перенести точку, куда текст вводится. И еще. По умолчанию, текстовый объект огромный! На весь ШЭЙП.

Как поменять размер текстового блока и разместить его выше или ниже объекта?? Это о чем разговор, о программном управлении или ручном?

Если ручное, то инструментом Text Block Tool (находится под Text Tool) тащите текстовый блок, куда нужно. Им же и размеры меняются.

Если программное, то нужно воздействовать на секцию Text Transform. Ячейки TxtPinX и TxtPinY управляют положением, а TxtWidth и Txt Height — размерами текстового блока.

Как увеличить размер мостиков на пересекающихся соединительных линиях?

При увеличении толщины линии, или использовании штрих пунктирных линий теряется информативность пересечений. Джампов (мостиков или разрывов) не видно. Я нашёл регулятор, но там не больше «7 sides» что явно не достаточно.

Ну, не совсем так. То, что Вы нашли, задает конфигурацию пересечения: дуга, разрыв, прямоугольник, и ломаные с разным числом сегментов. 7 sides — это пересечение оформляется «семисегментником», что уже очень похоже на дугу.

А вот чуть правее — Horisontal Size и Vertical Size — это уже действительно размер. Движком он меняется от 0 до 1. Это множитель, скорее всего к величине масштабной сетки Fine. В принципе вручную туда можно ввести значение и больше 1, например 4. Это срабатывает, но за корректность такой операции не ручаюсь.

Можно ли в одном документе иметь листы с разной ориентацией?

Можно ли в одном документе иметь листы с разной ориентацией (портрет и ланшафт), или как быстро сменить ориентацию листа?

Можно. Когда Вы вставляете новую страницу, доступна вкладка Page Setup. Ставьте там любые размеры и ориентацию. Страницы будут разными.

Кроме того, страница, как и шейп имеет свой ShapeSheet, где в секции PageProperties можно задавать размеры листа. То есть, написав простенький макрос, можно в любое время быстро изменить размеры.

Как по двойному клику на объекте вызывать какой-нибудь исполняемый модуль?

Возникла не совсем обычная для меня задачка. Есть схема нарисованная в Visio 2000, на схеме есть только 2 вида объектов — «Dynamic Connector» и «Rectangle». У каждого объекта есть уникальное имя. Так вот, не подскажет ли кто как по двойному клику на объекте вызывать какой-нибудь исполняемый модуль с передачей в него имени этого объекта?

Вариант с написанием макросов для каждого объекта не подходит. Буду рад любым полезным советам. Имя можно не передавать по двойному клику, а вычислять в макросе через объект Selection.

Sub ttt()

MsgBox ActiveWindow.Selection(1).Name

End Sub

Как создать таблицу?

Как создать таблицу, чтобы прямо на ней менять размеры столбцов и строчек, как в Excel? Word? Прямой аналог сделать трудно. Простейший прием — группировка нескольких прямоугольников. Это даст возможность только менять один размер у всех сразу.

Еще один прием — тот, который использован в мастер-шейпе «15 ruled column» из трафарета «Annotations». Тут одним движением можно изменить высоту всех строчек. В принципе, пользуясь таким методом можно запрограммировать свой шейп, чтобы получить некоторый аналог таблицы. Но стоит ли овчинка выделки?

Как можно защитить фон от изменений?

Cобственно, 2 вопроса:

1) Имя Фона как и любой страницы документа Визио отражается на нижней вкладке. Поэтому любой user может перейти и посмотреть фон. В связи с этим, можно ли как-то скрыть эту вкладку?

2) С др. стороны открывать документ только для чтения — слишком сильно.

Можно ли оставить доступ на редактирование всем страницам кроме фона?

Если бы говорили об слоях (Layer) — там все понятно — каждому слою индивидуально назначен доступ на редактирование. А здесь? Можно, конечно, искусственно создать на фоновой странице слой, перегнать туда все шейпы фона и блокировать/разблокировать этот слой. Нельзя ли проще?

Проще вроде получается, если на вкладке Protect Document установить галочку Backgrounds. Эта галочка «Prevents users from deleting or editing background pages» — то есть как раз то, что Вам нужно. Причем и ярлычок от страницы фона перестает отображаться (правда, кажется не сразу после применения защиты, а только после перезагрузки документа).

Почему точки соединения не всегда соединяются?

Например: три линии, объединенные в группу (на каждой есть точки соединения) не соединяются с кругом (на котором также есть точки соединения).

Это происходит из-за того, что вы можете соединять напрямую (не нарушая структуру группы) только разные точки соединения. При указании точки соединения Вы также указываете тип этой точки (внутрь(inside) — это крестик или наружу(outside) — это точка) и если Вы соединяете точки внутрь-внутрь (inside-inside), то соединения не произойдет. Если будет соединяться тип наружу-внутрь (outside-inside), то соединение произойдет и объект outside будет привязан и inside.

Также можно использовать универсальный тип. Привязан ли объект к фигуре, можно определить визуально по присоединяемой фигуре (группе в вашем случае), если объект присоединился это можно увидеть по средним красным маркерам фигуры. Только надо понимать, что есть точки соединения, которые принадлежат всей группе, и те, которые принадлежат фигурам внутри группы. Поэтому надо соединять точку группы, состоящей из 3-х прямых тип Outside с точкой круга тип Inside. И все соединится.

Как снять ограничение в масштабе?

Кто знает, как можно снять ограничение в масштабе рисунка при работе с большими страницами (больше 10 метров)

Вы говорите о приближении большого рисунка и рисовании мелких частей? Он ограничен лишь 2915%. Тогда сначала нарисуйте прямоугольник по размеру листа (реального), сделайте его прозрачным. Потом в настройках страницы введите в Page Size, Custom size 1см на 1см. И приближайте вплоть до 216344% (можно редактировать объект 0,1 мм при всей длине листа в 20 метров). Причем толщина линии от этого не изменится. Потом когда закончите редактирование, в Page Size поставьте Same as printer paper size.

Как снять ограничение в масштабе 2?

Дело в том, что когда ставишь страницу 1 на 1 , как вы советуете, то пропадает сетка на всём рисунке (остается только в пределах страницы) и с помощью клавиш курсора можно перемещать объекты только вниз и влево.

Тогда просто надо внести изменения в реестр (Если у вас Visio 2000). Создайте текстовый файл и скопируйте в него:

REGEDIT4

[HKEY_CURRENT_USER\Software\Visio\Visio 2000\application]

«GridNonPage»=»1»

Далее переименуйте его в типа «Сетка.reg» и запустите. Смените цвет фона на цвет листа и все. Когда сетка более не будет нужна, просто смените 1 на 0 в файле.

Если для Visio 2002. То внести в файл надо:

REGEDIT4

[HKEY_CURRENT_USER\Software\Microsoft\Visio\application]

«GridNonPage»=»1»

Остальное все так же…

Как подсчитать длины всех видимых линий?

Есть ли в Visio 2002 встроенная функция или кто может макрос выслать. Задача такая — проект сети, убираю стены, двери и т.д., оставляю только короба определенного сечения на рабочем листе и хотелось бы подсчитать длины всех видимых линий (точнее просто сумму длин). Вручную считать долго и можно ошибиться, поэтому процесс нужно автоматизировать.

Макроса нет, но алгоритм для его построения представляется довольно легко. Только нужные короба надо рисовать одним типом шейпа (линии), чтобы он выделялся по имени, а стирать все остальное изображение не обязательно.

Перебирается вся коллекция шейпов на рисунке, выбираются для обсчета только нужные шейпы. В этих шейпах в секции Geometry описана вся конфигурация линии (даже если она ломанная, только круглые не годятся). Перебираются строки секции и складываются длины, высчитываемые по двум координатам. Обсчитанные шейпы красятся в какой-нибудь цвет, чтобы глазом было заметно, не пропустил ли чего. Пропуски могут быть, если линии были сгруппированы, тогда их надо будет разгруппировать и повторить процесс или макрос сделать похитрее, чтобы в группу залезал. Потом останется только домножить на масштабы и все.

Вариант 2. Если все нужные линии нарисованы не ломанными, а просто отрезками линий, то можно воспользоваться Tools / Report / Shape Inventory. Отчет вывести в Excel, суммировать Width и домножить на отношение масштабов. Только здесь нельзя подкрасить обсчитанное, придется верить на слово :).

Добавка. Может быть даже проще не по именам ориентироваться, а располагать эти и только эти линии на одном слое. Тогда просто в фильтре указывается этот слой.

Как в фильтре указать нужный слой?

Как в фильтре указать нужный слой (все элементы находятся в разных слоях — узкий короб, широкий, лоток, розетка и т.д.). Допустим, оставил на листе нужный слой (либо выделил необходимые элементы и «инструменты/отчет/новый/текущие выбранные фигуры/Window width/промежуточные суммы (ставлю на всякий случай все галки)/финиш. Далее открываю екселем полученный отчет и вижу много полей, но результатов похожих на реальные в чертеже (даже по одному конкретному отрезку) нет, хоть с учетом перемножения на масштаб хоть без этого (точность 4). И не понятно значение фразы /VisioRptDefField/@SummaryTypes (честно сказать с английским я не очень, а тут еще сокращения).

В общем не получается у меня добиться результата — наверное я что-то не правильно делаю, поправьте меня если не трудно. Принцип я понял: надо средствами Visio выделить нужные мне объекты и получить по ним характеристики (в том числе и длин) каждого отдельно взятого объекта и далее эту таблицу перенести например в ексель и банально просуммировать данные из нужного столбца, а далее уже масштаб и все. Но как получить длины (особенно с моим плохим знанием английского) отрезков — я не знаю.

На листе может оставаться все. Достаточно того, что Узкий Короб будет в отдельном слое. Делаем Tools/Report и щелкаем New. Текущие выбранные фигуры — не очень хорошо. Лучше взять чуть повыше — Shapes on the Current Page (у Вас это будет что-то типа — фигуры на текущей странице).

А теперь нажимаем кнопку справа Limit Selection. Ее могли перевести как Условия Выбора, Ограничение Выбора или что-то похожее. В окошке Property (Свойства) выбираем , правее =, в самом правом — вводите имя нужного слоя. Нажимаете Add (Добавить), потом OK.

Вот только теперь давите Next (Далее или что-то там), ставите те галочки, которые Вы хотите видеть в отчете. Главное, чтобы была галочка у Width. На следующем экране можно просто нажать Next — не интересный экран.

Потом будет галочка, где сохранить эту конфигурацию — в рисунке или в отдельном файле. Выбираете, например, в рисунке и нажимаете Finish. Попадаете опять в окошко со списком. Причем имя только что подготовленного отчета уже селектировано. Остается его только выполнить. Жмете Run или Выполнить.

Оно еще спросит в каком формате и куда записать результат, но тут уже никуда не свернешь. Остается только найти результат там, куда скажете, и посмотреть его.

Каким образом можно распечатать поля формата А4(А3) 5 мм от края?

Вопрос новичка. Каким образом можно распечатать поля формата А4 (А3) 5 мм от края листа (размер полей в установках печати не убирается ниже определенных (видимо принтером значений)).

Можно, например, увеличить поля до 6.5 мм (или этих определенных значений) на самом рисунке (на глаз 5 мм или 6.5 от края не особо различить). Либо найти принтер способный печатать без полей. В 5 мм от края листа не все лазерные принтеры умеют печатать. 8(

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

Теперь, посылая чертеж на печать, придется чуть поизвращаться: когда лист А4, на котором распечатывается чертеж, чуть затянется в принтер, следует подложить еще один лист. Пусть наше печатающее устройство думает, что ему подсовывают более длинный лист Legal. По такой системе можно поля делать хоть 1 мм.

Но, честно говоря, такая маятня уже никому не нужна, разве что какому-нибудь закостенелому преподавателю старой формации, который не знает, что современные ГОСТы учитывают применение компьютерной техники и позволяют делать поля чертежей большими, чем 5 мм.

Как уменьшить шаблоны?

Мне нужно на листе А4 нарисовать план дома, но некоторые шаблоны такие как лестницы очень большие, как их сделать меньше?

Варианты следующие:

  1. Можно увеличить масштаб страницы и рисовать все в натуральную величину.
  2. Нажать на лестнице правой кнопкой мыши и выбрать нижнее меню «Properties» и «подогнать» размеры под лист.
  3. Сначала подогнать под реальные соотношения сторон. Скопировать в буфер. Далее сделать специальную вставку. Edit>Paste Special. и выбрать Enhanced metafile и уменьшить до нужных размеров.

Как запретить вытаскивание объекта из группы?

В Visio 2002, несмотря на то, что элементы сгруппированы, из группы можно спокойно мышкой вытащить объект. Его контрольные точки при этом в виде зеленого квадрата с крестиком. Как это убрать?

Выполнить одно из следующих действий в Visio 2002 (хотя то же самое может работать и в Visio 5):

  1. Выбрать группу и в меню выбрать Format>Behavior и в разделе Group properties выбрать Selction: Group Only
  2. Выбрать группу и в меню ShapeSheet группы в разделе Group properties в ячейке Select Mode выставить «0».

Как распечатать все листы чертежа сразу если они имеют разную ориентацию?

1. Можно сделать, это повернуть часть листов.

2. Вот, например, принтер LJ6L, листы берем A4. Делаем в документе несколько одинаковых листов.

По умолчанию в File / Page Setup / Page Size они стоят Same as printer… и в таком состоянии действительно переориентируются только все вместе. А если поставить на каждом листе Pre-defined Size: A4, а потом синхронно для нужных листов менять ориентацию и на Page Size и на Print Setup, то можно получить листы разной ориентации и распечатываются они нормально.

Почему в PostScript линии становятся плохими?

При сохранении в PostScript в VisioXP, все линии какие-то ломаные (хорошо заметно на окружностях). В Visio 5 такой проблемы не было. Помоги, кто чем может.

Эта проблема «графического движка» Visio 2002. Microsoft официально признала этот «баг». Подробности здесь — http://support.microsoft.com/default.aspx?scid=kb;en-us;293985

Как вариант решения можно сохранить чертеж в Visio 5 формате и в Visio 5 сохранить в *.ps. Также можно сохранить в векторном формате и сторонней программой сохранить в PostScript (Corel например). Сервис-Пак для Visio 2002 эту проблему не исправляет. Установка PostScript Printer’а, кстати, тоже не помогает. Или используйте Visio 2000.

Как редактировать в Visio 2002 файлы MS Excel?

Помогите, пожалуйста — можно ли в Visio 2002 каким либо образом вставлять файлы из MS Excel, чтобы их ВПОСЛЕДСТВИИ можно было редактировать и они бы никуда не уезжали, в 2000 это было возможно, в 2002 не получается. Это принципиально решаемо или нет?

Вставляйте файлы Excel сохраненные в формате Excel5.0/95. Только так Visio 2002 работает нормально с связанными таблицами Excel.

Можно ли создать самостоятельно линию типа пунктирной?

При использовании встроенных линий у меня возникла проблема — при масштабировании пунктирной линии меняется не только толщина линии, но и расстояние между пунктирами внутри линии. Подскажите, пожалуйста, можно ли создать самостоятельно линию типа пунктирной, и чтобы она вела себя как обычная линия. То есть при изменении ее длины она вела бы себя как встроенная пунктирная линия, а при изменении масштаба, расстояние между пунктирными черточками внутри линии не изменялось.

Дело в том, что мне необходимо выполнить часть линий пунктиром с определенным интервалом между пунктирными черточками (требование ГОСТ). Толщина линии должна быть 1 мм. При такой толщине линии расстояние между черточками не соответствует необходимому расстоянию. Варьировать этим расстоянием можно только меняя толщину линии или выбирать другую линию (тоже пунктирную).

Но на практике мне не удалось подобрать необходимый размер. К тому же есть необходимость в пунктирной линии, которой нет в списке VISIO. Поэтому и возник вопрос, как, либо добавить в существующий список новый тип линии, либо создать новый шейп со свойствами стандартных линий из списка.

Необходимо просто создать новый стиль узора линии. Делается это так:

  1. В окне Drawing Explorer(Обозреватель чертежа) выбрать пункт Line pattern (Узоры линии) и нажав правой кн. мыши выбрать пункт Create…(Создать)
  2. В появившемся окне указать Имя (123, к примеру). Нажать на самую левую картинку и на ОК (галочку не ставить!).
  3. Далее выбираем только что созданный узор, нажимаем правой кн. мыши и выбираем Edit Pattern (Изменить узор)
  4. В открывшемся окне чертим, к примеру 1 черный прямоугольник размерами 1мм Х 10мм, через 10 мм правее него, 2-й черный прямоугольник с размерами 1мм Х 20 мм(это не опечатка), и 3-й, еще правее, с размерами 1мм Х 10мм. Группируем их, закрываем.
  5. Чертим линию. Нажимаем Shift+F3 и во вкладке Pattern (Шаблон) выбираем шаблон с именем 123.

Далее подбираем расстояния между черточками как в ГОСТе (в узоре линии) и все. Только необходимо учесть, что средний прямоугольник это ПОЛНАЯ длина черточек, а крайние делать в ПОЛОВИНУ ширины, для стыковки в линию.

А чтобы расстояние между черточками оставалось постоянным, необходимо под каждый масштаб создать свой узор и менять не толщину, а «шаблон».

Как сделать так, что бы при изменении размера шейпа, изменялся бы и размер текста?

Нигде не могу найти как сделать так, что бы при изменении размера шейпа, изменялся бы и размер текста, который находится в текстовом блоке в этом шейпе. Вот в некоторых мастер шейпах так сделано. Увеличиваешь шейп и текст увеличивается (меняется pt).

1. Там все зависит от того, какую именно зависимость Вам нужно установить. Например, если нужно изменять текст в зависимости от ширины шейпа, то ShapeSheet этого шейпа в ячейке Size секции Character нужно записать формулу =GUARD(Width*12 pt). При этом в прямоугольнике с шириной 1 дюйм текст будет размером 12 pt.

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

2. Можно и проще. Есть такая надстройка как SmartShape. В этой надстройке как раз и можно настроить, без применения формул. Сервис > Надстройки > Visio Extras > SmartShape Wizard.(Tools > Add-ons > Visio Extras > SmartShape Wizard) и далее Customize shape’s text.

Как создать шаблон двухцветных линий?

Не могу создать шаблон двухцветных линий, которые используются в автомобильных электросхемах. Может кто сталкивался с подобной проблемой?

Видимо речь идет о линии заземления. Шаблон будет представлять собой 2 сгруппированных прямоугольника. Необходимо просто создать новый стиль узора линии. Делается это так:

  • В окне Drawing Explorer(Обозреватель чертежа) выбрать пункт Line pattern (Узоры линии) и нажав правой кн. мыши выбрать пункт Create…(Создать)
  • В появившемся окне указать Имя (Ground, к примеру). Нажать на самую левую картинку и на ОК (галочку не ставить!).
  • Далее выбираем только что созданный узор, нажимаем правой кн. мыши и выбираем Edit Pattern (Изменить узор)
  • В открывшемся окне чертим, к примеру 1 зеленый прямоугольник размерами 1мм Х 10мм, через 10 мм ниже него, 2-й желтый прямоугольник с размерами 1мм Х 10 мм. Группируем их, закрываем.
  • Чертим линию. Нажимаем Shift+F3 и во вкладке Pattern (Шаблон) выбираем шаблон с именем Ground.

Подскажите, пожалуйста, как удалить макрос?

У меня возникла проблема, после удаления макроса (любого кода в окне VBA) после закрытия и открытия файла с рисунком выходит запрос на Disable или Enable выполнения макроса. Подскажите, пожалуйста, как удалить макрос.

Вообще-то никогда не пробовал этого делать, но вот сейчас проверил такой вариант:

1. Сохранить рисунок в формате XML (.vdx).

2. Открыть его в текстовом редакторе.

3. Удалить секцию …

4. Загрузить .vdx и сохранить его опять в .vsd

Совершенно не уверен, что это единственный или даже просто правильный путь. Предлагаю проверить, пока никто не подсказал лучшего. И не забудьте сохранить копию исходного файла на всякий случай 🙂

Как к шейпам из Power Point добавить точки соединения?

Имеется несколько шейпов, которые сейчас работают в слайдах PowerPoint. Хотелось бы использовать их в Visio. Они отлично копируются, но как добавить к ним точки соединения, чтобы все сцеплялось, когда нужно перемещать шейпы?

При копировании шейпов их нужно разгруппировать (Shape>Grouping>Ungroup), чтобы превратить в шейпы Visio. Если Вам нужен фон из PowerPoint презентации, сохраните его в *.emf или *.wmf (векторные форматы), вставьте в Visio через (Insert>Picture>From File…) и разгруппируйте.

Дальше:

1) Сгруппируйте шейпы (это уже шейпы Visio)

2) Добавляете точки соединения

Выбор инструмента Connect-pointsTool (Ctrl+Shift+1). При добавлении точки удерживайте Ctrl.

Как избавиться от Custom Properties на веб-странице?

Есть рисунок в Visio 2003, содержащий гиперлинки. После сохранения в виде веб-страницы гиперлинки улетают в левую часть страницы в «Custom Properties». Я не хочу выводить Custom Properties. Как от этого избавиться?

В окошке Save as Web Page есть кнопка Publish… Щелкнуть по ней. В новом окне снять галочку с Details(Custom Properties). При этом фрейм Custom Properties не будет отображаться.

Как сделать, чтобы ссылки открывались в новом окне?

Как сделать в документе, который сохранили, как Веб страницу, чтобы ссылки открывались в новом окне? В секции Hyperlincs шейп-листа, есть ячейка NewWindow. Установите в нее True.

Как изменить размер таблицы в ER модели?

Сделал ER модель, пытаюсь изменить размер таблицы или ENTITY. Сделал UNPROTECED для HEIGHT, WIDTH через FORMAT — PROTECTION. Теперь хочу изменить размер шейпа через окошко SIZE & POSITION, однако изменить SIZE невозможно. Заранее благодарен за любую помощь.

Открой шейп-лист (Window>show ShapeSheet) и убери GUARD с ячеек Height и Width.

Как увидеть пользовательские свойства, просто щелкнув по страничке?

Привет. Только что поставил Visio 2003 и вижу, что сохранение рисунка в виде веб-страницы изменилось. В 2002 когда сохранялись шейпы с пользовательскими свойствами, все что надо было делать — водить мышью над шейпами и свойства появлялись в левой части страницы. Теперь же чтобы их увидеть, кажется, нужно держать Ctrl и щелкать мышью по шейпам.

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

В папке NameOfWebPage_files есть файл frameset.js. В нем нужно изменить 116 строку

«if (e != null && e.ctrlKey && frmToolbar.widgets && frmToolbar.widgets.Details)»

на

«if (e != null && frmToolbar.widgets && frmToolbar.widgets.Details)».

Как увидеть пользовательские свойства при движении мыши над шейпом?

Еще вопрос. А можно ли так изменить этот if, чтобы пользовательские свойства показывались просто при движении мыши над шейпом без щелкания по нему?

В папке FileName_files найти файл vml_1.htm. Открыть на редактирование и сделать две замены:

1) Заменить onmouseover=»UpdateTooltip(this,

на onmouseover=»OnShapeClick(

2) Заменить onfocus=»UpdateTooltip(this,

на onfocus=»OnShapeClick(

Ну и не забыть отредактировать файл .js.

Как убрать искажение текста?

Работаю с трафаретом Dimension. Нужны и горизонтальные и вертикальные измерители. При печати через Pdf writer или Distiller весь текст с вертикальных измерителей искажается, разбегается по всей странице. С горизонтальными измерителями все нормально.

1) Нужно Cut вертикальный измеритель

2) Потом Paste Special…, as picture (Enhanced Metafile)

3) Разгруппировать, сгруппировать.

4) Повторить все для следующего измерителя и т.д.

5) Теперь можно создавать *.pdf

Все вертикальные измерители будут видны нормально.

Как в Visio 2013 увеличить контраст сетки?

В прошлых версиях Visio сетка отображалась вполне ясно, а в 2013 едва видна. Приходится напрягать зрение. Можно ли как-то увеличить её контраст?

Странно, что в типовых настройках нет такой опции. Цвет сетки можно изменить через реестр.

HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Visio\Colors\ColorGridForeground

Изменения нужно вносить при не запущенном Visio, иначе при закрытии программы будут установлены текущие значения. Перезагрузка машины не требуется.

Можно внести изменения с помощью reg-файла. Например, вот такого

Windows Registry Editor Version 5.00

;Увеличить контрастность сетки

;Если значение цифр в последней строке увеличивать, то увеличивается и прозрачность и сетка становится менее контрастной.

;Если наоборот — уменьшать, то уменьшается и прозрачность и сетка становится более контрастной.

[HKEY_CURRENT_USER\Software\Microsoft\Office\15.0\Visio\Colors]

«ColorGridForeground»=»100 100 100»

Текст сохранить в текстовом файле с расширением .reg. Можно подредактировать значение. Потом запустить файл на выполнение.

Как найти аддоны в Visio 2003?

В версии 2000 насколько я помню было так: адд-оны после установки, хранились в специальной папке. Где найти установленные адд-оны в visio 2003?

Простейший способ — запустить в Windows поиск файлов с расширением .vsl. Штатные аддоны обычно хранятся в таких файлах. А размещение пользовательских аддонов обычно указывается в Tools / Options / Advanced / File paths.

Что нового в Visio 2013 для разработчика?

Подробнее на английском — http://msdn.microsoft.com/en-us/library/office/ff767103.aspx

А если коротко, то:

— новый формат файлов;

— усиленная поддержка тем;

— возможность замены шейпов;

— несколько новых эффектов для шейпов (подсветки, 3-D вращение, отражение и т.д.);

— новый движок для комментариев;

— возможность совместной работы с документами на SharePoint;

— новые возможности обрезки изображений шейпов;

— работа с относительной геометрией в шейп-листе;

— поддержка Business Connectivity Services (BCS);

— усовершенствованы Visio services для SharePoint;

— появилась возможность дублирования страницы.

Отдельно изменения в шейп-листе — http://msdn.microsoft.com/en-us/library/office/ff768470.aspx.

Как установить Visio только для 1-го пользователя?

Решил установить VISIO для отдельного пользователя. Завел пользователя, вошел в него. Установил. Но. Visio оказался и у другого пользователя. В меню пуск есть соответствующие ярлыки.

Как установить только для одного пользователя?

К сожалению, официально Visio (как и другие приложения Microsoft Office) нельзя установить «только для текущего пользователя». Они ставятся «на компьютер», т.е. в «Program Files».

Можно настроить видимость/доступность для других пользователей. Если ты в организации (есть домен) — то доступность можно настроить через групповые политики.

Размытие изображения в Visio 2013

В Visio 2013 по сравнению с предыдущими версиями появилась фишка — размытие изображения при приближении и отдалении. Т.е. изменили масштаб — изображение размыто, не четко. прошло n-времени — появилась четкость. Есть ли возможность отключения этой безумно не нужной функции? Это не беда, если у вас векторные чертежи, наведение занимает 1 с, но если работа с разного рода картинками, вставленными в чертеж, это время просто губительно.

File / Options / Advanced / Enable transitions

Соответственно для русской версии:

Файл / Параметры / Дополнительно / Разрешить переходы.

Как в Visio Pro 2013 отключить автопривязку?

Возникла необходимость срочно немного подправить проект в Visio 2013, но никак не могу найти, где отключить автопривязку к объектам? В «Параметрах», «Дополнительно» отключил «Разрешить автосоединение», но не помогло.

Переключение доступно через Вид / Автосоединение (чекбокс на панельке «Визуальные подсказки»)

Брязгин Дмитрий Егорович
Брязгин Дмитрий Егорович

Системный аналитик с внушительным стажем. Занимаюсь разработкой дополнительных решений для Microsoft Visio с 2013 года.

Оцените автора
VisioPort
Добавить комментарий