返回列表 上一主題 發帖

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

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

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

Book1.rar (6.68 KB)

本帖最後由 蒼雪 於 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
複製代碼

TOP

謝謝 大大的教學

TOP

        靜思自在 : 改變自己是自救,影響別人是救人。
返回列表 上一主題