Access VBA質問箱 IV

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

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


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

459 / 500 ﾍﾟｰｼﾞ

←次へ　｜　前へ→


	【3980】Re:ありがとうございます。

クロ - 04/12/7(火) 16:41 -


	引用なし

	パスワード

>ＨＰ上で半角で入力するとエラーが出る時が
>あると聞いたもので

半角はカナのときに問題がでるときがあるというのを
誤解されているのでは？

・ツリー全体表示


	【3979】ありがとうございます。

ぷり太 - 04/12/7(火) 16:35 -


	引用なし

	パスワード

ありがとうございます。
よかった出来ました。

ＨＰ上で半角で入力するとエラーが出る時が
あると聞いたもので

また何かありましたら
お願いします。

・ツリー全体表示


	【3978】Re:マクロのオブジェクトのコピーをモジュ...

Gin_II - 04/12/7(火) 16:27 -


	引用なし

	パスワード

>毎回コピー先が変わるのでモジュールで作成したいと思うのですが
>全然わかりません。

マクロは、VBAに変換することができます。
マクロを選択した状態で、「ツール」→「マクロ」→「マクロをVisual Basicに変換」を
試してみてください。

・ツリー全体表示


	【3977】Re:Requeryについて

キッコーマン - 04/12/7(火) 14:37 -


	引用なし

	パスワード

▼Gin_II さん：
お返事かなり遅くなりました！
ACCESS超初心者、キッコーマンです！

>> それならば、サブフォームを使わずとも、フォームヘッダーにコントロールを
>> 作成し、詳細セクションに表示させるようにすればいいと思いますが。
>
>これじゃ、ダメなんですか？

→Gin_IIさんのおっしゃった通り、詳細セクションによって表示する方法も作成してみました。特に問題はないと思ったのですが、いまさらながらですがサブフォームを使うメリットとしては外見の点についてが主になるのかな？とふとおもいました。別返信にて今の状況を書いていますが、Gin_IIさんのこの方法が一番安全かもしれないなぁ、などと思いました。
どっちにするかはもう少し悩んで勉強して作ろうと思います。勉強して身につけることが大切ですよね。
Gin_IIさんありがとう☆

・ツリー全体表示


	【3976】Re:Requeryについて

キッコーマン - 04/12/7(火) 14:29 -


	引用なし

	パスワード

▼ぬぅさんこんにちわ☆
お返事たびたびありがとうございます。
あたしの説明はかなりわかりにくいと思います・・・実は最近、初めてACCESSを使い始めたばかりのばりばりの初心者なもので。。。説明不足で申し訳ないデス(T-T)。
ご意見お試しさせていただきました！

>サブフォームで移動ボタンを表示させて
>ワークテーブルにデータが複数レコードある状態で
>帳票ビューになっているサブフォームを表示しても１件だけなのでしょうか？
→もちろん、ワークテーブルには複数のレコードがある状態で、サブフォームに移動ボ　タンをつけて移動してみても、やっぱりサブフォームには1レコードしかない状態でし　た。
　ところが、メインフォームに移動ボタンをつけてみて移動しますと、検索結果のレコー　ドが件数分表示されました。きっとどこかに原因がありますよね。

>移動ボタンで移動したら１件ずつ次のレコードが表示されるのなら
>帳票ビューにしないといけない所を単票ビューだったとか
>詳細セクションにコントロールを配置しないといけないのに、サブフォームの
>ヘッダー・フッターに配置していた・・・などが原因かと思います。
　→サブフォームは帳票ビュー、メインフォームは単票ビューです。
　　メインフォームの詳細にはサブフォーム、ヘッダーには検索条件用の非連結テキスト　　ボックスと検索ボタンを設けています。
　　サブフォームのヘッダーには項目表示用ラベル、詳細には検索結果表示用のテキスト　　ボックスを複数設けていて、フッダーにはなにもありません。
　　・・・という簡単な仕組みだと考えているのですが、やはりメインフォームの移動ボ　　タンによって表示されるということはなにか原因があるんですよね。

