3D li Excel

Ger di Roja Evîndaran a paşîn de we berê xwe da jina xweya delal kirasê cheetah, û sala berê - iPhone 7, û hûn meraq dikin ku hûn li ser çi bifikirin, wê hingê ez dikarim vebijarkek pêşkêş bikim:

Ji bo vê yekê 2 hûrdeman digire.

Excel vekin, biçin tabê Têxe - Şikl (Insert - Shapes) û dilekî hilbijêre:

3D li Excel

Em wê li ser kaxezek xêz dikin, di hundurê de metnek pêvekirî têxin hundur, wê bi guncan format bikin:

3D li Excel

Ji bo xwezayîbûna mezintir, bandorek 3D li ser tabê zêde bikin Format - Bandorên Shape (Format - Bandorên şikilan):

3D li Excel

Û pêwendiya dawîn - ji bo anîmasyonê makroyek zêde bikin. Bikirtînin Alt + F11, di pencereya edîtorê Visual Basic ya ku vedibe de, modulek nû ya vala têxe menuyê Têxe - Modul û nivîsa vê makroyê li wir kopî bikin:

Sub Heart() Ji bo i = 1 Heta 3000 Bi ActiveSheet.Shapes.Range(Array("Сердце 1")).ThreeD .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 Bi Serîlêdanê Bi dawî bibe. Bisekine (Niha + TimeSerial (0, 0, 0.1)) Next i End Sub  

Edîtorê Visual Basic bigire, bikirtînin Alt + F8 û makroya me bimeşînin. Voila! Hezkirî - di ecstazê de, tu - di maçan de, cejn serketî bû. Ger hezkiriya we jê razî nabe, wê hingê bi kêmanî fermanên VBA-yê ji bo xebata 3D fêr bibin 🙂

 

Leave a Reply