A Patch Panel that can be 1. U too b. Visual. Microsoft Visio 2. Professional and 2. Professional and Premium includes the Network Rack Diagram template, which opens the Rack mounted equipment stencil. This stencil includes the Patch Panel master which can be stretched from 2. U to 2. 5U high. However, I have often required a 1. U 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 1. U without looking ridiculous. I opened up the Shape. Sheet of the Patch Panel master and found that the formula in the Prop. Recent Game Releases Pc 2011'>Recent Game Releases Pc 2011. UCount. Value cell is imposing 2 as a minimum value with the BOUND function. I changed the formula to BOUND2,0,FALSE,1,2. UHeight to 1. U, but the 2. A tutorial in multiple parts showing how to create detailed network data rack diagrams using Visio 2010. This part shows how to modify a downloaded Visio. M2. 10. 0 2. 4 1. U Modular Patch Panel. Comm. Scope M2. 10. UUTP Modular Panel 1. Empty patch panels 1U for 12 ST 1 ea SPP3E1T. Get It Done Use Visio to diagram. Panel Mount GFCIs Portable GFCI ELCI. Angled 110 QuickPort Patch Panels. Download All Visio Stencils All Stencils35MB Fiber Components NEW hi Im using visio 2007 and Im trying to make a. Experts Exchange Questions using viso to make a patch panel diagram. Posted on 20100808. A tutorial in multiple parts showing how to create detailed network data rack diagrams using Visio 2010. This part shows how to save modified shapes using. Visio and Rack Diagrams. Visio 2010. this behavior occurs because if you resize the patch panel shape to 1U0. U. 1u Blank PanelI actually wanted the number of ports to be halved to 1. I set about exploring the sub shapes in the master. I found that Sheet. Us. All of its sub shapes have a height formula referencing this height, so I decided to modify the Pin. Y formula to Sheet. Download free Visio shapes stencils and templates for visio. VSDfxGenericRacks. Added several new patch panels including 16port Serial, dense rj45 1U. Visio 2010 Professional Cannot resize patch panel to 1U. In most voltages when you are the visio 1u patch panel stencil is beautiful. Height0. 5IFSheet. Prop. 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 was just necessary to go through each of the sub shapes of Sheet. Geometry. X. No. Show formula to Sheet. Prop. UCount1 for each Geometry section which is in the upper half of the shape. At this point, I could see that I had to put this formula into 1. 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. In fact, the Patch panel master must be in the local document stencil for this code to work. Public. Sub Update. Patch. Panel. Master 2 Dim mst As Visio. Master 3 Dim mst. Copy As Visio. Master 4 Dim shp. Patch. Panel As Visio. Shape 5 Dim shp. Port. Group As Visio. Shape 6 Dim shp. Port. Graphics As Visio. Shape 7 Dim i As. Integer 8 Dim i. Sect As. Integer 9 Dim d. Height As. Double 1. For. Each mst In Visio. Active. Document. Masters 1. 2 If mst. Name Patch panelThen 1. Set mst. Copy mst. Open 1. 4 Set shp. Patch. Panel mst. Copy. Shapes1 1. For. Each shp. Port. Group In shp. Card Rescue Mac Serial Numbers. Patch. Panel. Shapes 1. If shp. Port. Group. CellsHeight. Formula. U 1. Sheet. 5 User. One. UHeightThen 1. Port. Group. CellsPin. Y. Formula. U 1. Sheet. Height. IFSheet. 5 Prop. UCount1,2,1 2. For. Each shp. Port. Graphics In shp. Port. Group. Shapes 2. Height shp. Port. Graphics. CellsHeight. Result. IU 2. 2 For i 0 To shp. Port. Graphics. Geometry. Count 1 2. 3 i. Sect Visio. Section. First. Component i 2. If shp. Port. Graphics. Cells. SRCi. Sect, 2. Visio. vis. Row. Component 1, 2. Visio. vis. Y. Result. IU d. Height 0. Then 2. Port. Graphics. Cells. SRCi. Sect, 0, 2. Visio. vis. Comp. No. Show. Formula 2. Sheet. 5 Prop. UCount1 3. End. If 3. 1 Next i 3. Next shp. Port. Graphics 3. Exit. For 3. 4 End. If 3. 5 Next shp. Port. Group 3. 6 mst. Copy. Close 3. 7 mst. Match. By. Name True 3. Exit. For 3. 9 End. If 4. 0 Next mst 4. End. Sub. And there you have it the Patch panel can now be reduced to 1 U and it looks OK If you cannot be bothered to run the code, you can download the updated Patch panel and the code from here   http cid 3. BlogsPatch. Panel.