I want to stop my module converting unicode into ansi so that I do not lose unicode characters such as greek addresses.
How can I modify my code to incorporate the principle described? http://accessblog.net/2007/06/how-to...-files-in.html
Here is the existing module code:
Public Function formatAddress(v1, v2, v3, v4, v5, v6, v7)
Dim output As String
Dim addressArray(7) As String
Dim i As Integer
addressArray(1) = v1 & ""
addressArray(2) = v2 & ""
addressArray(3) = v3 & ""
addressArray(4) = v4 & ""
addressArray(5) = v5 & ""
addressArray(6) = v6 & ""
addressArray(7) = v7 & ""
i = 1
For i = 1 To 7
If (addressArray(i) = "") = False Then
output = output & addressArray(i) & vbCrLf
End If
Next
formatAddress = output
End Function
I'm not much good at programming, thanks for any help with this!