Accessを持っていない人へデータを渡す場合（エクスポート）

質問

Accessで作成した住所録をAccessを持っていない人へ渡します。

単純にExcelへエクスポートしてしまえば簡単なのですが、
Yes/No型のチェックボックスがExcelにエクスポートすると
「True／False」と表示されてしまいます。

先方は、作業的にチェックボックスにてその項目を閲覧操作したい
ようなのですが、なにかいい方法はありますでしょうか？

回答No.4

imogasi · ベストアンサー

エクセルにインポートされて、D列（下記例）セルに、TRUEかFALSEがセットされたとします。
Sub test01()
Worksheets("Sheet1").DrawingObjects.Delete
For i = 1 To 10
Set cb = Worksheets("Sheet1").OLEObjects.Add(ClassType:="forms.checkbox.1")
cb.Top = Cells(i, "D").Top + 3
cb.Left = Cells(i, "D").Left + 2
cb.Height = Cells(i, "D").Height * 0.8
cb.Width = Cells(i, "D").Width
cb.Object.Caption = ""
'MsgBox cb.Name
cb.LinkedCell = Cells(i, "D").Address
Next i
End Sub
を標準モジュールにコピペして実行する。
D列セルで、TRUEが入っているセルのチェックはチェックあり、
FALSEが入っているセルのチェックはチェックなしになる。
そしてその後チェックボックスをON/OFFすればセルの値と連動します。
セルの値はセルの値として関数などに、使えます。
ーーー
しかし誰でもやれることではなく、質問の件はあきらめることをお勧めします。

お礼

御礼が遅くなりまして申し訳ありませんでした。

詳しく書いていただいてありがたいです。
まだ実行はしていませんが、本日がんばって操作してみたいと思います。

VBAとかVBEとか得意ではありませんが、がんばってみます！

どうもありがとうございました。

回答No.3

mshr1962

True/Falseですか？
ツールバーのフォームにあるのを利用は出来ますが
コピーしてリンク元のセルの設定するのが面倒です。

見た目でいいなら、こんな方法がありますけど．．．
表示形式をユーザー定義で
レ;;□
※レの部分は「ちぇっく」で変換するとボックスにチェックの文字があります。
入力に関してはチェックする場合は1,しない場合は0をセット
TRUE→1,FALSE→0の置き換えは「編集」「置換」で行うか
=セル*1
と別の列で計算した結果を、値として貼り付ければ可能です。

お礼

御礼が遅くなりまして申し訳ありませんでした。

見た目だけでよければ、置き換えで簡単に済む話なんですが、
どうも先方は、その後の名簿の変更処理をする上で、いちいち
「チェック」だの「レ」だの打ち込んでいくのが面倒だとのこと・・・。

私としても先方の要望に合わせるのが面倒なのですがねぇ。

ありがとうございました。

回答No.2

ttk11

メジックの難易度にもよりますが
エクセルにも道具ツールがあるので
エクスポート後にチェックボックスを創れば
なんとかなるかもしれません
（チェックボックス、マクロ命令、ｖｂａで）

お礼

御礼が遅くなりまして申し訳ありませんでした。

フォームでチェックボックスを作って、True/Falseのセルと
リンクをはってみたりしてがんばったのですが、思った結果が
でなかったので自分の力量のなさにがっかりしてしまいました・・・。

回答No.1

ysko614

エクスポート後に文字の置換等で先方が欲しい状態に治すのはどうでしょうか？

お礼

御礼が遅くなってしまって申し訳ありませんでした。
文字の置き換えで「レ」としてしまうのが一番簡単な
方法ですよねぇ・・・。
けど先方は、いちいち「レ」と打ち込んでいくのが面倒なようで、
困ってしまいます。