因?yàn)楣ぷ髦薪?jīng)常需要用到惯雳，我便寫了這個(gè)小程序队橙，在Excel中繪制巖性柱狀圖。
在MS Excel 2010, 2013中測(cè)試通過连躏。
該程序有以下特點(diǎn)：
1. 極簡(jiǎn)剩岳，占用極少資源
2. 極快速
3.使用Excel的圖形填充圖案填充巖性及顏色，允許自定義
4.根據(jù)整口鉆井巖性自動(dòng)生成巖性表
5.允許自定義巖性的圖案長(zhǎng)短
6.巖性和巖性描述完全支持中文
使用說明：
0. 打開excel入热，會(huì)詢問是否啟用該宏拍棕。選是。
1. 在1-4列輸入巖性段的開始深度勺良、結(jié)束深度绰播、巖性以及巖性說明
2. 使用按鈕1生成整口鉆井的巖性列表及隨機(jī)的巖性繪制寬度。自定義巖性繪制寬度
3. 使用按鈕2生成巖性填充圖案尚困，可以自定義巖性填充圖案
圖例填充圖案的自定義
4. 定義其他的參數(shù)
zoomindex--縱向放大蠢箩，需要為數(shù)字
Lith Descr Col.? No. (don't change)--巖性描述所在列數(shù)，需要數(shù)字
Litho Des Col. Width--巖性描述繪制寬度事甜，需要數(shù)字
Litho Des Text Size--巖性描述文字大小谬泌，需要數(shù)字
Litho Max. Width--巖性柱的最大寬度，需要數(shù)字
Litho Column line weight -- 巖性柱線條寬度逻谦，需要數(shù)字
Depth From Col.--巖性段深度起始的列數(shù)掌实，需要數(shù)字
Lith Descr Text Color -- 巖性描述繪制的文字顏色，需要從下拉列表中選擇
Lith Border Line Color -- 巖性柱巖性周圍邊框的顏色邦马，需要從下拉列表中選擇
5. 點(diǎn)擊按鈕3贱鼻，繪制。
6.繪制后的柱狀圖勇婴，深度標(biāo)尺、巖性柱和巖性說明三列分別單獨(dú)群組嘱腥，方便移動(dòng)耕渴、刪除其中的一組（在繪制的圖形上右鍵----解除群組）。生成的巖性柱可以直接拷貝到PPT齿兔、Word以及其他的繪圖軟件中進(jìn)行加工橱脸。
下載地址：
