Excel VBA - Rotating 3D Sphere (MS Excel Animation)

แชร์
ฝัง
  • เผยแพร่เมื่อ 25 ธ.ค. 2024

ความคิดเห็น •

  • @amyroamyro8344
    @amyroamyro8344 ปีที่แล้ว

    thats great!!! thank you for posting

    • @ahsingtv
      @ahsingtv  ปีที่แล้ว +1

      Thanks! My pleasure. Thanks for watching and have a nice day.

  • @johnvanrensburg187
    @johnvanrensburg187 4 ปีที่แล้ว +2

    Awesome, well done and thank you for posting :)

    • @ahsingtv
      @ahsingtv  4 ปีที่แล้ว

      Thanks and my pleasure!
      Thanks for watching and have a nice day :)

  • @esbi1124
    @esbi1124 4 ปีที่แล้ว +1

    Hello, good job. Thanks.

    • @ahsingtv
      @ahsingtv  4 ปีที่แล้ว

      Thanks! It's my pleasure to share :)
      Thanks for watching and have a nice day.

  • @rjaquaponics9266
    @rjaquaponics9266 3 ปีที่แล้ว +1

    Is it possible to display and move the sphere on a Userform?

    • @ahsingtv
      @ahsingtv  3 ปีที่แล้ว +1

      Hi, as I know, cannot.
      Thanks for watching and have a nice day.

  • @saahilagarwal8248
    @saahilagarwal8248 3 ปีที่แล้ว +1

    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.

    • @ahsingtv
      @ahsingtv  3 ปีที่แล้ว

      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.

    • @saahilagarwal8248
      @saahilagarwal8248 3 ปีที่แล้ว

      @@ahsingtv ok sir thank you.... if not possiable in excel..... in word or power point ?

    • @ahsingtv
      @ahsingtv  3 ปีที่แล้ว +1

      erm, neither since the coding system is more or less the same.
      C++ and html can do that. However, is out of my capability 😢

    • @saahilagarwal8248
      @saahilagarwal8248 3 ปีที่แล้ว

      @@ahsingtv okay thank you

    • @ahsingtv
      @ahsingtv  3 ปีที่แล้ว

      No problem.

  • @maheshsharma6529
    @maheshsharma6529 4 ปีที่แล้ว

    💯💯💯

    • @ahsingtv
      @ahsingtv  4 ปีที่แล้ว

      Thanks :)
      Thanks for watching and have a nice day.

  • @henrymortega5316
    @henrymortega5316 2 ปีที่แล้ว

    hi it can be possible in 3d models?

    • @ahsingtv
      @ahsingtv  2 ปีที่แล้ว

      Hi Henry. Yup, just like what I did in th-cam.com/video/ULG8SJkMKU8/w-d-xo.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.

  • @lizsantiago
    @lizsantiago 4 ปีที่แล้ว

    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?

    • @ahsingtv
      @ahsingtv  4 ปีที่แล้ว +1

      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.

  • @sijojseph9705
    @sijojseph9705 4 ปีที่แล้ว +1

    I can't read the code you have written. It's so small to understand.

    • @ahsingtv
      @ahsingtv  4 ปีที่แล้ว +2

      Hi.
      Is this "Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX = Sheet1.Shapes.Range(Array("Oval 1")).ThreeD.RotationX - 1" you looking for?

    • @sijojseph9705
      @sijojseph9705 4 ปีที่แล้ว

      @@ahsingtv Thank you very much!!!

    • @ahsingtv
      @ahsingtv  4 ปีที่แล้ว

      My pleasure.
      Thanks for watching and have a nice day.