Excel VBA で「型が一致しません」というエラーが発生します。
--------------------------------------------------------------------------------
Dim katacode as String
katacode = "(1001,1002,1005,1010,1015,1020,1030,1035,1036,1040,…(省略)…,1150)"
With ActiveSheet.QueryTables.Add(Connection:= _
pubfncgetConnectString,Destination:=Range("A1"))
.CommandText = Array(_
"SELECT ~
FROM ~
WHERE コード IN katacode
--------------------------------------------------------------------------------
「katacode」の値が、文字列の長さが155までは上手く動くのですが
それ以上に追加すると「型が一致しません」というエラーが発生します。
原因がわかりましたら教えていただけないでしょうか。よろしくお願い致します。
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
>Arrayをとった記述をしてみましたが、SELECT~の文が長くて複雑で
>うまくいきませんでした。
では、試しに
>--------------------------------------------------------------------------------
>Dim katacode as String
>katacode = "(1001,1002,1005,1010,1015,1020,1030,1035,1036,1040,…(省略)…,1150)"
>With ActiveSheet.QueryTables.Add(Connection:= _
> pubfncgetConnectString,Destination:=Range("A1"))
> .CommandText = Array(_
> "SELECT ~
> FROM ~
> WHERE コード IN katacode
>--------------------------------------------------------------------------------
Dim katacode as String
Dim v
katacode = "(1001,1002,1005,1010,1015,1020,1030,1035,1036,1040,…(省略)…,1150)"
With ActiveSheet.QueryTables.Add(Connection:= _
pubfncgetConnectString,Destination:=Range("A1"))
v = Array(_
"SELECT ~",
" FROM ~",
" WHERE コード IN " & katacode
.CommandText = Join(v, "")
みたいにワンクッション入れてみたらどうなりますか?
もしくは、例えば
Sub sample()
Dim katacode As String
Dim s(2) As String
katacode = "(1001,1002,1005,1010,1015,1020,1030,1035,1036,1040,…(省略)…,1150)"
s(0) = "SELECT ~"
s(1) = "FROM ~"
s(2) = "WHERE コード IN " & katacode
MsgBox Join(s)
End Sub
..のように適宜、解かり易く句単位で区切って文字列型配列に入れ、
Join関数で結合しても良いかと思います。
回答ありがとうございました。
試してみましたが
.CommandText = Join(v, "") の記述では同じく「型が一致しません」エラーになりました。
Join(s) の記述もうまくいきませんでした。
結果、「katacode」の値を見直して減らしてもらい対応することになりました。
いろいろ勉強になりました。
度々回答いただき感謝しております。
No.1
- 回答日時:
CommandTextプロパティの値の設定に、Array関数を使っているからです。
(おそらく)この時のArray関数の引数に1要素あたりの文字数制限があると思われます。
(255or256文字くらい?)
マクロ記録で、SQL文が長いとArray関数を使ったものが記録されますが、
これはマクロ記録時の制限によるものです。
実際にはCommandTextプロパティには255文字を超えた文字列を直接設定できます。
例えば
.CommandText = Array( _
"SELECT field1, field2, field3, ..(途中省略).., fie" _
, _
"ldX, fieldXX, ..(途中省略).., fieldXXX " & Chr(13) & "" & Chr(10) & "_
, _
"FROM [data$]" & Chr(13) & "" & Chr(10) & "WHERE (CODE=?)")
こんな感じのCommandTextは
.CommandText = "SELECT field1, field2, ..(途中省略).., fieldXXX FROM [data$] WHERE (CODE=?)"
..みたいに繋げて書く事ができます。
この回答への補足
Arrayをとった記述をしてみましたが、SELECT~の文が長くて複雑で
うまくいきませんでした。
他にいい方法がありましたら教えてください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) IBM Notes9のメールをExcelVBAにて送信するコードについての質問です。 以下のコードを 3 2023/06/21 17:58
- Visual Basic(VBA) Excel VBA で End Subのところで「型が一致しません」のエラーとなります。 6 2022/07/27 19:58
- Visual Basic(VBA) 型が一致しませんとエラー 6 2023/07/06 20:14
- Visual Basic(VBA) Excle VBA Findメソッドについて 3 2022/07/15 13:56
- Visual Basic(VBA) エクセルVBAで以下のようなコードを書いたらエラーになりました。何処が間違っているの教えて? 1 2023/02/10 18:30
- Visual Basic(VBA) Excel VBAの解読について質問があります。 概要は、マクロでチェックボックスにチェックすると日 1 2023/02/10 07:50
- Visual Basic(VBA) Excel VBA メール作成について 本文の中にExcel でコピーした図を上下に2つ 貼り付けを 2 2023/06/14 01:48
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) まとめシートから集計シートへA列のコードが一致したら1行コピーするマクロをネット上で見つけました。こ 1 2022/08/30 14:11
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
英語【Schedule】の省略はあり...
-
minuteの省略の「min」に「S」...
-
cust. は省略形?
-
日付の前にtheをつける場合、つ...
-
略語の対義語は何ですか?正式...
-
この文の 's は、is の省略でし...
-
会社名の前に付いている M/s....
-
「AとBが・・・」と「AとBとが...
-
『Nite』=? Nightとは違う...
-
dH2Oってなんすか?
-
help (that) S+V という構文は...
-
比較級 than SV について
-
"N.Y."で終わる疑問文
-
接続詞andの後の主語と助動詞は...
-
Lotの表記方法
-
フランス語で、”なんでもない”...
-
afterの後ろの節の主語有無につ...
-
「曜日」に該当する英語(省略...
-
『 Take ( ) measures a...
-
ここの Everything you cookのE...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
英語【Schedule】の省略はあり...
-
日付の前にtheをつける場合、つ...
-
minuteの省略の「min」に「S」...
-
略語の対義語は何ですか?正式...
-
「AとBが・・・」と「AとBとが...
-
cause i love you を訳してく...
-
会社名の前に付いている M/s....
-
cust. は省略形?
-
この文の 's は、is の省略でし...
-
Masterの省略形
-
比較級 than SV について
-
『Nite』=? Nightとは違う...
-
「曜日」に該当する英語(省略...
-
dH2Oってなんすか?
-
住所の書き方で都道府県は省く...
-
同格の接続詞thatの省略はあり...
-
この間違え問題の答えが③thanな...
-
接続詞andの後の主語と助動詞は...
-
Lotの表記方法
-
help (that) S+V という構文は...
おすすめ情報