Envelopes ... need all caps

[ConversionError]

I'm part of a team that's converting some inherited
databases from Access97 to 2003. All of our envelopes must
have all caps in the addresses for our mail center to
process them. In Access97, we simply dropped the ">" in
the report format with a ton of logical stuff in the
mailing address text box. This is a database used to record
data collected in the field, so this somewhat heinous logic
has taken care of changed information in the past. Now, if
we take out the ">", it will insert the correct
information; however, I cannot figure out how to make it
capitalize. Is there an easy way?

Ex.

=[mailname] & Chr$(13) & Chr$(10) & "ATTN: " &
[contactmr/dr/ms] & " " & [contactfirstname] & " " &
[contactlastname] & Chr$(13) & Chr$(10) & [contacttitle] &
Chr$(13) & Chr$(10) &
IIf(IsNull([contactaddress1]),([mailaddress1] & Chr$(13) &
Chr$(10) & IIf(IsNull([mailaddress2])," ",[Mailaddress2] &
Chr$(13) & Chr$(10)) & [mailcity] & " " & [MailState] & "
" & [MailZip]),[contactaddress1] & Chr$(13) & Chr$(10) &
IIf(IsNull([contactaddress2])," ",[contactaddress2] &
Chr$(13) & Chr$(10)) & [contactcity] & " " & [contactste] &
" " & [contactzip])

Thanks,
CE

 

[fredg]

I'm part of a team that's converting some inherited
databases from Access97 to 2003. All of our envelopes must
have all caps in the addresses for our mail center to
process them. In Access97, we simply dropped the ">" in
the report format with a ton of logical stuff in the
mailing address text box. This is a database used to record
data collected in the field, so this somewhat heinous logic
has taken care of changed information in the past. Now, if
we take out the ">", it will insert the correct
information; however, I cannot figure out how to make it
capitalize. Is there an easy way?

Ex.

=[mailname] & Chr$(13) & Chr$(10) & "ATTN: " &
[contactmr/dr/ms] & " " & [contactfirstname] & " " &
[contactlastname] & Chr$(13) & Chr$(10) & [contacttitle] &
Chr$(13) & Chr$(10) &
IIf(IsNull([contactaddress1]),([mailaddress1] & Chr$(13) &
Chr$(10) & IIf(IsNull([mailaddress2])," ",[Mailaddress2] &
Chr$(13) & Chr$(10)) & [mailcity] & " " & [MailState] & "
" & [MailZip]),[contactaddress1] & Chr$(13) & Chr$(10) &
IIf(IsNull([contactaddress2])," ",[contactaddress2] &
Chr$(13) & Chr$(10)) & [contactcity] & " " & [contactste] &
" " & [contactzip])

Thanks,
CE

Wrap the expression in a UCase() function.

=UCase([mailname] & Chr$(13) & Chr$(10) & "ATTN: " &
[contactmr/dr/ms] & " " & [contactfirstname] & " " &
etc ... & [contactzip]))

 

[Guest]

Thanks! I will try that tomorrow!!!!

-----Original Message-----

I'm part of a team that's converting some inherited
databases from Access97 to 2003. All of our envelopes must
have all caps in the addresses for our mail center to
process them. In Access97, we simply dropped the ">" in
the report format with a ton of logical stuff in the
mailing address text box. This is a database used to record
data collected in the field, so this somewhat heinous logic
has taken care of changed information in the past. Now, if
we take out the ">", it will insert the correct
information; however, I cannot figure out how to make it
capitalize. Is there an easy way?

Ex.

=[mailname] & Chr$(13) & Chr$(10) & "ATTN: " &
[contactmr/dr/ms] & " " & [contactfirstname] & " " &
[contactlastname] & Chr$(13) & Chr$(10) & [contacttitle] &
Chr$(13) & Chr$(10) &
IIf(IsNull([contactaddress1]),([mailaddress1] & Chr$(13) &
Chr$(10) & IIf(IsNull([mailaddress2])," ",[Mailaddress2] &
Chr$(13) & Chr$(10)) & [mailcity] & " " & [MailState] & "
" & [MailZip]),[contactaddress1] & Chr$(13) & Chr$(10) &
IIf(IsNull([contactaddress2])," ",[contactaddress2] &
Chr$(13) & Chr$(10)) & [contactcity] & " " & [contactste] &
" " & [contactzip])

Thanks,
CE

Wrap the expression in a UCase() function.

=UCase([mailname] & Chr$(13) & Chr$(10) & "ATTN: " &
[contactmr/dr/ms] & " " & [contactfirstname] & " " &
etc ... & [contactzip]))
--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.
.