ホームにもどる      「パソコンについて」にもどる

Access2000
  1. オートコレクトで文の先頭のアルファベットが大文字に変わって、困ることがある。オートコレクトの設定は、メニューバーのツール→オートコレクトでする。「文の先頭で文字を大文字にする」のチェックをはずして、OKをクリックすると文の先頭のアルファベットが大文字に変わらなくなる。
  2. 通貨型データは、テーブルを一覧すると、小数点以下は表示されないが、小数点以下のデータも保存している。フォーカスを移した所は、少数点以下も表示される。
    テーブルを選択して、右クリックし、エクスポートを選択し、表示される指示に従って進んで、CSVファイルとして、データを取り出すことができる。しかしこうやって取り出したデータは、通貨型の場合小数点以下が表示されないデータとなる。通貨型のデータを小数点以下も表示させた状態で、CSVファイルとして取り出すにはどうすればよいのだろうか。
    テーブルのデザインビューを開き、通貨型のデータを数値型の単精度浮動小数点型や倍精度浮動小数点型にしても、小数点以下は表示されない。
    数値型の単精度浮動小数点型か倍精度浮動小数点型のフィールドを新しくつくり、通貨型のデータをこの数値型のデータにコピーすると、小数点以下も表示されるようになる。
    コピーはデータシートビューで通貨型のフィールドを選択して、CtrlキーとCキーを押してコピーし、次に、数値型のフィールドを選択して、CtrlキーとCキーを押して貼り付ける。
    VBAを用いて次のようにしてもできる。Shikenテーブルに、フィールド名が通貨型データのデータ型が通貨型のフィールドとフィールド名が浮動小数型データのデータ型が数値型の倍精度浮動小数点型のフィールドがあるとする。

    Dim db As Database
Dim tb As Recordset

Public Sub dbl代入()

Set db = CurrentDb
Set tb = db.OpenRecordset("Shiken")
tb.MoveFirst
Do Until tb.EOF
    tb.Edit
        tb![浮動小数型データ] = tb![通貨型データ]
    tb.Update
    tb.MoveNext
Loop
tb.Close
db.Close
End Sub

    3. ホームにもどる      「パソコンについて」にもどる