Alex,
"Upper" is not part of the Excel Object Model particularly the
Application.WorksheetFunctions object.
However, VBA's UCase should work fine for you:
dist = UCase$(dst)
NOTE: While your in any VB editor you can hit "F2" for the Object Browser.
Here, you can search for any command like "Upper" ro "UCase".
Sonny Kocak
Microsoft Developer Community Support
Email : (e-mail address removed)
This posting is provided "AS IS" with no warranties, and confers no rights.
--------------------
| Date: Tue, 06 Apr 2004 21:53:44 +0200
| From: y <
[email protected]>
| User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.4)
Gecko/20030624
| X-Accept-Language: en-us, en
| MIME-Version: 1.0
| Subject: Application.WorksheetFunction.Upper
| Content-Type: text/plain; charset=us-ascii; format=flowed
| Content-Transfer-Encoding: 7bit
| Message-ID: <
[email protected]>
| Newsgroups: microsoft.public.excel.programming
| NNTP-Posting-Host: ppp-121-118.98-62.inwind.it 62.98.118.121
| Lines: 1
| Path: cpmsftngxa06.phx.gbl!TK2MSFTNGP08.phx.gbl!tk2msftngp13.phx.gbl
| Xref: cpmsftngxa06.phx.gbl microsoft.public.excel.programming:484443
| X-Tomcat-NG: microsoft.public.excel.programming
|
| Function Test(Classe, osserv As Range, Dst As String, ParA, ParB) As
Single
| ...
| Dist as string
| ...
| Dist = Application.WorksheetFunction.Upper(Dst)
| ...
|
| executing the "Dist = ..." statement VBA stops abnormally (without any
message)
|
| Have you encountered this problem?
|
| Alex.
|
|