Si ultimo Valentino die iam dilectam mulierem cheetah pilum tunicam dedisti, et anno proximo ante annum - iPhone 7, et miraris quid aliud cogites, optionem mihi offerre possum:
It takes 2 minutes to do this.
Aperi Praecedo, ad tab Inserta - Figuras (Insert - Shapes) et cor elige;
Id scheda trahunt, textum intus tangentem intramus, apte format;
Ad maiorem naturalem naturam adde effectum 3D in tab Forma - Figura Effectus (Forma - Figurae Effectus):
Et extremum tactum – adde tortor ad animationem. Click Alt + F11, in fenestra Basic editor Visual quae aperit, novum modulum vacuum per menu inserere Inserere - OMNIBUS et textum huius tortoris ibi imita.
Sub Cor() For i = 1 Ad 3000 Cum ActiveSheet.Shapes.Range(Array("Сердце 1")).Tres .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 Finem Cum Application.Wait (Nunc + TimeSerial(0, 0, 0.1)) Sequentia i End Sub Claudere Visual Basic Editor, preme Alt + F8 tortor ac cursus nostra. Voila! Dilecte — in extasi, tu — in osculis, dies festus erat prosperitatis. Si amatus tuus id non sapit, saltem discere VBA mandata operandi cum 3D