Excel VABについて
下記記述が『SubまたはFunctionが定義されていません』とエラーメッセージが表示されます。
WorksheetFunctionはIndex、Matchを一緒に使えないのでしょうか?また一緒に使えない場合どのようにしたら良いか教えて頂けると幸いです。宜しくお願い致します。
txtPrdCD = WorksheetFunction.Index(Worksheets("商品マスタ").Range("E5:E31"), Match(cmbPrd, Worksheets("商品マスタ").Range("D5:D31"), 0), 1)
------------------------------
※下記IndexとMatchをそれぞれ実行は可能でした
WorksheetFunction.Index(Worksheets("商品マスタ").Range("E5:E31"),5, 1)
WorksheetFunction. Match(cmbPrd, Worksheets("商品マスタ").Range("D5:D31"), 0)
No.2ベストアンサー
- 回答日時:
こんばんは。
Matchに、WorksheetFunction が抜けているからでは?
下記で、デバッグのコンパイルは通りました。
With WorksheetFunction
txtPrdCD = .Index(Worksheets("商品マスタ").Range("E5:E31"), .Match(cmbprd, Worksheets("商品マスタ").Range("D5:D31"), 0), 1)
End With
No.3
- 回答日時:
こんばんは
Range("E5:E31"), Match(cmbPrd,
このMatchはWorksheetFunctionとして扱われません
txtPrdCD = WorksheetFunction.Index(Worksheets("商品マスタ").Range("E5:E31"), WorksheetFunction.Match(cmbPrd, Worksheets("商品マスタ").Range("D5:D31"), 0), 1)
とか
With WorksheetFunction
txtPrdCD = .Index(Worksheets("商品マスタ").Range("E5:E31"), .Match(cmbPrd, Worksheets("商品マスタ").Range("D5:D31"), 0), 1)
End With
とか・・ですね
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
ちょっと先の未来クイズ第2問
9月9日(月)に発表される「第3回子どもマネー川柳」に入賞する川柳を考えてこちらに投稿してください。
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
初歩的な事だと思います。 Sub または Function が定義されていません。
Visual Basic(VBA)
-
SubまたはFunctionが定義されていません
その他(Microsoft Office)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
AccessVBAでVLookupを使いたい
-
C言語のプログラムが実行できま...
-
pythonの条件分岐(if)
-
DataObjectの使用
-
End Sub が必要です。
-
フォートランのエラーについて...
-
他クラスからForm1内コントロル...
-
対応する関数ヘッダーがありません
-
教えて下さい
-
Excel・Word リサーチ機能を無...
-
メッセージボックスのOKボタ...
-
配列数式の解除
-
エクセルで特定の列が0表示の場...
-
一つのTeratermのマクロで複数...
-
UserForm1.Showでエラーになり...
-
特定のPCだけ動作しないVBAマク...
-
Excel マクロ VBA プロシー...
-
VBAでfunctionを利用しようとし...
-
【EXCEL VBA】オートシェイプを...
-
お助けください!VBAのファイル...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
End Sub が必要です。
-
フォートランのエラーについて...
-
43:syntax error at end of input
-
intel fortranのエラーで困って...
-
C# IEnumerable が IEnumerable...
-
他クラスからForm1内コントロル...
-
Delphiでif文がうまく書けないです
-
C2065: 'EnumDisplayDevices' :...
-
DLL内からの外部変数の参照
-
構造体のポインタ参照
-
pythonの条件分岐(if)
-
ラズパイ上の、pythonのエラー...
-
Excel VABについて 下記記述が...
-
フォートラン(fortran)のエラー...
-
Excel VBA: UserForm.Show で実...
-
#ifndefとかヘッダファイルにつ...
-
DLLの使い方とerror C2146につ...
-
C言語コンパイルエラー cygwin
-
Makefile と <math.h>
-
python numpy.linalg.inv()での...
おすすめ情報