
英単語について文字ごとに点数を設定し、その単語が何点になるか計算する関数を作ろうとしています。以下の通り書いたのですが、セルを指定しても=wscore("apple")と指定しても#Name?エラーが返ってきます。どうしてでしょうか?
エクセル2003です。よろしくお願いいたします。
Public Function Wscore(w As String) As Integer
Dim i, s As Integer
Dim wd, ws As String
'入力文字列を大文字に変換
wd = LCase(w)
'文字数(ループ回数)を取得
For i = 1 To Len(wd)
'i番目の文字を取得
ws = Mid(wd, i, 1)
'点数を検索
Select Case ws
Case "a", "e", "i", "l", "n", "o", "r", "s", "t", "u"
s = 1
Case "d", "g"
s = 2
Case "b", "c", "m", "p"
s = 3
Case "f", "h", "t", "v", "w"
s = 4
Case "k"
s = 5
Case "j", "x"
s = 8
Case "q", "z"
s = 10
End Select
'得点に足す
Wscore = Wscore + s
'次の処理へ
Next i
End Function
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
【VBA】ユーザ定義関数が動かない
Excel(エクセル)
-
関数名は合っているのに#NAME?と表示される
Windows Vista・XP
-
エクセルのユーザー定義関数呼び出し方法
Excel(エクセル)
-
-
4
ユーザー定義関数をEXCELに常駐させたい
その他(コンピューター・テクノロジー)
-
5
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
6
特定のシートのみ再計算させない方法は?
Excel(エクセル)
-
7
Excelのセルにユーザー名を表示する方法
Excel(エクセル)
-
8
VBA 変数名に変数を使用したい。
Visual Basic(VBA)
-
9
PCによってエクセル関数が出てこない?
Excel(エクセル)
-
10
Excel VBAで組んだ自作関数が認識されない
その他(プログラミング・Web制作)
-
11
特定セルの内容を更新したら、その更新日を自動的に表示する方法について
Excel(エクセル)
-
12
エクセルvba (ByVal Target As Range)について
Excel(エクセル)
-
13
コマンドボタンを押すたびに大きくなってしまう
Excel(エクセル)
-
14
VBAで配列の計算
Excel(エクセル)
-
15
エクセルでアルファベットか数値の判定をしたいのですが
Excel(エクセル)
-
16
条件付き書式のコピーについて(参照先も自動で変更したい)
Excel(エクセル)
-
17
VBAでの Replace関数で、ワイルドカードは使えないのでしょうか?
Visual Basic(VBA)
-
18
Changeイベントでの複数セルのクリアの処理について
Visual Basic(VBA)
-
19
vba クリップボードクリアについて教えてください
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBでグローバル変数を宣言するには
-
VBA This Workbookモジュール...
-
モジュールからフォームのボタ...
-
Excel VBAで、ユーザーフォーム...
-
エクセルVBAでシートモジュール...
-
モジュールの最大数はいくつな...
-
SendKeysの使い方について
-
Excelシート内セル記述の違いに...
-
VBA ユーザーフォーム Image1 ...
-
システム改善時の影響プログラ...
-
エクセルVBA クラスモジュール...
-
Excel VBA 『Call』で呼び出す...
-
'Range'メソッドは失敗しました
-
クラスモジュールを使わないと...
-
現在アクティブなフォーム名を...
-
Workbook.BeforeSave イベント...
-
ExcelVBA:パブリック オブジェ...
-
VBAで「メモリが不足しています」
-
右クリック時に押した所の名前...
-
BASP21 のようなコンポーネント
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBAでリンク切れをチェッ...
-
エクセルVBAでシートモジュール...
-
VBでグローバル変数を宣言するには
-
ユーザー定義関数に#NAME?が返...
-
Excel VBAで、ユーザーフォーム...
-
Excel VBA 定義されたプロージ...
-
vba userFormのSubを標準モジュ...
-
標準モジュールを削除したい。(...
-
'Range'メソッドは失敗しました
-
VBAで別モジュールへの変数の受...
-
モジュールからフォームのボタ...
-
モジュールの最大数はいくつな...
-
グラフのX,Y座標を取得したい
-
モジュールとクラスの違いって...
-
【vba】フォームに書いてあ...
-
Form間の値の渡し方
-
VBのフォームモジュールと標準...
-
VBA モジュールで共通に使う変...
-
Excel VBA 『Call』で呼び出す...
-
acwzlibとは?
おすすめ情報
'入力文字列を大文字に変換、は本来なら'入力文字列を小文字に変換ですね。コメントの編集ミスです。