Board logo

標題: [發問] 以vba判斷最後1筆資料後畫上框線 [打印本頁]

作者: BV7BW    時間: 2021-8-13 15:20     標題: 以vba判斷最後1筆資料後畫上框線

請教 各位 先進 前輩 老師們


工作表1:為固定格數畫框線

工作表2:如何以vba判斷最後1筆資料後畫上框線


謝謝 指導[attach]33893[/attach]
作者: samwang    時間: 2021-8-13 15:53

回復 1# BV7BW

是這樣嗎?

R = Range("a65536").End(xlUp).Row
Range("A1:C" & R).Borders.LineStyle = xlContinuous '實線
作者: BV7BW    時間: 2021-8-13 15:58

回復 2# samwang
謝謝 samwang 大大

就是這樣 需求沒錯

非常感謝
作者: BV7BW    時間: 2021-8-13 16:05

回復 2# samwang

請問 samwang 大大
    現在是以A為基準去判斷
如可以A.B.C.3個判斷點可行?
因有時"A"沒資料或""B"沒資料.或"C沒資料
但一定在"A""B""C"中3格中其中必有1格會友資料
謝謝 指導
作者: singo1232001    時間: 2021-8-13 16:12

回復 4# BV7BW


    R = Columns("A:C").Find("*", , -4163, , 1, 2).Row
Range("A1:C" & R).Borders.LineStyle = xlContinuous
作者: BV7BW    時間: 2021-8-13 16:18

回復 5# singo1232001

感謝 singo1232001 大大 指導

現在已完全運用
謝謝'singo1232001 大大 指導




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)