Se l'ultimu San Valentinu avete digià datu à a vostra amata donna un mantellu di pelliccia di ghepardo, è l'annu prima di l'ultimu - iPhone 7, è vi dumandate ciò chì altru à pensà, allora possu offre una opzione:
Ci vole 2 minuti per fà questu.
Aprite Excel, andate à a tabulazione Inserisci - Forme (Inserisci - Forme) è sceglie un core:
Disegnemu nantu à un fogliu, inserisce un testu toccu in l'internu, u furmatu in modu adattatu:
Per più naturalezza, aghjunghje un effettu 3D nantu à a tabulazione Format - Effetti di forma (Format - Effetti di Forme):
È u toccu finali - aghjunghje una macro per l'animazione. Cliccate Alt + F11, in a finestra di l'editore Visual Basic chì apre, inserisce un novu modulu viotu attraversu u menù Inserisce - Modulu è copià u testu di sta macro quì:
Sub Heart() For i = 1 To 3000 With ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 End With Application.Wait (Ora + TimeSerial (0, 0, 0.1)) Next i End Sub Chiudi l'Editor Visual Basic, cliccate Alt + F8 è eseguite a nostra macro. Voila! Amatu - in ecstasy, voi - in basgi, a festa hè stata un successu. Se u vostru amatu ùn l'apprezza micca, allora almenu amparà i cumandamenti VBA per travaglià cù 3D 🙂