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

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

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

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

擷取.PNG (55.76 KB)

Book1.rar (6.68 KB)

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

複製代碼

3^#

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

謝謝大大的教學

靜思自在 : 布施如播種，以歡喜心滋潤種子，才會發芽。

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