お世話になります。 現在、ACCESS2003形式で作成したシステムをACCESS2010でも問題なく使用可能か検証作業を行っております。 その際、ACCESS側からEXCELファイルを展開し、内容を編集/保存する処理の検証を行った所、 ACCESS2003では発生しなかったエラーが発生しました。 原因箇所を特定しようとデバッグモードのステップ実行を行ったのですが、 ステップ実行を行うと問題なく処理が通ってしまい原因究明に至れませんでした。 いろいろと試行錯誤して検証したところ、 下記のようにADODBを使用して取得したレコードセットの値を直接セルに設定しようとすると発生するようです。 ちなみにエクセル側には、保護設定等は一切かけていません。 対策としては、CSTR関数等で型変換をかけることでとりあえず動作するようです。 同様の現象が起きている方はいらっしゃいますでしょうか? デバッグモードでは通過するので、どうも腑に落ちません。 よろしくお願い致します。 (追記) 投稿後にさらに検証を行っていたのですが、 下記コードに該当する場合でも、エラーになる場合とならない場合があるようです。 セル側の書式設定等が影響しているのかと思い、書式設定をコピーしてみても結果が一致しません… --------------------------------------------- < コード(簡略化してあります) > ------------------------ Dim WS As sheet Dim RS As New cordset Dim Mycn As New nnection Set Mycn = nnection SQL文, Mycn, adOpenStatic, adLockReadOnly (行番号, 列番号) = RS! 取得した列名 ←ココで発生 ------------------------------------------------------------------------------------------------------------- --------------------------------------------- < エラー番号/エラー名 > ------------------------------- エラー番号 : 1004 エラー内容 : アプリケーション定義またはオブジェクト定義のエラーです。 編集済み 2013年12月9日 23:54
VBAでは、データを並び替えるためにSortを使うことが多いですが、エラーが発生することも多いですよね。 今回は、Sortのエラーの原因や対処方法について徹底的に説明していきます。 参考: Excel VBA入門 その47:Sortで空白セルを無視して並び替えする方法 Sortのエラー原因・対処法 Sortをしたときのエラーは、以下のようなケースがあります。 Sortを実行してもソートがうまくいかない(ソートしない) 実行時エラー'1004′ アプリケーション定義またはオブジェクト定義のエラーです。と表示された Sortを実行したら「メソッドが失敗しました」と表示された オブジェクトが必要です。と表示された 実行時エラー'9′ インデックスが有効範囲にありません。と表示された 実行時エラー'13' 型が一致しません。と表示された 実行時エラー'424′ オブジェクトが必要です。と表示された 実行時エラー'448′ 名前付き引数が見つかりません。と表示された これらの原因・対処法を説明していきます!! Sortオブジェクトは、引数が設定されていなくてもスペルなどを間違っていなければエラーが出にくい仕様になっています。 エラーが表示されないのにソートが実行されないという事態に陥ることも多々あ ります。 よくある例を挙げます。 下の表のD列の値段を昇順に並び替えたいとします。 間違った例を挙げます。本来は、セルの並び替える範囲に、本来「. SetRange Range("A1"). CurrentRegion」のようにCurrentRegionを使ってデータが入っている表全体を指定します。 この5行目の'. VBA - アプリケーション定義またはオブジェクト定義のエラー 範囲指定の間違い？ ブック名の処理 重複を防ぐ｜teratail. CurrentRegionをコメント文にした状態で実行してみましょう。 Sub データの並び替え() With.. Key:=Range("D2"), SortOn:=xlSortOnValues, Order:=xlAscending '. SetRange Range("A1"). CurrentRegion = xlYes End With End Sub 実行しても、コードのエラーは出ません。 もちろんソートは行われません。 エラーが出ないので何が間違っているのか分からず途方に暮れることになります。 Sortオブジェクトには、こんなトラップが隠されているのです。 Sortオブジェクトの構文は、 Sortオブジェクト.
外部VBA(例: ExcelのVBA)からOutlookを操作すると「アプリケーション定義またはオブジェクト定義のエラーです」が発生するという相談を受けました。 調べてみたところ、インスペクター オブジェクトのWordEditorプロパティに値が設定されていないことが判明。 実行時エラー '287' アプリケーション定義またはオブジェクト定義のエラーです 事象が発生する環境においては、次のレジストリ値が0(自動的に拒否する)になっており、これを1か2に変更すると問題が解消することがわかりました。 HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\office\16. 0\outlook\security PromptOOMAddressInformationAccess 0: 自動的に拒否する 1: ユーザーに確認する (規定値) 2: 自動的に承認する ■情報源 グループポリシーでは次の設定によってこのレジストリ値を構成できます。 ユーザーの構成\ポリシー\管理用テンプレート\Microsoft Outlook 2016\セキュリティ\セキュリティ フォーム設定\プログラムによるセキュリティ アドレス帳にアクセスするときのOutlookオブジェクト モデルに関する確認について構成する 設定値の選択肢は次の通りです。 なお、1(ユーザーに確認する)の場合は次のダイアログボックスが表示され、「許可」が選択されると問題無くマクロが動作します。
*\( ˆoˆ)/*. ° ※一部ストーリーの内容を変更させていただきました。何卒ご了承くださいませ。 ◆望月先生のブログ「ものかき・望月麻衣のひとり言」
■はじめに この作品は『京都寺町三条のホームズ』の8作目です。 双葉社様より、文庫本が出版されているのですが、このサイト版と書籍版とは、展開が違っております。 こちらは『サイト版仕様』となっておりまして、清貴と葵の関係性も内容も書籍とは違います。 (書籍では5巻で想いが通じ合いましたが、サイト版では1巻のラストですでに通じ合い、二人の関係性は書籍版よりも進んでおります。清貴と葵はすでに結ばれ、婚約しております) 書籍の続きをこちらでと思って読まれましたら、二人の距離感、甘さが違っていて、混乱すると思いますので、できればサイト版はサイト版で最初から読んでいただけるとありがたいです。 また、文章も書籍とサイトでは、あえて変えております。 (サイト版で書き込むと読みにくいので、描写を軽くしております) あらかじめご了承ください。 つまり、書籍版とサイト版、それぞれ展開や関係性が違っているのですが、その違いを楽しんでいただけたらと思います。 ※一作目を未読の方は、表紙にリンクしている 【京都寺町三条のホームズ】から読んで頂けたらと思います。
寺町三条気分を高めるために SSを書きたいと思います。 ********** その日は店長に頼まれて、四条に使いに出ていた私は、用事を済ませて河原町通を北上し、寺町三条へと向かっていた。 途中、抹茶スイーツの店に並ぶ長蛇の列に驚きつつ、振り返る。 古都京都は、和スイーツが人気であり、中でも抹茶はさらに人気が高い。 だけどこの人気はどうしたことだろう?
そんなん、語り尽くせないほど」 谷口「ああ、それじゃあ、『全部大好き』ってことで、次の質問に。 『清貴さんのファーストキスはいつ?』」 中原「おお、きわどい質問が!」 清貴「小学生の頃です」 谷口「小学生?」 中原「早くない?」 清貴「帰国子女の転校生に、いきなりされたんですよ。驚いたんですが、おかげで外国では挨拶のようなものなんだ、と変な擦り込みができてしまって」 谷口「それから、その子とは?」 清貴「また、海外に行ってしまったので、それからは会ってないです」 谷口「へぇ、それじゃあ、大きくなってからのキスは?」 清貴「そういうお話は勘弁しましょうか」 谷口「キスまで、それ以上のことは聞かないから」 清貴「高校生の頃です。彼女ができたので」 谷口「そうなんだ。清貴さんは、今まで何人つきあったことあるの?」 清貴「その時の彼女と、今の葵さんの二人だけですよ」 中原「ええええ? 二人だけ?」 谷口「それじゃあ、大人になってからキスしたのも二人だけ?」 清貴「…………」 中原「あ、目をそらした」 谷口「詳しく聞きたいけど、我慢しておく。次に健全な質問。 『得意なスポーツ』と『苦手なスポーツ』を教えてください」 清貴「得意な方なのはテニスでしょうか。苦手なのは相撲です」 中原「相撲?」 清貴「男同士で密着して押し合うとか苦手なんですよ。汗とかつくのも嫌ですし」 中原「ああ、分からないでもないかな」 谷口「『音楽は何を聞く?』」 清貴「音楽はほぼ店で聴くので、ジャズやクラシックですね」 谷口「邦楽とかは?」 清貴「車では基本ラジオなので、その時に聴きますよ」 谷口「私も聞きたかった質問。『鑑定士になってなかったら、何をやっていますか?』」 清貴「なんでしょうね?