Access VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
444 / 500 ﾍﾟｰｼﾞ ←次へ　｜　前へ→
【4288】未入力(空白)のみを抽出したい。
質問  ゴン太  - 05/1/28(金) 15:41 -
引用なし
パスワード
   前にも似た質問をしたのですが、
フォーム上にコマンドボタンを作りイベントでサブフォーム内のフィールドA　の

未入力（空白）のみを抽出したいのですが、

前のを参考にこんな感じで考えたのですが上手くいきません


　Me!サブフォームA.Form.Filter = "フールドA Is　Null ''"
　Me!サブフォームA.Form.FilterOn = True


よろしくお願いします。
・ツリー全体表示
【4287】グラフの目盛について
質問  ゆっこ  - 05/1/28(金) 1:26 -
引用なし
パスワード
   こんばんは。はじめまして。
レポートでグラフを作成してるのですが、
Ｙ軸の目盛（最大値と最小値）をクエリの項目を使って指定したいのですが
どのように指定したらいいのかわかりません。
教えていただけないでしょうか。
使用したいクエリの項目は、集合値ソースに指定してあります。
コントロールソースは非連結OLE0です。
レポートの詳細にグラフを作成するようになってるので
以下のSubを使えば上手くいくようにも思うのですが・・・。

Private Sub 詳細_Format(Cancel As Integer, FormatCount As Integer)

初心者なので、質問も下手で申し訳ありません。
お返事をお待ちしてますので、よろしくお願いいたします。
・ツリー全体表示
【4286】Re:複数のエクセルファイルを一括でインポ...
回答  Gin_II  - 05/1/27(木) 21:55 -
引用なし
パスワード
   >複数のエクセルファイルを一括でインポートするにはどうしたら
>良いでしょうか？

TransferSpreadsheet メソッドを、ループの中で使ってやればいいかと。
で、複数のエクセルファイルのファイル名は、どのように取得するのでしょうか？
・ツリー全体表示
【4285】Re:フォームの重ね表示について
回答  Gin_II  - 05/1/27(木) 21:51 -
引用なし
パスワード
   >元フォーム：一覧表示
>開くフォーム：個別詳細編集
>という画面構成でして、編集後の結果を即時反映させたいのですが…
>
>フォームのクローズの仕方等に何か工夫が必要なのでしょうか？

個別詳細編集フォームの閉じるときに、一覧表示フォームの再クエリをしてやれば
大丈夫だと思います。

Forms!一覧表示.Requery
・ツリー全体表示
【4284】フォームの重ね表示について
質問  VBAビギナ  - 05/1/27(木) 20:01 -
引用なし
パスワード
   初投稿ですよろしくお願いします

OpenForm で現在開いているフォームの上に別のフォームを開き、
開いた側のフォームでデータ編集、終了後に元のフォームに戻ってくる
という処理の流れの中で、戻った際の元のフォームが再描画されなくて
困っております
というのも、
元フォーム：一覧表示
開くフォーム：個別詳細編集
という画面構成でして、編集後の結果を即時反映させたいのですが…

フォームのクローズの仕方等に何か工夫が必要なのでしょうか？
ちなみにアクセスのバージョンは2000です(9.0.3821 SR-1)
・ツリー全体表示
【4283】複数のエクセルファイルを一括でインポー...
質問  ココア  - 05/1/27(木) 14:43 -
引用なし
パスワード
   複数のエクセルファイルを一括でインポートするにはどうしたら
良いでしょうか？
宜しくお願いします。
・ツリー全体表示
【4282】Re:２つのテーブルのデータ上で合致したも...
お礼  ココア  - 05/1/27(木) 14:40 -
引用なし
パスワード
   解決しました！
クロさん、ありがとうございました！
・ツリー全体表示
【4281】Re:日付表示について
お礼  kin  - 05/1/27(木) 13:31 -
引用なし
パスワード
   和暦になってました。
おかげさまで西暦表示になりました。
ありがとうございました。
・ツリー全体表示
【4280】Re:日付表示について
回答  MJM  - 05/1/27(木) 13:19 -
引用なし
パスワード
   こんにちは。

コンパネの地域のオプションで日付タブは確認されましたでしょうか？
・ツリー全体表示
【4279】Re:メール送信時の本文の内容について
お礼  た〜に  - 05/1/27(木) 13:07 -
引用なし
パスワード
   かろちんさん、ありがとうございました。
無事に出来上がりました。
・ツリー全体表示
【4278】日付表示について
質問  kin  - 05/1/27(木) 12:44 -
引用なし
パスワード
   お世話になります。
AccessでDBを作成しサーバーへ入れ複数のPCからアクセス
して使用してますが、1台だけ西暦表示でなく和暦で表示されてしまいます。
例2005/01/27　が　17/01/27　そのPCの設定でしょうか？
Access2002を使用してます。
ご指導願います。
・ツリー全体表示
【4277】Re:カーソル位置の変更
お礼  ひろ  - 05/1/27(木) 10:41 -
引用なし
パスワード
   無事に解決いたしました。

かろちんさん、本当にありがとうございました。
・ツリー全体表示
【4276】Re:#Num! の処理が出来ない
回答  かろちん  - 05/1/27(木) 0:33 -
引用なし
パスワード
   リンク元はEXCELですよね。
