my code reads
dim rowCount As Integer
rowCount = Range("J1").CurrentRegion.Rows.Count
For i = 1 To rowCount
Range("J:" & i) = Application.WeekNum(Range("K:" & i))
Next i
Note - Column K are date formatted and column J is number formatted.
Error message "Run-time error '1004'
Method 'Range' of object'_Global' failed
dim rowCount As Integer
rowCount = Range("J1").CurrentRegion.Rows.Count
For i = 1 To rowCount
Range("J:" & i) = Application.WeekNum(Range("K:" & i))
Next i
Note - Column K are date formatted and column J is number formatted.
Error message "Run-time error '1004'
Method 'Range' of object'_Global' failed