關于遠眺圖有用嗎，遠眺圖這個問題很多朋友還不知道，今天小六來為大家解答以上的問題，現在讓我們一起來看看吧！
1、我有，這個是用Excel造出來的，你可以根據自己的需要自己調整；造好后，截圖另存為高清圖片實現的。
2、這個是實現的VBA代碼。
3、Sub 繪制遠眺圖()***.screenupdating = False***.clearDim i As Long? ? For i = 0 To 100? ? Range(Range("DZ150").Offset(i * -1, i * -1), Range("DZ150").Offset(i + 1, i + 1)).Select? ? MediumBorders? ? Next? ?***.screenupdating = 1End SubSub MediumBorders()***.borders(xlDiagonalDown).LineStyle = xlNone? ? ***.borders(xlDiagonalUp).LineStyle = xlNone? ? With ***.borders(xlEdgeLeft)? ? ? ? .LineStyle = xlContinuous? ? ? ? ?.ThemeColor = 2? ? ? ? .TintAndShade = 0? ? ? ? .Weight = xlMedium? ? End With? ? With ***.borders(xlEdgeTop)? ? ? ? .LineStyle = xlContinuous? ? ? ? ?.ThemeColor = 2? ? ? ? .TintAndShade = 0? ? ? ? .Weight = xlMedium? ? End With? ? With ***.borders(xlEdgeBottom)? ? ? ? .LineStyle = xlContinuous? ? ? ? ?.ThemeColor = 2? ? ? ? .TintAndShade = 0? ? ? ? .Weight = xlMedium? ? End With? ? With ***.borders(xlEdgeRight)? ? ? ? .LineStyle = xlContinuous? ? ? ? ?.ThemeColor = 2? ? ? ? .TintAndShade = 0? ? ? ? .Weight = xlMedium? ? End WithEnd Sub。
本文分享完畢，希望對大家有所幫助。
標簽：
免責聲明：本文由用戶上傳，與本網站立場無關。財經信息僅供讀者參考，并不構成投資建議。投資者據此操作，風險自擔。 如有侵權請聯(lián)系刪除！