Nëse në ditën e fundit të Shën Valentinit i keni dhënë gruas tuaj të dashur një pallto leshi cheetah, dhe një vit më parë - iPhone 7, dhe po pyesni veten se çfarë tjetër të mendoni, atëherë unë mund të ofroj një opsion:
Duhen 2 minuta për ta bërë këtë.
Hapni Excel, shkoni te skeda Insert – Forma (Fut - Forma) dhe zgjidhni një zemër:
Ne e vizatojmë atë në një fletë, futim një tekst prekës brenda, e formatojmë siç duhet:
Për natyralitet më të madh, shtoni një efekt 3D në skedë Formati – Efektet e formës (Format - Efektet e formave):
Dhe prekja e fundit - shtoni një makro për animacion. Klikoni Alt + F11, në dritaren e redaktuesit të Visual Basic që hapet, futni një modul të ri bosh përmes menysë Insert – Moduli dhe kopjoni tekstin e kësaj makro atje:
Sub Heart() Për i = 1 Deri në 3000 Me ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 Përfundoni me Aplikimin. Prisni (Tani + KohëSeriali (0, 0, 0.1)) Tjetra i Fundi Nën Mbyllni redaktorin e Visual Basic, klikoni Alt + F8 dhe drejtoni makro tonë. Voila! Të dashur - në ekstazë, ju - në puthje, festa ishte një sukses. Nëse i dashuri juaj nuk e vlerëson atë, atëherë të paktën mësoni komandat VBA për të punuar me 3D 🙂