Добрый вечер, подскажите а можно ли макросом вставлять на лист фигуры по координатам x и y? 2 прямоугольника с разными размерами и с именем, заданным из кода вставить на лист
Пример с телефона сегодня не получится создать к сожалению (и как создать пример пока не понимаю, какие координаты нужны Эксель и куда он вставит фигуры я даже не подозреваю) описание: любые 2 фигуры допустим 2 квадрата размерами10х10 и 12х12 условных едениц с именами 3 и 7 вставить на новый лист в условных координатах координаты фигур допустим (x,y) 20,60 и 40,80
Sub Ins2Rect()
With ActiveSheet
.Shapes.AddShape(msoShapeRectangle, 20, 60, 10, 10).Name = "3"
.Shapes.AddShape(msoShapeRectangle, 40, 80, 12, 12).Name = "7"
End With
End Sub
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
чтобы подобрать координаты удобные для визуального восприятия нужно понимать какие координаты удобны для визуального восприятия (а какие - нет, чтобы случайно не подобрать их)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Давайте тогда чтобы актуализировать тему - фигуры это пасхальные яички/ЯЙЦА и их нужно закидывать в лоток на листе Эксель по координатам и красить по условию. и тему поменяем: разложить крашенные по условию пасхальные яички/ЯЙЦА в лоток на листе и если жена/ девушка/мама итд будет упрекать за, то что Вы сидите за компьютером после работы/учёбы/прогулки итп- на ответ яички/ЯЙЦА крашу - в такой день вы не должны получить по шапке по файлу задачка: разложить яички/ЯЙЦА с космическими координатами в земной лоток с минимальной перегородкой лотка равной двойной высоте земного яичка/ЯЙЦА
p.s. В игре «Что Где Когда» знатокам в любом случае необходимо дать ответ на вопрос, даже из 13 сектора
Ігор Гончаренко, .Name = "7" из поста 6 как правильнее задать из ячейки другого листа этой книги посмотреть Ваш ответ 16 смогу только утром - А как dx dy подобраны я не понял из примера, .Name = Cells(r, 1) дописать не получилось
Пить и курить вообще не полезно и дорого сейчас, а согласно доклада Росстата о снижении в первом квартале реальных доходов Россиян на 3,6% думаю производители рюмок запустят в производство новый объем 48,2 мл, а производители сигарет соответственно укоротят свою продукцию, так что в ближайшей перспективе недопив и недокур кромешный