Remove extra blank lines at start

This commit is contained in:
updsv7
2026-04-13 17:44:31 +09:00
parent 2461379836
commit e7cfa66995

View File

@@ -1,5 +1,3 @@
Sub ClearRowData(ByVal ws As Worksheet, ByVal rowNum As Long)
' Clear from D column onwards
ws.Range(ws.Cells(rowNum, 4), ws.Cells(rowNum, 15)).ClearContents