[發問] 請問怎用VBA 選取有空格的範圍格

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2019-12-13 20:44 | 只看該作者

安安問一下各位請問怎麼用VBA做到圖片一樣找到總列數跟行數 , 然後為他們打上線格 (*注意一下中間有不帶上線的格的)

擷取.PNG (55.76 KB)

Book1.rar (6.68 KB)

3^#

發表於 2019-12-14 21:01 | 只看該作者

謝謝大大的教學

2^#

發表於 2019-12-14 10:02 | 只看該作者

本帖最後由蒼雪於 2019-12-14 10:04 編輯

回復 1# adrian_9832

我做的很簡略，可以試用看看...

不過前提是A欄要有資料的情況下。

Sub test()
x = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To x
If Cells(i, 1) <> "" Then Cells(i, 1).CurrentRegion.Borders.LineStyle = xlContinuous
Next i
End Sub

複製代碼

靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。

[發問] 請問怎用VBA 選取 有空格的範圍格