Hi Paul
Thanks very much for your suggestion. Before I play around with functions which I've never tried to use before I thought I'd try your field code.
In my document I had two fields, one for balance and one for interest rate. I've already had assistance in splitting the balance and turning this from a numeric string into words as below:-
Dim iSumOne As String
iSumOne = Me.ComboBox11.Value
oVars("SumOnePounds") = Split(iSumOne, Chr(46))(0)
If InStr(1, iSumOne, Chr(46)) > 0 Then
oVars("SumOnePence") = Split(iSumOne, Chr(46))(1)
Else
oVars("SumOnePence") = vbNullString
End If
If Me.ComboBox11.Value = vbNullString And Me.ComboBox12.Value = vbNullString Then
iSumOne = vbNullString
oVars("SumOnePounds") = vbNullString
oVars("SumOnePence") = vbNullString
End If
End If
So what I tried was just doing the same with the interest figure but it was at that point I realised I was stuck:-
Dim iSumOne As String, iIntOne As StringiSumOne = Me.ComboBox11.Value
iIntOne = Me.ComboBox12.Value 'The number to be processed
oVars("SumOnePounds") = Split(iSumOne, Chr(46))(0)
oVars("IntOnePounds") = Split(iIntOne, Chr(46))(0)
If InStr(1, iSumOne, Chr(46)) > 0 Then
oVars("SumOnePence") = Split(iSumOne, Chr(46))(1)
oVars("IntSumPence") = Split(iIntOne, Chr(46))(1)
Else
oVars("SumOnePence") = vbNullString
oVars("IntOnePence") = vbNullString
End If
If Me.ComboBox11.Value = vbNullString And Me.ComboBox12.Value = vbNullString Then
iSumOne = vbNullString
iIntOne = vbNullString
oVars("SumOnePounds") = vbNullString
oVars("SumOnePence") = vbNullString
oVars("IntOnePounds") = vbNullString
oVars("IntOnePence") = vbNullString
End If
End If
Am I right in thinking that in your example I can just have one DocVariable for interest without having to mess about splitting it and the formatting itself will do the heavy lifting?
Sorry for all the questions, I'm getting into deeper water here than I've done previously.
Thanks
Dav