標題: [發問] 請問怎用VBA 選取 有空格的範圍格 [打印本頁]

---

作者: adrian_9832    時間: 2019-12-13 20:44     標題: 請問怎用VBA 選取 有空格的範圍格

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

---

作者: 蒼雪    時間: 2019-12-14 10:02

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

回復 1# adrian_9832


    我做的很簡略，可以試用看看...
   
    不過前提是A欄要有資料的情況下。

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

複製代碼

---

作者: adrian_9832    時間: 2019-12-14 21:01

謝謝 大大的教學

---

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