Browse Source

Added missing "End Function"

Toastie 3 years ago
parent
commit
1712cc81a2
1 changed files with 3 additions and 1 deletions
  1. 3 1
      microsoft/excel/functions/ConcatenateRange.vba

+ 3 - 1
microsoft/excel/functions/ConcatenateRange.vba

@@ -20,4 +20,6 @@ If Len(newString) <> 0 Then
     newString = Right$(newString, (Len(newString) - Len(seperator)))
 End If
 
-ConcatenateRange = newString
+ConcatenateRange = newString
+
+End Function