【玩到极致】手搓Excel3D （实例及说明，0基础可进）

大灰狼1976

【前言】

个人喜欢玩，玩也要玩到极致。已有的功能要玩、没有的功能创建条件也要玩。
之前发过的3D攻略，由浅入深的方式可能半途劝退很多人，这次反其道而行，先上完整附件，代码全公开。

【说明】
此贴意在让其他也喜欢玩的朋友，以及对VBA学习过程枯燥而略感痛苦的人，能够重拾对VBA的兴趣，共同提高。
这些不务正业的研究，其成果是其他软件轻而易举能实现的，手搓轮子而已，其实过程中能够学到非常多的知识，非常有趣，也是我最大的收获。
像图形矩形校正、照片逆向建模等等，都是在具备三维换算知识的前提下才能实现。
后续如果有时间，会不定期增加说明，从基本的3行代码实现3D开始。
有兴趣者希望反馈，我会非常开心。

【使用说明】
比较简单，双击附件“画板”工作表的A1单元格，出现窗体，左边可以输入一些参数，也可以空白（但模型必须选），右边的大框类似触摸板，通过鼠标移动（按下鼠标键时）来操控图形变化。右下方是模型呈现方式的选择。

大灰狼1976

目前已完成的功能：
1、三维投影计算（基本功能）
2、三坐标旋转
3、绕任意轴旋转
4、背向观察者面不显示
5、强调主要轮廓（框线时）
6、明暗度计算（限制条件：平行光）
7、阴影计算（限制条件：固定投影平面）
8、平行光角度可变

未完成功能
1、阴影任意面投影，包括物体本身的面
2、前后遮挡计算
3、高光处理（目前已有算法，但没有找到合适配置参数，生成的结果不理想）

杨建营

牛的一批啊

三坛老窖

玩也要玩到极致！楼主好兴致，向楼主致敬！

大灰狼1976

感谢朋友们关注，后续会写实现过程，由浅入深，也希望有兴趣者共同探讨目前还没有实现的功能如何来实现。

lgcmeli

兴趣是最好的老师，自娱自乐挺好~~~

于箱长

牛掰

大灰狼1976

发一个最简功能的附件，核心3句，整体代码不复杂。
工作表的参数可以自由调整测试。

jaxxcyh

Excel里只支持RGB颜色，请问大师，怎么在Excel里做出支持Alpha通道的透明图片的效果？

大灰狼1976

jaxxcyh 发表于 2024-8-15 17:29
Excel里只支持RGB颜色，请问大师，怎么在Excel里做出支持Alpha通道的透明图片的效果？

你举个例子，excel图形是可以设置透明度的，插入png也可以，要做一个透明图片不太清楚，可以参考下其他帖子