Remove extra blank lines at start
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user