Hvis du på sidste Valentinsdag allerede gav din elskede kvinde en gepardpelsfrakke, og året før – iPhone 7, og du spekulerer på, hvad du ellers skal tænke på, så kan jeg tilbyde en mulighed:
Det tager 2 minutter at gøre dette.
Åbn Excel, gå til fanen Indsæt – Former (Indsæt - figurer) og vælg et hjerte:
Vi tegner det på et ark, indtaster en rørende tekst indeni, formaterer det passende:
Tilføj en 3D-effekt på fanen for større naturlighed Format – Formeffekter (Format – Shapes Effects):
Og den sidste touch – tilføj en makro til animation. Klik Alt + F11, i Visual Basic-editorvinduet, der åbnes, indsæt et nyt tomt modul gennem menuen Indsæt – Modul og kopier teksten til denne makro der:
Sub Heart() For i = 1 Til 3000 Med ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 End With Application.Wait (Nu) + TimeSerial(0, 0, 0.1)) Næste i End Sub Luk Visual Basic Editor, klik Alt + F8 og køre vores makro. Voila! Elskede – i ekstase, du – i kys var ferien en succes. Hvis din elskede ikke sætter pris på det, så lær i det mindste VBA-kommandoerne til at arbejde med 3D 🙂