扱えない値として"#Num!"の表示になっているだけで、"#Num!"の文字が入って
いるわけではないようです。
インポートエラーテーブルができていると思いますが、対象のフィールドと行NO
が入っていると思います。

したがって、クエリーでの置換えはできません。

データが欠けているということであり、正しくしく取り込めないことを意味して
いますので、こんなデータを取り込んで良いのかどうか疑問ですが、どうしても
と仰るのであれば、テーブル作成クエリーで、MDB上にテーブルを作れば消える
ようです。

SELECT リンクテーブル名.* INTO 作成テーブル名
FROM リンクテーブル名;
・ツリー全体表示
【4275】Re:メール送信時の本文の内容について
回答  かろちん  - 05/1/26(水) 22:34 -
引用なし
パスワード
   下記のように、bodyに改行を入れればよいのでは。

　　Dim strMsg　　　As String
　　Dim strKokyaku　As String　　　 '顧客名
　　Dim strBukken　 As String　　　 '物件名
　　Dim strURL　　　As String　　　 'URL

　　strKokyaku = ""　　　　　　 '顧客名をセットする
　　strBukken = ""　　　　　　　'物件名をセットする
　　strURL = ""　　　　　　　　 'URLをセットする

　　strMsg = ""
　　strMsg = strMsg & "*******メールの本文イメージ********" & vbCrLf
　　strMsg = strMsg & vbCrLf
　　strMsg = strMsg & "下記の通り報告致しますのでご確認願います。" & vbCrLf
　　strMsg = strMsg & vbCrLf
　　strMsg = strMsg & "顧客名：" & strKokyaku & vbCrLf
　　strMsg = strMsg & vbCrLf
　　strMsg = strMsg & "物件名：" & strBukken & vbCrLf
　　strMsg = strMsg & vbCrLf
　　strMsg = strMsg & "mdbが置いてあるURLを表示" & vbCrLf
　　strMsg = strMsg & "　　 " & strURL & vbCrLf
　　strMsg = strMsg & vbCrLf
　　strMsg = strMsg & "以上" & vbCrLf
　　strMsg = strMsg & vbCrLf
　　strMsg = strMsg & "**********************************" & vbCrLf
　　myItem.body = strMsg
・ツリー全体表示
【4274】Re:カーソル位置の変更
回答  かろちん  - 05/1/26(水) 22:18 -
引用なし
パスワード
   カーソルをテキストの最後に持っていきたいコントロールの
「フォーカス取得時イベント」または「フォーカス取得後イ
ベント」で

　コントロール名.SelStart = Len(コントロール名.Value)

で可能かと思います。
・ツリー全体表示
【4273】カーソル位置の変更
質問  ひろ  - 05/1/26(水) 18:49 -
引用なし
パスワード
   申し訳ありませんが、どなたか教えてください

テキストボックスが２つあって
タブで移動した時に２つ目のテストボックスは
内容が反転するのではなく
入力されている文字の最後に
カーソルが来るように出来ないでしょうか？

すいませんが、よろしくお願いします。
・ツリー全体表示
【4272】Re:クロス集計クエリ
お礼  水無月  - 05/1/26(水) 16:54 -
引用なし
パスワード
   ありがとうございます！
言われた通りにしてみました。
横計はウィザードを使って、縦計はレポートの末尾に表示することができました。

本当に助かりました。
ありがとうございました。
・ツリー全体表示
【4271】#Num! の処理が出来ない
質問  山田  - 05/1/26(水) 16:49 -
引用なし
パスワード
   リンクしたテーブルのフィールド「F31」にエラーを表す　#Num!　の文字が含まれているので
クエリーで下記のように処理したが出来ない

iif([F31]="#Num!","")

エラー文字を削除する方法
誰か、分かる人いませんか
教えてください。

　
・ツリー全体表示
【4270】Re:クロス集計クエリ
回答  クロ  - 05/1/26(水) 15:58 -
引用なし
パスワード
   横計については自動的に出ませんか？(ウィザード)
元テーブルのフィールド名とか分かりませんが
クエリの
フィールド名…合計 数量: 数量
テーブル…テーブル名
集計…合計
行列の入れ替え…行見出し
とすればどうでしょう？
表示位置はデータシートビューでD&Dで動かせます。

縦計についてはクエリ上で行うのでなくフォーム/レポートで
おこなった方がいいかと思いますが、どうしてもというのであれば

クロス集計クエリを元に品名以外で集計をして
品名フィールドは
品名:"合計"
とし、ユニオンでくっつけるとか...
ただ、「合計」という名前が品名の最後に来るかは分かりません。
・ツリー全体表示
【4269】Re:２つのテーブルのデータ上で合致したも...
回答  クロ  - 05/1/26(水) 15:37 -
引用なし
パスワード
   SELECT 名簿テーブル.*
FROM 名簿テーブル INNER JOIN 受注テーブル ON 名簿テーブル.電話番号 = 受注テーブル.電話番号;

テーブルにしたいのならこれを「テーブル作成クエリ」で

SELECT 名簿テーブル.* INTO 新規テーブル名
FROM 名簿テーブル INNER JOIN 受注テーブル ON 名簿テーブル.電話番号 = 受注テーブル.電話番号;

でいいのでは？
・ツリー全体表示
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
444 / 500 ﾍﾟｰｼﾞ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1084746
(SS)C-BOARD v3.8 is Free