Excel VBA - Rotating 3D Sphere (MS Excel Animation)
Вставка
- Опубліковано 19 вер 2019
- Microsoft Excel animation.
Animated 3D circle (sphere).
How to create a 3-D circle (sphere) using the oval shape in Excel?
How to make the sphere to rotate?
This video shows a step by step tutorial on the creation of a rotating or turning sphere using VBA.
Important syntax:
Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX = Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX - 1
Looking for earth rotation/revolution?
👉 • Excel VBA - Earth Rota...
Only available for MS Excel versions 2019 and above
Facebook public group for Excel and VBA discussion 👉 / 486402069483674
Welcome to join 🤗
Awesome, well done and thank you for posting :)
Thanks and my pleasure!
Thanks for watching and have a nice day :)
thats great!!! thank you for posting
Thanks! My pleasure. Thanks for watching and have a nice day.
Hello, good job. Thanks.
Thanks! It's my pleasure to share :)
Thanks for watching and have a nice day.
💯💯💯
Thanks :)
Thanks for watching and have a nice day.
this is awesome! can you do the same for a powerpoint I have looked all over the internet how to do the same but with a 3d dice so it spins is tahtpossible?
Thanks!
Regarding your question, there is a method to rotate an oval in MS PowerPoint using VBA. However, the result might not be satisfied or as expected. This is because the oval might not rotate as smooth as in MS Excel.
To get the thing done, we just have to change
Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX = Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX - 1
to
ActivePresentation.Slides(1).Shapes(1).ThreeD.RotationX = ActivePresentation.Slides(1).Shapes(1).ThreeD.RotationX - 1
Hope it helps. Thanks for watching and have a nice day.
Is it possible to display and move the sphere on a Userform?
Hi, as I know, cannot.
Thanks for watching and have a nice day.
hi it can be possible in 3d models?
Hi Henry. Yup, just like what I did in ua-cam.com/video/ULG8SJkMKU8/v-deo.html
Btw, for 3D models, we may try to look for if there is any animated model that matches our requirements before writing VB coding, since it is free 😉
Thanks for watching and have a nice day.
Hi sir, I want to insert a earth image and rotate. I have ms
office 7. I need to rotate an earth image in excel with the help of button. Is it
possible in excel ? thank you.
Hi Saahil. Sorry to say, not really possible as the image is in 2D format which can lead to missing parts when rotating.
Thanks for watching and have a nice day.
@@ahsingtv ok sir thank you.... if not possiable in excel..... in word or power point ?
erm, neither since the coding system is more or less the same.
C++ and html can do that. However, is out of my capability 😢
@@ahsingtv okay thank you
No problem.
I can't read the code you have written. It's so small to understand.
Hi.
Is this "Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX = Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX - 1" you looking for?
@@ahsingtv Thank you very much!!!
My pleasure.
Thanks for watching and have a nice day.