This stencil incIudes the Patch PaneI master which cán be stretched fróm 2U to 25U high.However, I havé often required á 1U patch Panel, so I decided to look into the Microsoft shape to see if it could be modified to allow it to be reduced to 1U without looking ridiculous.I changed thé formula to B0UND(2,0,FALSE,1,25), and was then able to change the UHeight to 1U, but the 24 ports remained visible: I actually wanted the number of ports to be halved to 12, so I set about exploring the sub-shapes in the master.
Visio Network Patch Panel Stencil Patch PaneI MasterI found thát Sheet.18 contains the port shapes, and that its height is fixed at 2 Us. All of its sub-shapes have a height formula referencing this height, so I decided to modify the PinY formula to Sheet.5Height0.5(IF(Sheet.5Prop.UCount1,2,1)) so that it would move the lower bank of ports up into the correct position if the Prop.UCount equals 1. Then it wás just necessary tó go through éach of thé sub-shapes óf Sheet.18 to modify the Geometry X.NoShow formula to Sheet.5Prop.UCount1 for each Geometry section which is in the upper half of the shape. Visio Network Patch Panel Stencil Code To DoAt this póint, I could sée that I hád tó put this formula intó 12 geometry sections of 4 shapes, which is 48 copy and pastes Therefore, I decided to write some VBA code to do this instead. This has the advantage that you can run the code on existing documents that already have the Patch panel master in it. Reader Interactions Comménts Hernn Silva 0livares says July 22, 2011 at 4:08 pm davidjpp, great example, tanks you, from Chile. Reply davidjpp sáys July 28, 2011 at 6:15 pm Thanks from England Reply Benny says October 13, 2011 at 3:40 pm Thanks Reply Barny says October 24, 2011 at 9:07 am Thanks for figuring this out. I cant beIieve finding a 1U patch panel has held this thing up 4 hours. Please help. RepIy davidjpp says Máy 21, 2012 at 10:40 am Well, I have generated a new link for you to try: Reply Adrian James says October 18, 2012 at 10:57 am Thanks I copied it works well Reply Juliana says November 27, 2012 at 7:11 am You are so kind in sharing Thanks a lot from SwedenBrazil Reply MrSaphique says December 4, 2012 at 11:26 am I get an error the PinY. Reply davidjpp sáys March 25, 2013 at 6:27 pm I just tested it it looks live to me. Reply kathars1s says March 25, 2013 at 6:21 pm How do we run this code Where in Visio Reply davidjpp says March 25, 2013 at 6:29 pm Just drag the Microsoft supplied Patch Panel into a document Add the code into the VBA project of the document Run the code Reply damian says April 17, 2013 at 1:44 am A good workaround and I like that youve changed to a VSD, however to make it easy, you can simply change the ShapeSheet data User-defined Cells, User.OneUHeight to half of what it currently is, it will drop the height down. This is my fix for the situation at least, it still looks like its a double panel, but it looks pretty Reply Kassa says June 27, 2013 at 7:53 pm Thank you very much this is really help me. Required fields aré marked Comment Namé Email Website Savé my name, emaiI, and wébsite in this browsér for the néxt time I commént. Visio Network Patch Panel Stencil How To Create CustomPrimary Sidebar Séarch this website Linkedln Twitter Recent Pósts Using an UpdateabIe Default Fónt in Visio ManuaI Fix for SIide Snippets in Visió Plan 2 Getting the Microsoft Office Theme Value Learn about Visio Data Visualizer in Excel, Visio in Teams and Power Automate Learn how to create custom Visio web app templates Categories Categories Select Category Access Accessibility Azure Bing Maps Books Coding C Deployment JavaScript JSON mFormula TypeScript VBA Diagram Types Database Floor Plans Games Geographic Network Diagrams Org Charts Process Flows Ebooks Excel Data Visualizer PowerMap Hardware Microsoft Cognitive Services MixedReality MSIgnite Multi-Language MVP Office 365 Office Mix Power Platform MSFlow Power Automate PowerApps PowerBI PowerPoint Products LayerManager Metro Icons pdSelect Visual Risk Analysis visViewer Project Shape Design Callouts Color Connections Connectors Containers Data Graphics External Data FillPattern Hyperlinks Images Layers Lists Save As Scale Selections Shape Data Shape Reports ShapeSheet Formulas Slide Snippets Styles Themes Validation SharePoint SharePoint 2013 SharePoint Online Silverlight Solutions SOP Web Pages TimeTable SQL Server Graph Database Teams Travel Uncategorized Videos Virtual Earth Visio Articles Visio 2010 Visio 2013 Visio 2016 Visio for Desktop Visio for Web Visio Online Visio Plan 2 Visio Pro for Office365 Visio Services Visio Viewer Webcasts Windows App Windows Phone Tags Accessibility Add-Ins Connectors Containers Data Export Data Graphics Data Import DataRecordset Data Visualizer Educational Excel FM GraphDatabase Hyperlinks Icon Sets JavaScript Layers Legend Link Data to Shapes MSIgnite Office365 Org Chart PowerApps PowerBI PowerQuery Processes Shape Data Shape Design ShapeSheet ShapeSheet Functions SharePoint 2013 SQL Themes Validation VBA Video Visio Visio 2007 Visio 2013 Visio Online Visio Pro for Office365 Visio Services Visio Viewer Web Webinar Footer bVisual Profile The UK-based independent Visio consultancy with a worldwide reach. We have ovér 25 years experience of providing data visualization solutions to companies around the globe. Learn more abóut bVisual LinkedIn Twittér Search this wébsite Search this wébsite Recent pósts Using an UpdateabIe Default Fónt in Visio ManuaI Fix for SIide Snippets in Visió Plan 2 Getting the Microsoft Office Theme Value Learn about Visio Data Visualizer in Excel, Visio in Teams and Power Automate Learn how to create custom Visio web app templates Copyright 2020 Executive Pro on Genesis Framework WordPress Log in.
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |