現在オフラインです。再接続するためにインターネットの接続を待っています

XL2000: マクロで返される日付が 4 の年が初期

重要: このサポート技術情報 (以下「KB」) は、翻訳者による翻訳の代わりに、マイクロソフト機械翻訳システムによって翻訳されたものです。マイクロソフトは、お客様に、マイクロソフトが提供している全ての KB を日本語でご利用いただけるように、翻訳者による翻訳 KB に加え機械翻訳 KB も提供しています。しかしながら、機械翻訳の品質は翻訳者による翻訳ほど十分ではありません。誤訳や、文法、言葉使い、その他、たとえば日本語を母国語としない方が日本語を話すときに間違えるようなミスを含んでいる可能性があります。マイクロソフトは、機械翻訳の品質、及び KB の内容の誤訳やお客様が KB を利用されたことによって生じた直接または間接的な問題や損害については、いかなる責任も負わないものとします。マイクロソフトは、機械翻訳システムの改善を継続的に行っています。

英語版 KB:213593
この資料は、アーカイブされました。これは "現状のまま" で提供され、更新されることはありません。
現象
ワークシートのセルから、マクロによって返される日付の日付を使用するマクロを実行するときあります 4 年と 1 日より前の実際の日付。
原因
マクロは、[ オプション ] ダイアログ ボックスの [ 計算方法 ] タブで 1904年の日付システム を選択すると、次の条件のいずれかに該当日付が 4 年と 1 日以前のバージョンを返します。

  • マクロは Value2 プロパティを使って、日付を格納するとき。

    - または -

  • マクロは、日付を格納するとき、Excel アプリケーションのライブラリに、関数を使用します。
回避策
次のマクロかどうか、1904年に日付システムが選択されている、1900年日付システムの日付に変換および決定予想される日付を返します。

マイクロソフトは提供プログラミング言語の使用方法の一例としてのみ、姿表現または暗黙に提供します。 これはに含まれますに、黙示または商品性および特定目的に対する適合性の黙示保証は一切制限はありません。 この資料ではであると見なすは、例示されているプログラミング言語を作成したりプロシージャをデバッグするためのツールと使い慣れた。 マイクロソフト サポート エンジニアに、特定のプロシージャの機能について説明する役立ちますが追加機能を提供する構築手順、特定の要件を次の例は変更されません。
マクロを使用するには、次の手順に従います。

  1. 挿入する新しいブックを [ ファイル ] メニューの [ 新規作成 ] をクリックして、[ ブック ] をクリックして [OK] をクリックします。
  2. [ ツール ] メニューの [ オプション ] をクリックして、[ 計算方法 ] タブをクリックし、 1904年に日付システム 。 次に、 [OK] をクリックします。
  3. 次の使用例は、シート 1 に、次の日付を入力:
          A1: 7/5/96      A2: 5/11/96      A3: 4/28/96					
  4. [ ツール ] メニューの [ マクロ をポイントして [ Visual Basic エディター ] をクリックします。 Visual Basic エディターで、[ 挿入 ] メニューの [ モジュール をクリックします。
  5. 次のコードをモジュール シートに入力:
          Sub DateTest()         'dimension date variable         Dim dDate As Date         'store minimum date in range into variable         dDate = Application.Min(Worksheets(1).Range("A1:A3"))         'display stored date         MsgBox "Stored date" & Chr(13) & dDate         'check for 1904 date system         If Application.ThisWorkbook.Date1904 Then          'convert 1904 base date to 1900 base date          dDate = DateSerial(Year(dDate) + 4, Month(dDate), Day(dDate) + 1)          'display converted date            MsgBox "Converted date" & Chr(13) & dDate         Else            MsgBox "1904 date system is not enabled"         End If      End Sub						
  6. マクロを実行するには [ ツール ] メニューの [ マクロ をポイントし、[ マクロ ] をクリックします。 DateTest を選択し、 実行 をクリックします。
日と最初のメッセージ ボックスが表示されたら 4/27/92 は 4 年と 1 日より前 A3 をセル A1 の範囲の最初の日付。 2 番目のメッセージ ボックス正しい"変換された日付を表示 4/28/96 のします。
状況
マイクロソフトとして認識していますこの問題をこの資料の冒頭に記載されているマイクロソフト製品の問題。
詳細
アプリケーションの 1904年に日付システムを検出し、必要に応じて日付を変換自動的にします。 ユーザーは、Microsoft Excel で 1904年に日付システムを選択して、日付、ワークシートのセルから書かれているマクロを実行と場合の違いは 4 年と 1 日にあります (余分な 1 日は、閏年のアカウント)。 たとえば、9/1/96 1904年に日付システムの日付は 92/8/31 の日付を返すことがあります。

発生日付システム不一致がする Visual Basic 1904 に日付システムを選択して、マクロによって、 Value2 プロパティ、日付が格納されます。
xl2000

警告: この記事は自動翻訳されています

プロパティ

文書番号:213593 - 最終更新日: 02/14/2014 09:52:29 - リビジョン: 4.2

Microsoft Excel 2000 Standard Edition

  • kbnosurvey kbarchive kbbug kbprogramming kbdtacode kbpending kbmt KB213593 KbMtja
フィードバック