Si l'últim dia de Sant Valentí ja vau regalar a la vostra estimada dona un abric de pell de guepard, i l'any passat, l'iPhone 7, i us pregunteu què més pensar, puc oferir una opció:
Es triga 2 minuts a fer-ho.
Obriu Excel, aneu a la pestanya Inserir - Formes (Insereix — Formes) i tria un cor:
El dibuixem en un full, introduïm un text emotiu dins, el formatem adequadament:
Per a una major naturalitat, afegiu un efecte 3D a la pestanya Format – Efectes de forma (Format — Efectes de formes):
I el toc final: afegiu una macro per a l'animació. Feu clic Alt + F11, a la finestra de l'editor de Visual Basic que s'obre, inseriu un nou mòdul buit a través del menú Inserir – Mòdul i copieu el text d'aquesta macro allà:
Sub Heart() Per a i = 1 a 3000 amb ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 Finalitzar amb l'aplicació.Espereu (ara + TimeSerial(0, 0, 0.1)) Next i End Sub Tanqueu l'Editor de Visual Basic, feu clic Alt + F8 i executeu la nostra macro. Voila! Estimat -en èxtasi, tu- en petons, les vacances van ser un èxit. Si el vostre ésser estimat no ho aprecia, almenys apreneu les ordres de VBA per treballar amb 3D 🙂