» 遊客:  加入 | 登入 (帳號有問題請連絡TWed2k@gmail.com)


 


 TWed2k » 程式開發討論區 » EXCEL VBA 求解... RSS   



  可打印版本 | 推薦給朋友 | 訂閱主題 | 收藏主題 | 純文字版  


 

 
主題: [其他] EXCEL VBA 求解...   字型大小：小|中|大|巨  ← →
oscar731130
鐵驢友〔初級〕
等級： 4


今日心情

 ． 積分： 29
 ． 文章： 99
 ． 收花： 217 支
 ． 送花： 150 支
 ． 比例： 0.69
 ． 在線： 874 小時
 ． 瀏覽： 4390 頁
 ． 註冊： 6993 天
 ． 失蹤： 241 天
 ． 新竹縣
#1 : 2015-10-18 08:43 PM     只看本作者 送鮮花給本文章，以表示喜愛之意，點花數可看送花者名單送花 (3) 引言回覆
以下是我的程式碼：我要達成的目的是，當點選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


[如果你喜歡本文章，就按本文章之鮮花～送花給作者吧，你的支持就是別人的動力來源]
本文連接  
檢閱個人資料  發私人訊息  Blog  快速回覆 新增/修改 爬文標記
LiuRambo
金驢友〔初級〕
等級： 16等級： 16等級： 16等級： 16
我缺錢

十週年紀念徽章（二級）  

今日心情

 ． 積分： 2086
 ． 文章： 4914
 ． 收花： 18694 支
 ． 送花： 15318 支
 ． 比例： 0.82
 ． 在線： 2069 小時
 ． 瀏覽： 13400 頁
 ． 註冊： 7236 天
 ． 失蹤： 648 天
#2 : 2015-10-20 03:58 PM     只看本作者 送鮮花給本文章，以表示喜愛之意，點花數可看送花者名單送花 (3) 引言回覆
有試過用手動操作變更格式 然後用vba錄製巨集來看看到底是不是下錯指令


[如果你喜歡本文章，就按本文章之鮮花～送花給作者吧，你的支持就是別人的動力來源]
本文連接  
檢閱個人資料  發私人訊息  Blog  快速回覆 新增/修改 爬文標記
kenmen
銅驢友〔高級〕
等級： 10等級： 10等級： 10
台灣跟大陸的頻寬果然『真』的不一樣！！！

今日心情

 ． 積分： 181
 ． 文章： 502
 ． 收花： 392 支
 ． 送花： 59 支
 ． 比例： 0.15
 ． 在線： 3870 小時
 ． 瀏覽： 129381 頁
 ． 註冊： 7429 天
 ． 失蹤： 309 天
#3 : 2015-12-15 07:31 AM     只看本作者 送鮮花給本文章，以表示喜愛之意，點花數可看送花者名單送花 (6) 引言回覆
去这个论坛可以找到你所需要的答案！
http://club.excelhome.net/forum.php


[如果你喜歡本文章，就按本文章之鮮花～送花給作者吧，你的支持就是別人的動力來源]
本文連接  
檢閱個人資料  發私人訊息  Blog  快速回覆 新增/修改 爬文標記
icon
鐵驢友〔初級〕
等級： 4


 ． 積分： 34
 ． 文章： 115
 ． 收花： 193 支
 ． 送花： 3 支
 ． 比例： 0.02
 ． 在線： 339 小時
 ． 瀏覽： 8641 頁
 ． 註冊： 7463 天
 ． 失蹤： 3205 天
#4 : 2016-1-4 09:41 PM     只看本作者 送鮮花給本文章，以表示喜愛之意，點花數可看送花者名單送花 (2) 引言回覆
因為excel 2003沒有那個參數碼
你用ui拉的時候,有看到excel 2003有和excel 2010一樣的框線格式和顏色設定嗎?


[如果你喜歡本文章，就按本文章之鮮花～送花給作者吧，你的支持就是別人的動力來源]
本文連接  
檢閱個人資料  發私人訊息  Blog  快速回覆 新增/修改 爬文標記
longbest
初出茅驢
等級： 1


 ． 積分： 4
 ． 文章： 7
 ． 收花： 9 支
 ． 送花： 5 支
 ． 比例： 0.56
 ． 在線： 115 小時
 ． 瀏覽： 2910 頁
 ． 註冊： 7103 天
 ． 失蹤： 1979 天
#5 : 2016-2-24 10:18 AM     只看本作者 送鮮花給本文章，以表示喜愛之意，點花數可看送花者名單送花 (0) 引言回覆
應該這麼說
新版大多會向下相容，但是舊版不太可能向上相容
所以應該在舊版環境開發比較不會出問題


[如果你喜歡本文章，就按本文章之鮮花～送花給作者吧，你的支持就是別人的動力來源]
本文連接  
檢閱個人資料  發私人訊息  Blog  快速回覆 新增/修改 爬文標記

   

快速回覆
表情符號

更多 Smilies

字型大小 : 小|中|大|巨      [完成後可按 Ctrl+Enter 發佈]        

溫馨提示：本區開放遊客瀏覽。
選項:
關閉 URL 識別    關閉 表情符號    關閉 Discuz! 代碼    使用個人簽名    接收新回覆信件通知
發表時自動複製內容   [立即複製] (IE only)


 



所在時區為 GMT+8, 現在時間是 2024-12-4 05:08 PM		 清除 Cookies - 連絡我們 - TWed2k © 2001-2046 - 純文字版 - 說明
Discuz! 0.1 | Processed in 0.024678 second(s), 6 queries , Qzip disabled