因为工作中经常需要用到，我便写了这个小程序，在Excel中绘制岩性柱状图。
在MS Excel 2010, 2013中测试通过。
该程序有以下特点：
1. 极简，占用极少资源
2. 极快速
3.使用Excel的图形填充图案填充岩性及颜色，允许自定义
4.根据整口钻井岩性自动生成岩性表
5.允许自定义岩性的图案长短
6.岩性和岩性描述完全支持中文
使用说明：
0. 打开excel，会询问是否启用该宏。选是。
1. 在1-4列输入岩性段的开始深度、结束深度、岩性以及岩性说明
2. 使用按钮1生成整口钻井的岩性列表及随机的岩性绘制宽度。自定义岩性绘制宽度
3. 使用按钮2生成岩性填充图案，可以自定义岩性填充图案
图例填充图案的自定义
4. 定义其他的参数
zoomindex--纵向放大，需要为数字
Lith Descr Col. No. (don't change)--岩性描述所在列数，需要数字
Litho Des Col. Width--岩性描述绘制宽度，需要数字
Litho Des Text Size--岩性描述文字大小，需要数字
Litho Max. Width--岩性柱的最大宽度，需要数字
Litho Column line weight -- 岩性柱线条宽度，需要数字
Depth From Col.--岩性段深度起始的列数，需要数字
Lith Descr Text Color -- 岩性描述绘制的文字颜色，需要从下拉列表中选择
Lith Border Line Color -- 岩性柱岩性周围边框的颜色，需要从下拉列表中选择
5. 点击按钮3，绘制。
6.绘制后的柱状图，深度标尺、岩性柱和岩性说明三列分别单独群组，方便移动、删除其中的一组（在绘制的图形上右键----解除群组）。生成的岩性柱可以直接拷贝到PPT、Word以及其他的绘图软件中进行加工。
下载地址：
