Samme kode (custom_split) i 2 moduler (update2 og update3)
Hej,Jeg har denne i 2 forskellige moduler:
Function custom_split(str As String, num As Long, minlen As Integer, Optional delimeter As String = " ") As String
Dim substrs() As String
substrs = Split(str, delimeter)
If UBound(substrs) < num Then
custom_split = ""
Else
custom_split = Trim(substrs(num))
End If
If Len(custom_split) = 1 And minlen = 2 Then custom_split = "0" & custom_split
End Function
Hvor skal jeg indsætte modul navnet for at den virker begge steder ?
(eller hvad kan jeg gøre for at det virker i dem begge ? feks. ændre navn )
Mvh. Henrik