返回列表 上一主題 發帖

關於跨欄置中和框線畫線是否有比較簡易的寫法(謝謝各位大大,已解決。)

回復 1# av8d
  1. Sub aa()
  2. [A1:G1].Merge
  3. [A1:G1].HorizontalAlignment = xlCenter
  4. [A2:G2].Merge
  5. [A2:G2].HorizontalAlignment = xlCenter
  6. End Sub
  7. Sub bb()
  8. [A1:G1].UnMerge
  9. [A2:G2].UnMerge
  10. End Sub
  11. Sub cc()
  12. [A1:G2].Borders.LineStyle = xlContinuous
  13. End Sub
複製代碼

TOP

        靜思自在 : 君子如水,隨方就圓,無處不自在。
返回列表 上一主題