標題: [發問] 自動分段標示和總計列最大數標示的語法。 [打印本頁]
作者: papaya 時間: 2020-12-26 21:46 標題: 自動分段標示和總計列最大數標示的語法。
[attach]32890[/attach]
測試檔 : [attach]32891[/attach]
希望能依據第2列的文字做分段的各起始欄(由B欄算起)~
1_將各偶數段落(由B欄算起)的A3:A14標示34號底色和5號粗框線。
2_將第14列(總計)各個段落的最大數標示38號底色
請詳見”五行”工作表。
PS︰”八卦”,”生肖”,”均值”等工作表可當作測試檔。
請問 : 以上2項的需求語法，應該如何編寫 ?
敬請各位大大不吝指導是幸 !
謝謝 !
作者: luhpro 時間: 2020-12-27 22:13
測試檔 : 希望能依據第2列的文字做分段的各起始欄(由B欄算起)~1_將各偶數段落(由B欄算起)的A3:A14標示3 ...
papaya 發表於 2020-12-26 21:46 
感覺上底下這個討論串已經可以達到你的需求了:
[發問] 不定區域段落的格式化語法。
作者: papaya 時間: 2020-12-28 09:23
本帖最後由 papaya 於 2020-12-28 09:36 編輯
回復 2# luhpro
Luhpro大大 :
感謝您的提醒~
我也是看到該題，才知道能以一式程式碼解決各種不同排序的檔案。
因為我下載源的表格是號碼在第1列，第2列空白，所以分段標題只能填在第2列。
有將該題的n大解答 :
列17 K = 0: Set Rg = [A1].End(2)程式碼改為 K = 0: Set Rg = [A2].End(2)
列39 ‘Cells(Rrr(K), Crr(K)).Resize(, C_Cnt).Interior.ColorIndex = 36 改為註解
其餘程式碼都沒有更動(因為總計和小計是以"計"為搜尋關鍵字，所以不敢亂動)~
只可惜，牽一髮動全身，改為A2後的各種排序之最後一個段落都失效了(最後一個段落的前3大的標示和框線範圍都不對了)。
雖然我的需求比較簡單~沒有小計，只有總計，而且總計列固定在第14列，
但不知道改為A2後的其它程式碼有哪些是相關的，所以就更不知道怎麼修改了
目前只能更改下載源格式表格~將第1列號碼移到第2列，再將標題填在第1列~以n大的原解答(Ans_5)(列39改為註解)暫用。
不好意思，該題(Ans_14)的貴解，我才剛下載，尚未作詳細測試和研讀，因此現在並沒有針對貴解做討論(有結論後，再向您報告)~
請見諒~謝謝您
作者: n7822123 時間: 2020-12-30 00:14
回復 3# papaya
厄......原來是這樣阿，我還在想，怎麼一樣的題目，不同人再發一次呢.......
直接用原本的程式改給你，你應該是有地方沒改到，檔案如下
[attach]32911[/attach]
作者: papaya 時間: 2020-12-30 00:49
回復 4# n7822123
n7822123大大 : 您好 !
測試成功
謝謝您的幫忙和指導
| 歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/) |
|