Ако сте на последњи Дан заљубљених већ поклонили својој вољеној жени бунду од гепарда, а претпрошле године – иПхоне 7, и питате се шта још да смислите, онда вам могу понудити опцију:
За ово је потребно 2 минута.
Отворите Екцел, идите на картицу Уметак – Облици (Уметнути — Облици) и изабери срце:
Нацртамо га на листу, унесемо дирљив текст унутра, форматирамо га на одговарајући начин:
За већу природност додајте 3Д ефекат на картицу Формат – Ефекти облика (Формат — Ефекти облика):
И последњи додир – додајте макро за анимацију. Кликните Алт + ФКСНУМКС, у прозор уређивача Висуал Басиц-а који се отвори, уметните нови празан модул кроз мени Инсерт – Модул и копирајте текст овог макроа тамо:
Суб Хеарт() За и = 1 до 3000 са АцтивеСхеет.Схапес.Ранге(Арраи("Сердце 1")).ТхрееД .РотатионКс = и .РотатионИ = и / 20 .РотатионЗ = и / 2 Крај са апликацијом.Сачекај (сада + ТимеСериал(0, 0, 0.1)) Нект и Енд Суб Затворите Висуал Басиц Едитор, кликните Алт + ФКСНУМКС и покрените наш макро. Воила! Вољени – у екстази, ти – у пољупцима, празник је успео. Ако ваша вољена особа то не цени, онда барем научите ВБА команде за рад са 3Д 🙂