Board logo

標題: [發問] 請問怎用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. For i = 1 To x
  4.     If Cells(i, 1) <> "" Then Cells(i, 1).CurrentRegion.Borders.LineStyle = xlContinuous
  5. Next i
  6. End Sub
複製代碼

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

謝謝 大大的教學




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