3D a cikin Excel

Idan a ranar soyayya ta ƙarshe kun riga kun ba wa ƙaunataccen mace rigar cheetah fur gashi, da kuma shekarar da ta gabata - iPhone 7, kuma kuna mamakin abin da za ku yi tunani, to, zan iya ba da zaɓi:

Yana ɗaukar mintuna 2 don yin wannan.

Bude Excel, je zuwa shafin Saka - Siffai (Saka - Siffai) kuma zabi zuciya:

3D a cikin Excel

Muna zana shi a kan takardar, shigar da rubutu mai taɓawa a ciki, mu tsara shi yadda ya kamata:

3D a cikin Excel

Don mafi girma na halitta, ƙara tasirin 3D akan shafin Tsarin - Tasirin Siffar (Format - Siffofin Siffofin):

3D a cikin Excel

Kuma taɓawa ta ƙarshe - ƙara macro don rayarwa. Danna Alt+F11, a cikin Visual Basic edita taga da ke buɗewa, saka sabon tsarin komai a cikin menu Saka - Module kuma kwafi rubutun wannan macro a wurin:

Sub Zuciya () Na i = 1 Zuwa 3000 Tare da ActiveSheet.Shapes.Range(Array("Сердце 1")) .RotationX = i .RotationY = i / 20 .RotationZ = i / 2 Ƙare Tare da Aikace-aikace. Jira (Yanzu +Serial Time(0, 0, 0.1)) Na gaba i Ƙarshen Sub  

Rufe Kayayyakin Basic Editan, danna Alt+F8 kuma gudanar da macro. Voila! Masoyi - cikin farin ciki, ku - cikin sumba, biki ya yi nasara. Idan wanda kake ƙauna ba ya godiya da shi, to aƙalla koyi umarnin VBA don aiki tare da 3D 🙂

 

Leave a Reply