Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

76324 / 76732

←次へ　｜　前へ→


	【4831】Re:データ取得時のエラーについて

こうちゃん

- 03/4/9(水) 18:52 -


	引用なし

	パスワード

ntomoさん、こんにちは

>他の人の作ったマクロを改造しているためヘルプを見てもよくわかりません。
>何故エラーとなるのか教えてください。

>'ここからがエラーとされる部分'
>With UpdtSh.Add(Connection:=Array(Array( _
>"ODBC;DRIVER=SQL Server;SERVER=192.168.3.1;UID=sa;PWD=ccs;WSID=RTECH;DATABASE=rdb1;" & _
>"Network=DBMSSOCN;Address=192.168.3.1,1433;")), Destination:=UpdtSh.Range("A1"))

この書き方だと、クエリテーブルを追加してるんじゃありませんか？
だとすると「UpdtSh.Add」はなんでしょか？
UpdtShシートにクエリテーブルを追加するならこんな感じになりますが・・

With Updtsh.QueryTables.Add(Connection:= _
　　"ODBC;DRIVER=SQL Server;SERVER=192.168.3.1;UID=sa;PWD=ccs;WSID=RTECH;DATABASE=rdb1;" & _
　　"Network=DBMSSOCN;Address=192.168.3.1,1433", Destination:=UpdtSh.Range("A1"))

＃まるっきり勘違いしているようならごめんなさい。
ちなみに前後を割愛しないほうがレスがつけやすいかも・・

0 hits

▼

【4823】データ取得時のエラーについて ntomo 03/4/9(水) 13:50