>ところで・・・
>Gin_IIさんからの、サブフォームを使わないで表示させる案ではダメなの？
>についての「そうしない事情」は回答なさらないのでしょうか？
>Gin_IIさんを始めとする常連のみなさんは、いつも的確な回答を即答されているので
>事情とか状況が分かれば、目からウロコの案がでてくるかもしれませんよ。
　→そうですね、大変的確な説明をすぐに返してくださって、かなり勉強になっていま　　　す。回答していないのは、その方法もありかなと別途作成していまして特に問題が
　　ないのかどうか調べてみようと思っていたので、方法を決めたら返信しようと考えて　　いました。あまりに失礼でしたね、反省いたします・・・。

なにか原因をもうすこし探ってみようと思います、のでアドバイス等があればぜひご教授くださいますようお願いしま～す☆

・ツリー全体表示


	【3975】Re:コマンドボタンでHPを開きたい

クロ - 04/12/7(火) 14:24 -


	引用なし

	パスワード

なにゆえに全角英数？

Call Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE " & AAA,vbNormalFocus)

ではないでしょうか？

※注意...EXEの後に半角スペースあり

・ツリー全体表示


	【3974】マクロのオブジェクトのコピーをモジュー...

nemo - 04/12/7(火) 14:19 -


	引用なし

	パスワード

毎回コピー先が変わるのでモジュールで作成したいと思うのですが全然わかりません。
よろしくお願いします。

・ツリー全体表示


	【3973】コマンドボタンでHPを開きたい

ぷり太 - 04/12/7(火) 13:03 -


	引用なし

	パスワード

今、住所録を作ってるのですが、その中でボタン一つで指定したHPを開きたいのですが、

"フォームA"の中に [URL]ﾃｷｽﾄﾎﾞｯｸｽを作り
その横にコマンドボタンで"HP"と言うボタンを作り
ｸﾘｯｸすると、URL　の中にの　入力したホームページを
ブラウザーが開いて指定したホームページを表示させることは、
可能でしょうか

一応書いてみたのですが上手くいきませんでした。（勉強不足で・・・）

Ｄｉｍ　ＡＡＡ　Ａｓ　Ｓｔｒｉｎｇ
ＡＡＡ　＝　［Ｆｏｒｍｓ］！［Ｆ＿フォームＡ]！［ＵＲＬ］
Ｃａｌｌ　Ｓｈｅｌｌ（”Ｃ：￥Ｐｒｏｇｒａｍ　Ｆｉｌｅｓ￥Ｉｎｔｅｒｎｅｔ　Ｅｘｐｌｏｒｅｒ￥ＩＥＸＰＬＯＲＥ.ＥＸＥ & ＡＡＡ", ｖｂＮｏｒｍａｌＦｏｃｕｓ)

・ツリー全体表示


	【3972】Re:空のデータベース作成の名前の付け方

TAKESHI

- 04/12/7(火) 12:25 -


	引用なし

	パスワード

▼Gin_II さん：
また質問に答えていただきありがとうございます。
できました。とても嬉しかったです。本当にありがとうございました。

・ツリー全体表示


	【3971】レコードを追加できませんと言われてしま...

とも - 04/12/7(火) 11:05 -


	引用なし

	パスワード

はじめまして。宜しくお願いします。
環境は下記の様になってるのですがご質問させて下さい。

OS：Win2k
Access：2000

サブフォームに表形式のフォームを入れています。
この表に表示されているデータは外部結合＆副問合せを
使用したSQLを使用している為を値を入力しようとすると
『レコードを追加できません。'一'側に対応するレコードがありません。』
とステータスバーに表じされて値を入力することが出来ません。
多分値を入れようとした表は擬似列なので対応した列がデータベース上に無い
からかと思います。

1.値を入力出来るようにする。
2.データを入力と同時にデータベースに変更を反映されてしまうのを止めたい。

上記の様に出来るようにするのにはどのようにすればよいのでしょうか？
ご教授宜しくお願い致します。

・ツリー全体表示


	【3970】Re:クエリで式が難しすぎるというエラーが...

