Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


53857 / 76738 ←次へ | 前へ→

【27687】Re:ユーザー定義型の定義のしかた
発言  ichinose  - 05/8/16(火) 8:16 -

引用なし
パスワード
   ▼kobasan さん:
おはようございます。
夏休みももう終わりですねえ・・・・
(私のところは・・ですが。)
>
>(1)(2)のユーザー定義型の定義のしかたを、どなたか教えてください。
>
>Private Function F_vntMakeWordsList2(rngTarget As Excel.Range) As Variant
>'-----(1)
>'ユーザー定義を使った場合???【20871】の過去ログを参考にしました
>Dim dicList As New Scripting.Dictionary '<===エラーメッセージ
>'-----(2)
>'Dim dicList   As Scripting.Dictionary '<===エラーメッセージ
>'(1)(2)とも「ユーザー定義型は定義されていません」のエラーメッセージが出る
>'-----
>Dim vntList   As Variant
>Dim vntbuf   As Variant
>'-----(3)うまく動く
>'Dictionaryオブジェクトを使った場合
>Dim dicList As Object
>Set dicList = CreateObject("Scripting.Dictionary")

これね、「Microsoft Scripting Runtime」を参照設定してください。
FSO使用時なども↑を使います。

確認してください

0 hits

【27686】ユーザー定義型の定義のしかた kobasan 05/8/16(火) 7:29 質問
【27687】Re:ユーザー定義型の定義のしかた ichinose 05/8/16(火) 8:16 発言
【27688】Re:ユーザー定義型の定義のしかた kobasan 05/8/16(火) 8:32 お礼

53857 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free