Tag Archives: автоматизация

Автоматизация производства

Находка-кандидат номер один на забывание, почему-то столь полезные вещи мой мозг забывает моментально. Итак, микрософт визио довольно удобная программка, обладающая уникальным функционалом, а, главное, великолепно автоматизируемая. Public Sub Add_Connector() Set vsoShape = Application.ActiveWindow.Selection.Item(1) vsoShape.AddRow visSectionConnectionPts, 7, visCnnctX vsoShape.CellsSRC(visSectionConnectionPts, 7, visCnnctY).FormulaU = «Height*0» vsoShape.CellsSRC(visSectionConnectionPts, 7, visCnnctX).FormulaU = «Width*0.5» vsoShape.AddRow visSectionConnectionPts, 8, visCnnctX vsoShape.CellsSRC(visSectionConnectionPts, 8, visCnnctY).FormulaU = «Height*1» vsoShape.CellsSRC(visSectionConnectionPts, 8, visCnnctX).FormulaU = «Width*0.5» End Sub Этот милый […]

Leave a comment