Qほー - 04/12/7(火) 9:19 -


	引用なし

	パスワード

▼クロさん：

おはようございます。
上記の方法で解決しました。

ありがとうございます。

・ツリー全体表示


	【3969】Re:空のデータベース作成の名前の付け方

Gin_II - 04/12/7(火) 9:06 -


	引用なし

	パスワード

>名前　＝　ＩＮＲｓ！作成年月

名前 = "C:\" & INRs!作成年月 & ".mdb"

>Ｓｅｔ　ｄｂｓ　＝　ｗｓＤｅｆａｕｌｔ.ＣｒｅａｔｅＤａｔａｂａｓｅ（"Ｃ：\名前．ｍｄｂ"、ｄｂＬａｎｇＧｅｎｅｒａｌ,dbＥｎｃｒｙｐｔ）

Set dbs = wsDefault.CreateDatabase(名前,dbLangGeneral,dbEncrypt)

でどうでしょうか？
＃変数は、引用符の外に出してやる必要があります。

・ツリー全体表示


	【3968】Re:クエリで式が難しすぎるというエラーが...

クロ - 04/12/7(火) 8:55 -


	引用なし

	パスワード

Between IIf(IsNull(Forms]![フォーム名]![会社コード])
,[集計クエリ]![会社コード]
,[Forms]![フォーム名]![会社コード1])
And IIf(IsNull(Forms]![フォーム名]![会社コード])
,[集計クエリ]![会社コード]
,[Forms]![フォーム名]![会社コード2])

ではどうでしょうか？

・ツリー全体表示


	【3967】空のデータベース作成の名前の付け方

TAKESHI

- 04/12/7(火) 8:34 -


	引用なし

	パスワード

CreateDatabase メソッドで空のデータベースを作成したんですがデータベースの名前がうまくつけられません。名前はテーブルから読み込んその名前を使用したいのですが、うまくいきません。記述を教えてください。

Ｄｉｍ　読込　Ａｓ　Ｓｔｒｉｎｇ
Ｄｉｍ　名前　Ａｓ　Ｓｔｒｉｎｇ

Ｓｅｔ　Ｄｂ　＝　ＣｕｒｒｅｎｔＤｂ
読込　＝　"作成年テーブル"
Ｓｅｔ　ＩＮＲｓ　＝　Ｄｂ。ＯｐｅｎＲｅｃｏｒｄｓｅｔ（読込、ｄｂＯｐｅｎＤｙｎａｓｅｔ）

名前　＝　ＩＮＲｓ！作成年月

Ｓｅｔ　ｄｂｓ　＝　ｗｓＤｅｆａｕｌｔ.ＣｒｅａｔｅＤａｔａｂａｓｅ（"Ｃ：\名前．ｍｄｂ"、ｄｂＬａｎｇＧｅｎｅｒａｌ,dbＥｎｃｒｙｐｔ）

で記述するとＣ：に名前.mdbになってしまいます。
ＩＮＲｓ！作成年月には２００４１０３１が設定されており２００４１０３１.ｍｄｂにしたいのですが、教えてください。
よろしくお願いします。

・ツリー全体表示


	【3966】クエリで式が難しすぎるというエラーが出...

Ｑほー - 04/12/7(火) 0:20 -


	引用なし

	パスワード

はじめまして。宜しくお願いします。

さっそくですが、質問させてください。

os：winxp
access：2000

集計クエリをもとにテーブルを作るクエリを作成しています。

会社コードフィールドに条件文を作成したのですが
エラーが出てしまいます。
「式が難しすぎます」とのことでした。

作成したｓｑｌは次のとおりです。

IIf(IsNull(Forms]![フォーム名]![会社コード])
,[集計クエリ]![会社コード]
,Between[Forms]![フォーム名]![会社コード1]
And [Forms]![フォーム名]![会社コード2])

【処理内容】
フォームの会社コードがＮＵＬＬの場合
集計クエリの会社コードを表示し、
フォームの会社コードに値があれば
会社コード1～会社コード2の範囲を表示としたいのです。

