回答数
気になる
-
【アクセス】レポート テキスト枠線が消えた
レポートで請求書を出しています。 5分ほどまえに表示していたテキストの枠線が急に表示しなくなりました。 デザインビューやレイアウトビューでは表示されます。 印刷ビューでは表示されなく、印字しても枠線は印字されませんでした。 テキストのデータは表示されています。 ためしに四角形をレポートに書いて見たところやはり枠線は表示しませんでした。 どなたか教えてください。ものすごく困っています。 よろしくお願いします。
質問日時: 2022/07/02 17:40 質問者: north5_mama
解決済
1
1
-
Accessフォーム 一部のレコードだけを抽出する方法について
Accessで車両管理システムを作成しています。 フォームでレコードごとに各車の点検と日付を入力しています。 1つの車に対して複数の点検とその点検日を入力しています。 入力する作業は、 ①フィールド名「点検種別1」を一覧から選択 ②選択した点検種別1の点検日フィールドの「日付1」を入力 ③点検種別2と日付2も同様に入力 フィールドは以下の通りです。 点検種別1 日付1 点検種別2 日付2 点検種別3 日付3 点検種別4 日付4 点検種別は全部で5種類あり、車検、3ヵ月点検、6ヵ月点検、12か月点検、特自検があります。 これをコンボボックスで作成したフィールドから上記の5つから選びます。 記入例は以下のようなかんじです。 点検種別1 日付1 点検種別2 日付2 点検種別3 日付3 車検 2022/06/28 6ヵ月点検 2022/12/28 3ヵ月点検 2022/09/28 これを別フォームの検索で例えば2022/06と入力し検索をかけると、車検と2022/06/28のみが表示されるようにしたいです。 月別で点検がある車の一覧を表示するために日付で検索をかけたいです。 説明がうまくなくて申し訳ございませんが、わかる方がいましたら教えてください。 よろしくお願いします。
質問日時: 2022/06/28 18:45 質問者: Access苦手
ベストアンサー
1
0
-
テキストボックスの値をテーブルに入力したい
お世話になります。 アクセスのボタンを作成しています。 テキストボックスの値をテーブルに代入したいのですが、うまくいきません。 テキストボックス → 見積ID テーブル → T登録用紙 フィールド名 → 見積ID 下記試しましたがうまくいきませんでした。 Me![見積ID] = Me![見積ID] 他のフォームではうまくいのですが、こちらだけ反応してくれません。 詳しい方いらっしゃったら教えてください。
質問日時: 2022/06/28 12:08 質問者: うさぎ0122
ベストアンサー
2
0
-
アクセスで教えてください。 電話番号 000-0000-0000あった場合、 クエリで 000 00
アクセスで教えてください。 電話番号 000-0000-0000あった場合、 クエリで 000 0000 0000 と列を分けたいのですが、どのようにしたらよいでしょうか? 初心者です。 わかりやすく教えていただけると幸いです。
質問日時: 2022/06/27 16:23 質問者: richiha
解決済
4
0
-
docmd.gotorecordを起動するには
フォーム、サブフォームを削除後、はじめのレコードに戻るボタンを作りたいです。 削除まではできたのですが、はじめのレコードにもどることができません。 エラーは出ておらず、削除後の#deletedが各テキストボックスに入った状態で動きが止まってしまいます。 Frm見積書明細がサブフォーム名、T見積書がフォーム名、見積IDはテキストボックスです。 どう修正すればよいでしょうか? Dim db As DAO.Database Dim rs As DAO.Recordset Dim vsql As String Dim i As Variant Dim x As Variant Set db = CurrentDb() x = Me!Frm見積書明細.Form.Recordset.RecordCount If x = 0 Then MsgBox "見積書明細の入力がない為削除できません" Else i = 見積ID vsql = "select * from T見積書 where 見積ID = '" & i & "'" Set rs = db.OpenRecordset(vsql, dbOpenDynaset) If MsgBox("削除しますか?", vbYesNo) = vbYes Then DoCmd.SetWarnings False Me!Frm見積書明細.SetFocus DoCmd.RunCommand acCmdSelectAllRecords DoCmd.RunCommand acCmdDeleteRecord DoCmd.SetWarnings True rs.Delete DoCmd.GoToRecord , , acFirst rs.Close db.Close End If End If ご回答よろしくお願いします!
質問日時: 2022/06/17 15:20 質問者: うさぎ0122
ベストアンサー
5
0
-
Accessのクエリで、replace関数を使い、データの中にある”をブランクに置き換えたいのですが
Accessのクエリで、replace関数を使い、データの中にある”をブランクに置き換えたいのですが、うまくできません。 式2:Replace([式1],”””,””) という式は、どこに間違いがあるのかを教えてください
質問日時: 2022/06/15 14:54 質問者: mame1216
ベストアンサー
6
0
-
実行時エラー3131 FROM 句の構文エラーです について
アクセスで下記コードを実行すると「実行時エラー3131 FROM 句の構文エラーです」と出てしまいます。 どうすればよいでしょうか? Private Sub コマンド210_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim vsql As String Dim i As Variant Set db = CurrentDb() i = 見積ID vsql = "select * from T-見積書 where 見積ID = i" Set rs = db.OpenRecordset(vsql, dbOpenDynaset) If MsgBox("削除しますか?", vbYesNo) = vbYes Then rs.Delete End If DoCmd.GoToRecord , , acPrevious rs.Close db.Close End Sub
質問日時: 2022/06/13 15:45 質問者: うさぎ0122
ベストアンサー
7
0
-
アクセスで教えてください。 例えばテーブル1に 1 佐藤 2 鈴木 3 佐々木 コードと住所一覧があ
アクセスで教えてください。 例えばテーブル1に 1 佐藤 2 鈴木 3 佐々木 コードと住所一覧があるとします。 テーブル2には 鈴木太郎 佐藤花子 佐々木一郎 ってあったとき、 クエリで 鈴木をふくんでたら1 佐藤を含んでたら2 というように、完全一致ではなく、 含んでたらというようにはできないですか?
質問日時: 2022/06/11 20:45 質問者: richiha
解決済
3
0
-
アクセスで教えてください。 住所一覧から 都道府県 市区町村 以下住所の3パターンに分けたいですが、
アクセスで教えてください。 住所一覧から 都道府県 市区町村 以下住所の3パターンに分けたいですが、 どのようにしたらよいでしょうか? できたら区があるときは区まで表示。 郡のときは町まで 市区町村のところに分けたいです。 お願いします。
質問日時: 2022/06/10 23:22 質問者: richiha
解決済
4
0
-
Accessで、『"A"以外の場合"--"に置き換える』という作業をしたいのですが、良い方法はありま
Accessで、『"A"以外の場合"--"に置き換える』という作業をしたいのですが、良い方法はありますでしょうか? Replace([フィールド1],〈〉"A","--") とやってみたら〈〉"A"の部分が正しくないからか、エラーになってしまいました。 検索⇨置換 の場合も、"A"以外を置き換えるというやり方ができません。。。 "A"を置き換える方法はわかったのですが、"A"以外を置き換える方法をご存知の方がいれば教えていただきたいです。
質問日時: 2022/06/07 19:30 質問者: e_e_e_
ベストアンサー
1
0
-
アクセスの更新クエリでカレントレコードのみ更新したい
マイクロソフトアクセス2019で、 ①テーブルa のフィールドcの値を、 テーブルb のフィールドcの値に更新したい ②更新は、テーブルaをソースにするフォームa上で行いたい。フォームaのカレントレコードのみ更新したい。 ③フォームaのカレントレコードについて、フィールドdの値を入力したら、そのレコードのフィールドcの値を、 テーブルbのレコードで、フィールドdの値が入力した値と同じレコードの、フィールドcの値に更新する ということがしたいです。(ややこしくてすいません) 当初、更新クエリを使用して、抽出条件に[フォームa]![ID]でカレントレコードを指定して、[テーブルb]![フィールドd]で、フィールドdが同じレコードを指定するのかな?と思ったのですが、うまくできず、、 (カレントレコードだけで無く、テーブルaのフィールドdの値が、テーブルbのフィールドdの値に同じものがあるレコード全てが更新されてしまいます) どのようにすれば良いか、教えていただけませんか?更新クエリではなく、vbaで記述の方が良いのでしょうか?教えてください。
質問日時: 2022/06/02 23:32 質問者: takitaki168
ベストアンサー
1
0
-
accessって会社や公的機関などは結構普通に使ってますか? 難しいのでしょうか?
accessって会社や公的機関などは結構普通に使ってますか? 難しいのでしょうか?
質問日時: 2022/06/02 22:05 質問者: odekgamlw
ベストアンサー
6
1
-
Excel や Access のフォームの中でいわゆるインターネットの検索窓のようなものを構築できま
Excel や Access のフォームの中でいわゆるインターネットの検索窓のようなものを構築できますか 検索窓に任意の単語をスペースを空けて複数入れれば該当するものがデータベースで現れるという仕組みです どのようにできるでしょうかインターネットで検索したのですが良いものが見当たりません
質問日時: 2022/05/21 12:39 質問者: freeforvirus
ベストアンサー
9
1
-
Access クエリ 同一テーブル内 複数フィールドの同時集計のやり方について
同一テーブル内に1位、2位、3位の名前が入っているフィールドがあります。 ※名前に紐づくに一意のコードもあります。 テーブル例 [キー項目] , [1位] , [2位] , [3位] 202201001, 生徒E , 生徒B , 生徒 H 202202001, 生徒D , 生徒B , 生徒 J 202203001, 生徒B , 生徒E , 生徒 H 202204001, 生徒C , 生徒J , 生徒 Z 202205001, 生徒B , 生徒J , 生徒 A 月毎の集計なので、1位、2位、3位は入れ替わりますが、割と同じ人が名を連ねる為 これを1位~3位内に入っていればカウントアップし、結果を表示したいのですが テーブルの結合方法や関数が見当もつかない為、ご教授頂けないでしょうか。 ※テーブル設計から失敗してるとは思いますが、変更できない前提でよろしくお願い致します。 欲しい結果 [生徒名],[カウント] 生徒A,1 生徒B,4 生徒C,1 生徒D,1 生徒E,2 生徒H,2 生徒J,3 生徒Z,1 試しに1位だけの集計クエリ、2位だけの集計クエリ、3位だけの集計クエリを作ったのですが それをまた別のクエリで合算しようとしてもクエリの結合方法が分からず上手くいかず 行き詰っております。
質問日時: 2022/05/18 19:01 質問者: q-taron
ベストアンサー
1
1
-
ACCESS2019 ナビゲーションウィンドウの色
ACCESS2019 でナビゲーションウィンドウ背景やテーブルやクエリを開いたときに出てくるタブ背景 テーブルをデザインビューで開いた時のフィールドプロパティの背景等が灰色になってしまいました。(元は白でした。) また、そのデータだけでなく、すべてのデータがそう変更されています。 設定を変更した覚えがないのですが、とても見にくいです。白に戻すことは可能でしょうか? よろしくお願いします。
質問日時: 2022/05/10 17:15 質問者: pure-white
ベストアンサー
1
0
-
Windows11 クイックアクセスへ自動的に入ってしまう
Windows11で何かを作業すると、それが自動的にクイックアクセスへ入ってしまいます。それを防ぐ方法を教えてください。
質問日時: 2022/05/08 17:11 質問者: kunigoo
ベストアンサー
1
0
-
windowos 11 Microsoft Edgeを開いたら下記の表示が?
更新プログラムの確認中にエラーが発生しました。 インターネットに接続できません ファイルオールヲ利用している時はマイクロソフトeEGEUPDeXeを 許可リストに登録してください(エラーコード7:0X80072EE7) 教えてください よろしくおねがいします。
質問日時: 2022/04/30 13:47 質問者: ikg4876
ベストアンサー
1
0
-
windows10+Access2019で開発したアプリの移行について
windows10+Access2019で開発したアプリをWindows11+Access2021に移行についての質問なのですが、何か特別な事をしなくても単純に移行できるのでしょうか。 御教示ください。 宜しくお願いします。
質問日時: 2022/04/20 12:33 質問者: あくてぃぶ
ベストアンサー
1
0
-
Essential grammar in use という教材で、eBookというのにアクセスしたいの
Essential grammar in use という教材で、eBookというのにアクセスしたいのですが、Signupが出来ません タブレットでのアクセス方法知りませんか…?
質問日時: 2022/04/17 23:45 質問者: 匿名RKさん
解決済
1
0
-
Vba Userformを前面に出すについて
いつもお世話になります 私は時間が掛かるプログラムの実行に際し、途中途中にUserFormで経過を出力していますが時々前面に出ずに裏で止まっている時が有ります 前面に出すコードはWebからコピーしています Option Explicit '...常にフォームを最前面に表示するための宣言(HPよりコピー) Private Declare Function GetForegroundWindow Lib "user32" () As Long Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Private Const HWND_TOPMOST As Long = -1 Private Const SWP_NOSIZE As Long = &H1& Private Const SWP_NOMOVE As Long = &H2& Sub UserForm_activate() '...常にフォームを最前面に表示するための宣言(HPよりコピー) Call SetWindowPos(GetForegroundWindow, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE) Me.StartUpPosition = 1 UserForm52.Top = 200 UserForm52.Left = 600 DoEvents Sleep 5000 Unload Me End Sub そんな経験はないですか? もしあったら教えてください、その対処法を 以上、よろしくお願いいたします
質問日時: 2022/04/15 12:29 質問者: 公共ごま
ベストアンサー
3
1
-
accessの日付フィールドから前年度だけを取り出したい
accessのクエリで日付が入ったフィールドから、「前年度だけ」の日付を抽出したいのですが、 どのように抽出条件を設定したら良いでしょうか。 年度は4月1日~3月31日になります。 下のように入力をすると1月になった時点で「前年度」ではなくなってしまう事はわかるのですが、どのように書けば良いかわからず困っています。 Between DateSerial(Year(Now())-1,4,1) And DateSerial(Year(Now())+0,3,31) Or Is Null どなたか詳しい方教えて下さい。よろしくお願いします。
質問日時: 2022/04/13 23:13 質問者: necoh
ベストアンサー
3
0
-
MAXで0が出力される
SELECT MAX(No) FROM TEST; で0が出力されます。5で出力されない原因はどのような物が考えられますか? SELECT MAX(合計金額) FROM TEST; は一番金額が高い30000がきちんと出力されます。 Noは主キーで、オートナンバー型 合計金額は数値型 テーブルTEST No|合計金額| 1 |10000 2 |1000 3 |30000 4 |20000 5 |10000
質問日時: 2022/03/31 21:43 質問者: ひろみch
ベストアンサー
1
0
-
ACCESS VBA XSQLについて
お世話になります。 会社でアクセスの社内ツールがあるのですが、vbaを見ると ほとんど XSQL=xSQL&"項目名" となっています。 この記述が項目の分あるのか、大量に記述されています。 これはどういう動きを記述しているのでしょうか? また XSQL=xSQL&"型番" となっていた場合、型番を追加や変更する場合は、どこで変えればよいでしょうか?
質問日時: 2022/03/30 16:04 質問者: mimikokoko3
ベストアンサー
2
0
-
accessでexcelを読み込む時のデータ型
access、excel両方とも2016です。 accessからexcelの1シートを読み込んで、フィールドの設定をした後に読み込むのですが excelの列が50くらいあって、フィールドのデータの型を50も、設定していくのが大変です。 1つのシートを読み込むだけならいのですが、50シート読み込む必要があります。 excelの列は全てのシート共通で、同じ項目の列です。 最初にexcelを読み込んで、フィールの型設定して 次のシートを読み込み時にフィールの設定をしなくても済む方法は何かありますでしょうか?
質問日時: 2022/03/28 19:45 質問者: ひろみch
ベストアンサー
1
0
-
Access VBAで条件を追加する(書き込む)場所
お世話になります。AccessVBAである型番について、条件を追加する必要があります。 Accessはクエリしかまともに見たことがありません。 追記するSQL文は、仕様が異なる別型番と内容が全く一緒とのことで、わかっています。 ただ、どこに書けばいいのかがわかりません。 これらを制御しているであろうモジュールを開き、上記SQL文をCtrl+Fで検索しましたが(当たり前っぽいですが)ヒットしません。 ソースコードの中には「SQL」という記述が大量に見られますが、 その読みに行ってる先はどこにあるのか、どこを開いて、SQL文を追記するのかがさっぱり見当がつきません。 一般的にSQL文の記述はどこにするものなのでしょうか? 右側のモジュール一覧などが出るプロジェクトウインドウを見ても、SQLというファイルがあるわけでもなく、 構造がどうなっているのかがわかりません。 一般的に、で結構です。なにかヒントを教えていただけますと幸いです。
質問日時: 2022/03/23 12:05 質問者: takatoshimori
ベストアンサー
2
0
-
エクセルについて、データの一覧表から項目毎別シートへ反映させる方法を教えてください
(例) シート①(データ一覧表:日時・品目・単価・数量等の全データがバラバラに入力されているシート) シート②(品目Aのみのデータ) シート③(品目Bのみのデータ) シート④(品目Cのみのデータ) 上記のように特定の品目のみを別シートに反映させる方法はありませんか? なお、データは隙間なく埋まるようにしたいです。 また、全シートを印刷もする予定です。
質問日時: 2022/03/15 21:53 質問者: 赤霧島
解決済
2
0
-
アクセスのレコードをフォームで修正したい
アクセス初級者です。 会員登録を管理するシステムを作りたいです。 例えば、「会員登録フォーム」(会員番号(主キー)、名前、性別、生年月日)をテーブル1に格納。 データを修正をする時「検索フォーム」より名前で検索して、「修正フォーム」へ飛び修正フォームから修正をしたいです。 updateメソッドを使ってやってみましたが、会員番号を修正する場合はテーブル1に更新後のレコードが格納できるのですが、それ以外の項目を修正しようとすると(修正のコマンドボタンを押した際)「会員番号の重複」で先へ進めません。 VBAのお詳しい何方か助けて頂けませんでしょうか。
質問日時: 2022/03/11 15:54 質問者: bihabiha
ベストアンサー
10
0
-
access 重複行の複数条件の抽出
access初心者です。 現在下記テーブルから対象レコードを抽出したく、クエリでグループ化等で試みましたがうまくいきません。 Tアイテム------------------------- コード 商品名 出荷数 001 まる 5 002 さんかく 5 ------------------------------------ T在庫----------------------------------------- コード 商品名 ロケ 在庫 001 まる A 20 001 まる B 10 002 さんかく A 10 002 さんかく B 20 003 しかく A 20 ----------------------------------------------- 希望抽出結果--------------------------------- コード 商品名 ロケ 在庫 001 まる B 10 002 さんかく A 10 ----------------------------------------------- 以上のように Tアイテムと紐づくT在庫から在庫の少ないロケと在庫を抽出したいのですがどのように 条件をすれば良いでしょうか。よろしくお願いいたします。
質問日時: 2022/03/10 16:24 質問者: 事務員01
ベストアンサー
1
1
-
access 重複行の複数条件の抽出
access初心者です。 現在下記テーブルから対象レコードを抽出したく、クエリでグループ化等で試みましたがうまくいきません。 Tアイテム------------------------- コード 商品名 出荷数 001 まる 5 002 さんかく 5 ------------------------------------ T在庫----------------------------------------- コード 商品名 ロケ 在庫 001 まる A 20 001 まる B 10 002 さんかく A 10 002 さんかく B 20 ----------------------------------------------- 希望抽出結果--------------------------------- コード 商品名 ロケ 在庫 001 まる B 10 002 さんかく A 10 ----------------------------------------------- 以上のように Tアイテムと紐づくT在庫から在庫の少ないロケと在庫を抽出したいのですがどのように 条件をすれば良いでしょうか。よろしくお願いいたします。
質問日時: 2022/03/10 16:12 質問者: 事務員01
解決済
1
1
-
ACCESS 長い数字のクエリをすると結果が0になる
JANコード一覧があり、クエリを使って抽出しています。 JANコードは 長いテキスト形式にしており、問題なくインポートできました。 クエリの結果を確認すると、JANコードが0に置き換わっています。 どのようにすればJANコードとしてでますでしょうか。 詳しくないのですが、クエリコードをみると下記のようになってます。 SELECT JAM.[コード], JAM.Jan FROM Raku_itemアクセス王 INNER JOIN JAM ON Raku_itemアクセス王.商品管理番号 = JAM.[コード];
質問日時: 2022/03/09 15:52 質問者: エビゾー
解決済
11
0
-
ACCESSのフォーム テキストボックスについて
平素より大変お世話になっております。 (Access初学者です) Microsoft Access の 「フォーム」にて、 テキストボックス(1,2) から テキストボックス(読込) へ値を追加していきたいです。 良い方法があれば、ご教授頂きたく、投稿の方させて頂きました。 下記詳細になります。 -------------------------------------------------------------------------------------- (例1) 入力ボタンをクリックすると 書込tb_box1(テキストボックス1) テキストボックス内 : テスト1 書込tb_box2(テキストボックス2) テキストボックス内 : テスト2 ↓ 「ボタン1回押すと」 (読込tb_boxの中身) テスト1 テスト2 「ボタンを2回押すと」(内容は変えずに) (読込tb_boxの中身) テスト1 テスト2 テスト1 テスト2 -------------------------------------------------------------------------------------- ↑(欲を言うと改行などができるととても助かります) Private Sub 入力ボタン_Click() Me!読込tb_box = 書込tb_box1 Me!読込tb_box = 書込tb_box2 End Sub ですと、次回「入力ボタン」を押した際には、「読込tb_box」内の内容が表示されるだけです。 読込tb_boxに書込tb_boxの中身を追加・蓄積していきたいです。 ご教授のほど宜しくお願い致します。
質問日時: 2022/03/07 11:11 質問者: ぐりずりー
ベストアンサー
3
0
-
access2019 チェックボックスと連動したクエリ抽出条件について
access2019の選択クエリについて IIf([Forms]![料金表]![chk_Dtl],True Or False,False) フォームにチェックボックス[chk_Dtl]を配置してその値とYes/No型のフィールド[詳細表示]と連動してサブフォームのレコードを抽出するのだが、その連動方法が ・チェックボックスがTrueの場合はフィールド値Yes/No両方抽出(抽出条件を設定しないと同じ) ・チェックボックスがFlaseの場合はNoだけ表示 としたい。 そこでサブフォームのもとになるクエリのフィールド[詳細表示]の抽出条件に IIf([Forms]![料金表]![chk_Dtl],True Or False,False) の式を入れたが結果はchk_Dtl がTrueの時は フィールド値がYesのものだけ表示され、chk_DtlがFlseの時はフィールド値がNoのものだけ表示されてしまう。 chk_DtlがTrueの時はフィールド値YesとNo両方抽出したいのです。 誰か詳しい方解決策をお願いします。
質問日時: 2022/03/05 17:27 質問者: rungi
ベストアンサー
1
0
-
Access フォーム上のテキストボックスに入力した計算式を使って計算させる方法を教えてください
パソコンが不慣れな人でも、計算式を書いたら計算できるフォームを考えています。 入力フォーム上で表示された注文数に対し、空白のテキストボックスに +6 や *2 などを 入力すると、注文数+6 や 注文数*2 などを、別のテキストボックスに表示させたいのですが、 可能なのでしょうか? 設計段階でつまずいてるので、テーブルは注文数と個数のフィールド2つしか作成していません。 計算式は単純な +ー*/ の4パターンです 単純にそれぞれコントロールソースで計算できる様にして、必要な演算式に入力したらよいのでは? となりますが、これが資材を算出する為に、10個ほどランダムにフィールドを作らなくてはいけません。 具体例) 注文数300 text1 *1 text2 300 text3 /2 text2 150 text4 *3 text2 900 ・ ・ ・ こんな感じの物が続き、最終的には 注文数 300 資材1 300個 資材2 150枚 資材3 900枚 を表示させるのが目的です。 設計から大変申し訳ございませんが、お知恵をお貸しいただけないでしょうか。
質問日時: 2022/03/02 20:39 質問者: t_seisan
ベストアンサー
1
1
-
ホームぺーじについて
以前にIE11を利用したホームページを作ったのですがEdgeに代わると参照できなくなるのでしょうか。その場合、どの様にすればよいんでしょうか?
質問日時: 2022/03/01 14:34 質問者: kazuyan_notes
解決済
2
0
-
ExcelのVBAコードについて教えてください。
ブックのシート名が「青紙表」に Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$R$18" And IsNumeric(Cells(18, "R").Value) And Len(Cells(18, "R")) = 8 Then ActiveWorkbook.Save End If If Target.Address = "$C$20" And Range("C20") <> "" Then If InStr(1, "一郎,次郎,三郎,四郎", Range("C20")) > 0 Then Worksheets("受付").Visible = False Worksheets("管表").Visible = False End If End If End Sub コードがあります。 2つ目のコードはC20に「一郎,次郎,三郎,四郎」のいずれかの名前が表示された時に表示の「受付・管表」が非表示になるコードです。 このコードではC20に表示した「一郎,次郎,三郎,四郎」を一旦削除すると「受付・管表」が再表示されず、非表示のままです。 「一郎,次郎,三郎,四郎」を一旦削除すると「受付・管表」が再表示出来る様にする方法を教えてください。 よろしくお願いいたします。
質問日時: 2022/02/27 11:43 質問者: エクセル小僧
ベストアンサー
1
0
-
Accessでの入力規制について
Accsessのテーブルで、Yes/No型フィールドがYesもしくはNoの時のみ記入できる、フィールドを作る入力規制はあるでしょうか?数式をいくつか探したのですが見つかりません。 クエリでの抽出ではなく、テーブルでの入力方法をご教示ください
質問日時: 2022/02/22 10:01 質問者: kazubeck
ベストアンサー
1
0
-
ACCESSのクエリの計算について
ACCESSのクエリに関しての質問です。 単純に引き算をしたいのです。 ある、フィールドに、数字ではなく -- と入力されています。 他は数字です。 原価: Switch([販売価格]”--”,0,[販売価格]<>"--",[販売価格]-[仕入れ価格]) Switch関数では、#エラーになります。 IIF関数と、IsError関数を利用しても、#エラーになります。 #エラーを回避する方法はありますでしょうか? お手数ですが、ご教示をお願いします。
質問日時: 2022/02/19 11:18 質問者: naonaokeikei
ベストアンサー
2
0
-
access2019 コンボボックスの値集合ソースについて
例えば 社員テーブル 列 社員ID 名前 性別 役職ID 役員マスタ 列 役職ID 役職名 性別 というテーブルがあり、役職IDで結合する 社員テーブルの役職IDを入力するときにコンボボックスの値集合ソースを役職マスタにして選択する。 ここまでは可能ですが、コンボボックスにリストアップされる役員マスタの性別を社員テーブルの性別でフィルターすることができるでしょうか? 例えば役員マスタには 役職ID 役職名 性別 1 保母長 女 2 保父長 男 3 保母課長 女 というデータがあれば、社員テーブルのデータシートビューでデータを入力する際に 社員ID 名前 性別 役職ID 1 花子 女 と入力し、「女」と入力している値から役職IDに表示されるコンボボックスのリストを 1 保母長 3 保母課長 と表示させたいのです。 入力フォームではなく、テーブルのデータシートビュー直にこれはできるものでしょうか? 以上よろしくお願いいたします。
質問日時: 2022/02/14 05:17 質問者: rungi
解決済
1
1
-
Power BI (Power Queryでのテーブル結合について)
Power BIのデータをPower Queryで編集しているのですが、テーブル同士を結合した後に元のデータテーブルが不要になったので消そうとしたら警告が出て消すことができません。 データ元になっているテーブルを消すことはできないのでしょうか?
質問日時: 2022/02/11 06:03 質問者: tacox
解決済
1
0
-
Access フォーム自動終了
こんにちわ 教えてください(*'▽') フォームの編集後、無操作が続くとフォームを閉じるようにしたいです。 フォームプロパティのタイマーに60000と入れて。 操作中はタイマーを延長し、無操作なら5分後に閉じる予定でしたが、うまくいきません。 Option Compare Database Public chkOperat As Integer -------------------------------------------------------------- Private Sub Form_AfterUpdate() chkOperat = 0 End Sub --------------------------------------------------------------- Private Sub Form_Current() chkOperat = 0 End Sub --------------------------------------------------------------- Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) chkOperat = 0 End Sub --------------------------------------------------------------- Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) chkOperat = 0 End Sub --------------------------------------------------------------- Private Sub Form_Timer() chkOperat = chkOperat + 1 If chkOperat = 5 Then DoCmd.Close acForm, "fo_フォームA", acSaveYes End Sub
質問日時: 2022/02/10 18:21 質問者: 初心シャー
ベストアンサー
1
0
-
Access2021でブラウザで操作
access2010で作成した販売管理があってブラウザ表示させて操作をしたいです。 access2021も購入してあります。 accessVBAを例えばjavaなどに変換できるでしょうか? お手数ですが、教えてください。
質問日時: 2022/02/10 16:47 質問者: AOS
解決済
1
0
-
マクロの書式についての質問です。※マクロ初心者
マクロで検索・上書きのユーザーフォームを作っているのですが、 日付の書式がなかなかうまくいきません。 ”sheet1”から「検索ボタン」を押して日付抽出、 ↑このまま抽出するとシリアル値になるので Private Sub TextBox2_Change() TextBox2.Value = Format(TextBox2.Value, "YYYY/MM/DD") End Sub で設定しています。 ですが、textbox2に別の日付を入力して、上書き登録しようとすると、 1900/01/01の形になり、日のところは変更できるのですが、 西暦と月の場所は固まったままになり、削除もできません。 この場合どうすればよいかおしえてください。
質問日時: 2022/01/29 11:26 質問者: moasdfsgre
ベストアンサー
2
0
-
Access VBA Excelbookを開く際の条件の書き方が分かりません。
Accessから、指定された場所のExcelbookを開く際に、既に開いた状態であれば読み取り専用で開くかと思います。 この際に、もしreadonlyならメッセージを出したいのですが、その際のコードの書き方が分かりません。 開くだけなら、 Private Sub test1_Click() Dim Objxls As Object Dim strFile As String strFile = "\\server\Data\test1.xlsm" Set Objxls = CreateObject("Excel.Application") With Objxls .Visible = True .Workbooks.Open strFile End With End Sub を現在書いてます。 ExcelからExcelbookを開く際は Sub test1_Click() Workbooks.Open "\\server\Data\test1.xlsm" If ActiveWorkbook.ReadOnly = True Then ActiveWorkbook.Close MsgBox " 使用中です" End If End Sub で出来たのですが、Accessになるとこのコードが使えなくて・・・ 何卒、宜しくお願い致します。
質問日時: 2022/01/19 19:24 質問者: t_seisan
ベストアンサー
2
0
-
解決済
1
0
-
【アクセス】DSumで複数の条件
請求先_Code = "0001" 請求月 = "2021年10月" 顧客別月合計 =DSum("売上明細!合計","売上明細","売上明細!請求先_Code = '" & [請求先_Code] & "'"'" And "売上明細!請求月 = '" & 2021年04月 & "'"'") 顧客別に月の合計を出したいのですがどうもうまくいきません… andから後 を入れないと請求先_Code別にでますが、and を入れて月別を出そうとするとできません。 超初心者です。 教えてください。 よろしくお願いします。
質問日時: 2022/01/15 18:24 質問者: north5_mama
ベストアンサー
2
1
-
Accessフォーム上でSUM関数を設定すると全レコード分の合計値が表示されてしまう
Accessフォーム上にSUM関数の合計値を出すフィールドを作成しました。 しかし全レコード分の合計値が表示されてしまいます。 これをレコードごとに合計値が表示されるようにしたいですが使う関数が間違っているのでしょうか? 分かる方がいましたらご教授ください。 現在関数は以下の通りに設定しています。 =Sum([テスト01]+[テスト02]+[テスト03]....[テスト24]) よろしくお願いします。
質問日時: 2022/01/13 17:12 質問者: Access苦手
ベストアンサー
2
0
-
Excel特定の数字が入力されたときに自動で特定の文字に変換される方法
Excelセル上に特定の数字が入力されたときに自動で指定した文字に変換される方法はございますでしょうか? 例として、 1が入力された場合、自動で山田と変換 2が入力された場合、自動で田中に変換 3が入力された場合、自動で鈴木に変換 イメージとしては上記のようなかんじです。 分かる方がいましたらご教授ください。 よろしくお願いします。
質問日時: 2022/01/12 13:15 質問者: Access苦手
ベストアンサー
3
0
-
Access初心者向けマクロ、VBAおすすめ教材またはサイトを教えてください
Accessの勉強法について質問です。 業務で既存のシステムが数年後使えなくなるためその代わりにAccessで作成することになりました。 Accessの資格自体は昨年合格しましたがマクロ、VBAは素人のためおすすめ教材またはサイトを教えていただきたいです。 よろしくお願いします。
質問日時: 2022/01/12 09:44 質問者: Access苦手
ベストアンサー
1
0
-
Excelのマクロについて教えてください。
下記の数式にてPDF化されたファイルをマクロを使用してこのファイルを添付ファイルとして 相手側にメールで送る方法がありましたら教えてください。 「Sub 審査結果() Call output_pdf(ThisWorkbook.Path, "審査結果", Worksheets("審査結果").Range("Y1").Text) End Sub 'output_pdf(出力したいフォルダパス, 出力したいシート名,保存するPDFファイル名) Sub output_pdf(PA As String, sh_name As String, f_Name As String) On Error GoTo SaveError Worksheets(sh_name).Activate ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=PA & "\" & f_Name & ".pdf" Exit Sub SaveError: MsgBox ("保存先パス、対象シート名、保存ファイル名が適切ではありません") End Sub」 のマクロ式を設定しております。 シート10のシート名が審査結果の セルB5に「=IFERROR(HYPERLINK("mailto:"&VLOOKUP("✔",K1:Q4,ROW()+2,FALSE),"mailto:" & VLOOKUP("✔",K1:Q4,ROW()+2,FALSE)),"")」 の数式を設定しており、このセル値は質疑を送る相手のメールアドレスが条件の元に自動表示されます。 又・セルA1には「=IFERROR(VLOOKUP("✔",K1:Q4,2,FALSE)&" "&VLOOKUP("✔",K1:Q4,3,FALSE)&" 様","")」の数式を設定 C16には物件名がそれぞれ表示されるようになっております。 マクロを実行した場合、 1. 自動でOUTLOOKが立ち上がり 2. 上記のマクロでPDF化したファイルを自動で添付 3. セルB5の相手先が自動で宛先(T)となり 4. セル16の物件名が自動で件名(U)となり 5. 本文にセルA1の担当名が自動となり 6. 本文に担当者以外の固定文章(例:この度の審査結果をお送りいたします、子ご確認とご対応をよろしくお願いいたします。)と自動で入力したいです。 以上、1~6の項目はあくまでも希望です。 出来るだけ希望に沿って設定はしたいのですが、全てが無理であれば 出来るだけ、1・2・3までは設定希望です。 何卒、よろしくお願いいたします。
質問日時: 2022/01/07 10:21 質問者: エクセル小僧
ベストアンサー
1
0
-
VBAによるピボットテーブルの更新
VBAでピボットテーブルの更新をしたのですが、 (ActiveWorkbook.RefreshAll) 元データの範囲(行数のみ)が変わった時の記述がわかりません。 助けてください!よろしくお願いいたします。
質問日時: 2022/01/05 16:27 質問者: ノリえもん
ベストアンサー
1
0
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
【Access(アクセス)】に関するコラム/記事
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Microsoft 365 Basic サブスクリプ...
-
Accessのクエリで、replace関数を使...
-
ACCESS VBA でのエラー解決の根拠が...
-
「テキストデータで送ってください...
-
access2021 強制終了してしまう
-
access2021 VBA メソッドまたはデー...
-
Access VBA [リモートサーバーがな...
-
提供されるデータの形式が変わったら…
-
Access Error3061 パラメータが少な...
-
Microsoft365にAccessってありますか?
-
accessのフォームに設置したボタン...
-
CSVファイルの「0落ち」にVBA
-
AccessVBAで任意の複数リンクテーブ...
-
Access IF文でテーブルに存在しない...
-
ms access 2013で、チェックボック...
-
Access VBA を利用して、フォルダ内...
-
Accessのデータ型の日付/時刻型につ...
-
Accessのテキストボックスの入力文...
-
Accessのクエリの結果を、既存のエ...
-
Accessのスプレッドシートエクスポ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Microsoft 365 Basic サブスクリプ...
-
ACCESS VBA でのエラー解決の根拠が...
-
Accessのクエリで、replace関数を使...
-
access2021 強制終了してしまう
-
Arduinoで温湿度と時刻を1分ごとにS...
-
access2021 VBA メソッドまたはデー...
-
Access Error3061 パラメータが少な...
-
Access VBA [リモートサーバーがな...
-
Accessのクエリの結果を、既存のエ...
-
Accessのスプレッドシートエクスポ...
-
Microsoft365にAccessってありますか?
-
列が255以上のCSVファイルをAccess...
-
Access VBA を利用して、フォルダ内...
-
実行時エラー3131 FROM 句の構文エ...
-
CSVファイルの「0落ち」にVBA
-
Accessのレポートについて
-
Accessでレポートを印刷する時のプ...
-
Accessでフォームに自動入力した内...
-
accessデータを指定したExcel、そし...
-
Accessのリンクテーブルのパスを相...
おすすめ情報