ja7awu の回答履歴
- アクセスでSQLを使う場合のY/N
アクセスを使ってSQLを勉強中です。 アクセスで普通にテーブルデザインから作ると チェックボックスが出てくる、Y/N のデータタイプを SQLを使って作るには、データタイプは何にしたら いいのでしょうか? 説明がうまくないかもしれないので例をあげさせていただくと、、普通の文字はデータタイプcharになりますよね、 そこをY/Nのチェックボックスにしたいのです。 どうか宜しくお願いします。
- エクセルの数式バーが表示できなくなってしまいました
エクセルのマクロでメニューバーを非表示にする処理をしました。 ↓これがマクロのソースです。 Application.CommandBars("Worksheet Menu Bar").Enabled = Not .CommandBars("Worksheet Menu Bar").Enabled これを実行し、自分の思惑通りメニューバーが消えました。 しかし再び処理を実行し、メニューバーを表示させたのですが、数式バーが 表示されません。 どうすれば元に戻るでしょうか?
- エクセルの数式バーが表示できなくなってしまいました
エクセルのマクロでメニューバーを非表示にする処理をしました。 ↓これがマクロのソースです。 Application.CommandBars("Worksheet Menu Bar").Enabled = Not .CommandBars("Worksheet Menu Bar").Enabled これを実行し、自分の思惑通りメニューバーが消えました。 しかし再び処理を実行し、メニューバーを表示させたのですが、数式バーが 表示されません。 どうすれば元に戻るでしょうか?
- アクセスのVBAについて
win2000、アクセス2000を使用しています。 「検索条件」というフォームのテキストに条件を入力したら、「検索結果」というフォームへ抽出されるようにしたいのです。 条件を入力する際に一部分(キーワード)の入力でも当てはまるデータが抽出されるようにしたいのですが、検索条件を入力するテキストボックスが10ヶ所あり、それぞれにキーワードでの抽出をしたいのです。 DoCmd.OpenForm "検索結果", acNormal, , "[施工年度] Like '*" & t_04.Value & "*'" ※[施工年度] →フィールド名 t_04 →テキスト名 上の状態では、うまくいきましたが、条件が複数ある時はどうやって続けたらよいかわかりません。 単純に And で続けたらエラーがでてうまくいきません。 アクセス初心者のため、うまく説明できず申し訳ありませんが、どうぞよろしくお願いします。
- EXCELで番号を付けたい
SHEET1のD2からデータのある行までを別のシートに1から番号をつけていきたいのですが。 SHEET1 D 1 名称 2 ○○予備校 3 □□予備校 . . 32 △△予備校 SHEET2 Q 1 空白 2 1 3 2 . . 32 31 関数を使えばできるのですが、人によって行数が違うのでD65536まで数式を入力しなければなりません。できるだけファイルサイズを小さくしたいのでVBAを使ってできないでしょうか? また既にVBAが組まれているのでそこに追加する形になりますが、既存のVBAには影響はないでしょうか?
- ベストアンサー
- オフィス系ソフト
- natukawa01
- 回答数2
- アクセスのVBAについて
win2000、アクセス2000を使用しています。 「検索条件」というフォームのテキストに条件を入力したら、「検索結果」というフォームへ抽出されるようにしたいのです。 条件を入力する際に一部分(キーワード)の入力でも当てはまるデータが抽出されるようにしたいのですが、検索条件を入力するテキストボックスが10ヶ所あり、それぞれにキーワードでの抽出をしたいのです。 DoCmd.OpenForm "検索結果", acNormal, , "[施工年度] Like '*" & t_04.Value & "*'" ※[施工年度] →フィールド名 t_04 →テキスト名 上の状態では、うまくいきましたが、条件が複数ある時はどうやって続けたらよいかわかりません。 単純に And で続けたらエラーがでてうまくいきません。 アクセス初心者のため、うまく説明できず申し訳ありませんが、どうぞよろしくお願いします。
- アクセスのVBAについて
win2000、アクセス2000を使用しています。 「検索条件」というフォームのテキストに条件を入力したら、「検索結果」というフォームへ抽出されるようにしたいのです。 条件を入力する際に一部分(キーワード)の入力でも当てはまるデータが抽出されるようにしたいのですが、検索条件を入力するテキストボックスが10ヶ所あり、それぞれにキーワードでの抽出をしたいのです。 DoCmd.OpenForm "検索結果", acNormal, , "[施工年度] Like '*" & t_04.Value & "*'" ※[施工年度] →フィールド名 t_04 →テキスト名 上の状態では、うまくいきましたが、条件が複数ある時はどうやって続けたらよいかわかりません。 単純に And で続けたらエラーがでてうまくいきません。 アクセス初心者のため、うまく説明できず申し訳ありませんが、どうぞよろしくお願いします。
- エクセルで定時に音を出す
エクセル初心者です。 こんなこと出来ませんでしょうか? 決められたセルで、毎日一定時間に、空白(未作業)の場合、音で知らせる。
- エクセルのマクロでメッセージを表示させたい
エクセルでセルC2~C10までそれぞれデータを入力します。その時に必須入力項目であるC2とC5が空欄だった場合にメッセージを表示させるマクロを作成したいのですが? マクロは全てのデータ入力が終わった後に「入力確認」というボタンを作ってそこに登録しようかと思っています。 初心者なので他に良い作成方法等があったら教えてください。
- ゼロと表示されたセルの削除方法(その後の問題点)
昨日、質問No.537172で良回答(ja7awu さんから)を頂いた者です。助かりました。ありがとうございました。 その後、sheetの中央に縦(例えばセルP5:P53)にそれぞれ他のsheetから計算されて四捨五入した数値があり(0 0 678,339 8,751 0 54 0 0 98,554 ・・・)、そのゼロが除外された表を作ろうと思い、次の式を入れたK4:K13のセルを設けたのですが、どうもうまくありません。数時間検討しましたがお手上げです。度々ですが、どうぞよろしくご教授お願い致します。 =IF(SUMPRODUCT((P$5:P$53<>0)*1)<ROW(),"",IF(COUNT(P$5:P$53)<ROW(),0,INDEX(P$5:P$53,SMALL(IF(P$5:P$53<>0,ROW(P$5:P$53)),ROW())))) をCtrl+Shift+Enterで確定し、{ }が式につきました。
- ゼロと表示されたセルの削除方法(その後の問題点)
昨日、質問No.537172で良回答(ja7awu さんから)を頂いた者です。助かりました。ありがとうございました。 その後、sheetの中央に縦(例えばセルP5:P53)にそれぞれ他のsheetから計算されて四捨五入した数値があり(0 0 678,339 8,751 0 54 0 0 98,554 ・・・)、そのゼロが除外された表を作ろうと思い、次の式を入れたK4:K13のセルを設けたのですが、どうもうまくありません。数時間検討しましたがお手上げです。度々ですが、どうぞよろしくご教授お願い致します。 =IF(SUMPRODUCT((P$5:P$53<>0)*1)<ROW(),"",IF(COUNT(P$5:P$53)<ROW(),0,INDEX(P$5:P$53,SMALL(IF(P$5:P$53<>0,ROW(P$5:P$53)),ROW())))) をCtrl+Shift+Enterで確定し、{ }が式につきました。
- エクセルで定時に音を出す
エクセル初心者です。 こんなこと出来ませんでしょうか? 決められたセルで、毎日一定時間に、空白(未作業)の場合、音で知らせる。
- エクセルのマクロでメッセージを表示させたい
エクセルでセルC2~C10までそれぞれデータを入力します。その時に必須入力項目であるC2とC5が空欄だった場合にメッセージを表示させるマクロを作成したいのですが? マクロは全てのデータ入力が終わった後に「入力確認」というボタンを作ってそこに登録しようかと思っています。 初心者なので他に良い作成方法等があったら教えてください。
- 0(ゼロ)と表示されたセルを削除したい
Excelで、他の各sheetから、たとえば次のような計算結果がsheetのセルに出るようにしたとします。 4 0 5 6 0 0 0 7 6 5 0 4 これをそのsheet内で、 4 5 6 7 6 5 4 とゼロを除外した表を作りたいのですが、どのようにしたら良いのでしょうか。どなたかお教え下さい。
- 0(ゼロ)と表示されたセルを削除したい
Excelで、他の各sheetから、たとえば次のような計算結果がsheetのセルに出るようにしたとします。 4 0 5 6 0 0 0 7 6 5 0 4 これをそのsheet内で、 4 5 6 7 6 5 4 とゼロを除外した表を作りたいのですが、どのようにしたら良いのでしょうか。どなたかお教え下さい。
- accessのフォームに入力した数字の示すレコード表示
初心者です 恐れ多くもアクセスで図書貸し出しシステム作りに取り組み中です。図書のデータはテーブルへの入力を完了しました.貸し出しの際に、バーコードでフォームに入力した数字に対応する図書の名前をそのフォーム上に表示するにはどうするのでしょうか.連結?非連結?データソースで指定するのか 参考本を読んでもちんぷんかんぷんです。 教えてください.
- [Access]クエリでテキストを合わせて表示させる方法
宜しくお願いします。 例えば、CODEというフィールドに"1000"という 内容が2の行に入っていたとします。 この"1000"というCODEをグループ化させ、 他のフィールドにテキストが入っている場合は、 どちらも合わせて表示させる方法はないのでしょうか? うまく説明できないので、下に図をかきます。 (CODE) (テキスト) 2000 あいうえお 2000 かきくけこ ↓グループ化 2000 あいうえおかきくけこ という風にしたい。 宜しくお願いします。
- 締切済み
- オフィス系ソフト
- seaviewrainbow
- 回答数2
- マクロの実行とコマンドボタン
office2000、WIN98SEです。 マクロの記録でマクロを作成しました。 これをコマンドボタンにコピペして実行するとエラーになります。マクロの実行から動かすとなんの問題もありません。なにがいけないんでしょう。教えてください。 ちなみにやりたいことは、複数のシートの同じセルを一気にクリアにしたいです。 記録したマクロは以下の通りです。宜しくお願いします。 Sheets(Array("用紙(1)", "用紙(2)", "用紙(3)", "用紙(4)")).Select Sheets("用紙(1)").Activate Range("B9").Select ActiveWindow.SmallScroll Down:=36 Range("B9:C58").Select Selection.ClearContents Range("F9").Select ActiveWindow.SmallScroll Down:=36 Range("F9:G58").Select Selection.ClearContents Range("I9").Select ActiveWindow.SmallScroll Down:=36 Range("I9:I58").Select Selection.ClearContents Sheets("用紙(1)").Select Range("B9").Select End Sub