Betweenの文だけで実行したところ値はひろえたので
IIF文、もしくはIsNullがおかしいのでしょうが
どうしてもわかりませんでした。

何か分かる方お力をお貸し下さい

・ツリー全体表示


	【3965】ローカルファイル（EXCEL,WORDなど）のア...

とも - 04/12/6(月) 22:47 -


	引用なし

	パスワード

みなさん始めまして。ともと言います。

accessを最近はじめたばかりの初心者です。現在ローカル（あるいはネットワーク上）ファイルとテーブル間のアップロード、ダウンロードが出来ずに悩んでいます。このサイトの書き込みを読みましたがいまだ作成できません。ご存知の方がいらっしゃいましたらぜひ教えてください。

◎実現したいこと
1.：フォーム上のボタンをクリックするとExcel,Wordで”ファイルを開く”を実行したときのようなwindowが表示される。
→API?DEO?などは無知に等しく実現方法がわかりません…

2.：1.でExcel,Wordファイルを選択するとテーブルに追加（アップロード）する。
→テーブルの型をオブジェクト…型にしなければならない程度しかわかりません。
（挿入→オブジェクトの方法ではなくAPIなどで実現したいです）

3.：1.とは異なるフォームでテーブル上の任意のファイルを開くことが出来る。
（Excel起動でもかまいません）

4.：3.のフォームではダウンロードもできる。
→これはacExportで実施可能でしょうか…

使用のAccessは2000、windowsも2000です。
ご存知のかた、お願いします。

・ツリー全体表示


	【3964】Re:Requeryについて

ぬぅ - 04/12/6(月) 17:37 -


	引用なし

	パスワード

▼キッコーマンさん、こんにちは。
この件は、なぜかレスが付かないみたいですね・・・

「１件しか表示されない」という状況が少し分かりにくいのですが・・・？
サブフォームで移動ボタンを表示させて
ワークテーブルにデータが複数レコードある状態で
帳票ビューになっているサブフォームを表示しても１件だけなのでしょうか？
移動ボタンで次のレコードへ移動してみるなど試してみて、どうなったのかなどの
状況が分かった方が、他の方からの回答も付きやすいかと思います。

移動ボタンで移動したら１件ずつ次のレコードが表示されるのなら
帳票ビューにしないといけない所を単票ビューだったとか
詳細セクションにコントロールを配置しないといけないのに、サブフォームの
ヘッダー・フッターに配置していた・・・などが原因かと思います。

ところで・・・
Gin_IIさんからの、サブフォームを使わないで表示させる案ではダメなの？
についての「そうしない事情」は回答なさらないのでしょうか？
Gin_IIさんを始めとする常連のみなさんは、いつも的確な回答を即答されているので
事情とか状況が分かれば、目からウロコの案がでてくるかもしれませんよ。

・ツリー全体表示


	【3963】出来ました！

momo - 04/12/6(月) 17:36 -


	引用なし

	パスワード

出来ました！

小数点のある値は自動的に型が変換されるとは知りませんでした。
勉強不足で・・・

ありがとうございます。

・ツリー全体表示


	【3962】Re:空のデータベースの作成

TAKESHI

- 04/12/6(月) 17:09 -


	引用なし

	パスワード

▼Gin_II さん

ありがとうございます。
早速見てみます。

・ツリー全体表示


	【3961】Re:いいフォームの作り方をアドバイス願い...

クロ - 04/12/6(月) 16:59 -


	引用なし

	パスワード

▼えなりんさん：
>クロ師匠！
>愚弟子を助けてください！

師匠なんて呼ぶな!
冗談はおいといて...

>　　※【再計算】ボタンで　Me.Parent!一覧フォーム.Requery

【再計算】ボタンを以下のようにしてみてどうでしょう？
DoCmd.RunCommand acCmdSaveRecord
Me.Parent!クエリ1のサブフォーム.Requery

・ツリー全体表示


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

459 / 500 ﾍﾟｰｼﾞ

←次へ　｜　前へ→

ページ：

┃

記事番号：

(SS)C-BOARD v3.8 is Free