Board logo

主題: [其他] EXCEL VBA 求解... [打印本頁]

發表人: oscar731130    時間: 2015-10-18 08:43 PM     主題: EXCEL VBA 求解...

以下是我的程式碼:我要達成的目的是,當點選A儲存格時,該列、行的外框會變色及變粗。再點選B儲存格時,A儲存格該列、行恢復原有格式,換成B儲存格的列、行變外框變色變粗。但目前我只會寫到外框變色的程式,不會寫變粗的程式,有誰可以幫忙?還有就是我這段程式碼在Excel 2010版不會跳錯誤訊息,但在excel 2003版就會跳錯誤訊息(如下),為什麼呢??

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Cells.FormatConditions.Delete
With Columns(Target.Column).FormatConditions
  .Delete
  .Add xlExpression, , "true"
  .Item(1).Borders(7).ColorIndex = 5 '<---Excel 2003版會在這行跳出:執行階段錯誤'1004':
  .Item(1).Borders(10).ColorIndex = 5                                       '無法設定種類Border的Colorindex屬性
End With
With Rows(Target.Row).FormatConditions
  .Delete
  .Add xlExpression, , "true"
  .Item(1).Borders(8).ColorIndex = 5
  .Item(1).Borders(9).ColorIndex = 5
End With
End Sub
發表人: LiuRambo    時間: 2015-10-20 03:58 PM

有試過用手動操作變更格式 然後用vba錄製巨集來看看到底是不是下錯指令
發表人: kenmen    時間: 2015-12-15 07:31 AM

去这个论坛可以找到你所需要的答案!
http://club.excelhome.net/forum.php
發表人: icon    時間: 2016-1-4 09:41 PM

因為excel 2003沒有那個參數碼
你用ui拉的時候,有看到excel 2003有和excel 2010一樣的框線格式和顏色設定嗎?
發表人: longbest    時間: 2016-2-24 10:18 AM

應該這麼說
新版大多會向下相容,但是舊版不太可能向上相容
所以應該在舊版環境開發比較不會出問題




歡迎光臨 TWed2k (http://twed2k.org/) Powered by Discuz! 4.1.0