ja7awu の回答履歴

１回目　　 Ａ　15 Ｂ　10 Ｃ　8 上記の内容で、二回目にＡのところに増えるはずの数字が誤って14と入れた場合に間違いがわかる様に色が変わるようにするにはどうすれば、よろしいでしょうか？できれば次のシートに結果が出る様にしたいのです。

EXCELにて、複数のシートを1シートに集約したいのですが、 どうすればいいでしょうか？ Sheet1からSheet10ぐらいの量だったので、範囲を指示してコピー＆ペーストしていたのですが。。。 Sheet1からSheet50の量になると大変で困ってます。 １シートには印刷で１ページ分のデータが入っています。 Sheet1の内容の下にSheet2の内容を、その下にSheet3の内容という様にコピーしたいです。 何か、簡単なマクロ等有りましたら、教えてください。 VBAは使用した事がないのでよくわかりません。 よろしくお願いします。

EXCELにて、複数のシートを1シートに集約したいのですが、 どうすればいいでしょうか？ Sheet1からSheet10ぐらいの量だったので、範囲を指示してコピー＆ペーストしていたのですが。。。 Sheet1からSheet50の量になると大変で困ってます。 １シートには印刷で１ページ分のデータが入っています。 Sheet1の内容の下にSheet2の内容を、その下にSheet3の内容という様にコピーしたいです。 何か、簡単なマクロ等有りましたら、教えてください。 VBAは使用した事がないのでよくわかりません。 よろしくお願いします。

EXCELにて、複数のシートを1シートに集約したいのですが、 どうすればいいでしょうか？ Sheet1からSheet10ぐらいの量だったので、範囲を指示してコピー＆ペーストしていたのですが。。。 Sheet1からSheet50の量になると大変で困ってます。 １シートには印刷で１ページ分のデータが入っています。 Sheet1の内容の下にSheet2の内容を、その下にSheet3の内容という様にコピーしたいです。 何か、簡単なマクロ等有りましたら、教えてください。 VBAは使用した事がないのでよくわかりません。 よろしくお願いします。

以前無料のソフトをダウンロードしたときに、 Ｅxcelのメニューバーが消えてしまいました。 （ツールバーは残っています。） 結局、そのソフトはすぐに削除したのですがメニューバーは消えたまま。 その時は何か設定を変えるだけで戻るだろうと軽く考え、 そのままにしてしまいました。 やはり、メニューバーがないと不便なので戻そうと思い、 Officeを一旦削除して、再インストールしました。 それでも、メニューバーは消えたまま。 Microsoftのサポートサービスで検索したところ、 メニューを再表示するには、 「CommandBarsオブジェクトのEnbledプロパティをTrueに設定する」 となっていました。 ところが、知識が無いため何をどうしたらいいのか、さっぱり分かりません。 どなたか、教えていただけないでしょうか？ ＯＳはWinＸＰ HOME、OfficeはXP Personalです。 別にAccess2002もインストールしてあります。

ACCESSにおいて、テーブルにおけるデータ一覧表に行番号をつけてプリントアウトしたいのですが、どうしたらよいのでしょうか。 また、クエリでのデータ一覧表にも行番号は独自に作れるのでしょうか。おしえてください。

こんにちは。いつも助けていただいています。 いまマクロであるプログラムを組んでいます。 その中に、 「あるセルの値を、２００行分先のセルにコピーをしたい」 「しかし、コピー先に既になにかが入力されている場合があり、上書きするのは困るので事前に確認したい」 「このような操作を、多数繰り返す」 という内容のものがあります。 そこで下記のような構文を作りました。 コピー元セルを予め選択しておき、 R = ActiveCell.Row　　　　 C = ActiveCell.Column Cells(R+200, C).Activate　　 ActiveWindow.SmallScroll Down:=200 AAA = MsgBox("コピー先はここでいいですか", vbYesNoCancel) 予定では、画面がスクロールしてコピー先が表示・選択されて、そのあとメッセージボックスが表示されて、ＹＥＳ／ＮＯ／ＣＡＮＣＥＬを入力する・・・ はずだったのですが、 実際動かしてみると、メッセージボックスは出ますが、画面表示は初期のまま（コピー元が表示・選択されている状態）であり、事前確認ができません。 なぜかメッセージボックスの処理（ＹＥＳ／ＮＯ／ＣＡＮＣＥＬのいずれかを押す）をすると希望の画面が現れます。 私の希望どおりにするには、どうすればよいのでしょうか？ また上記の構文ではなぜできないのでしょうか？ まだまだ超ビギナーなので、アホみたいなミスをしているのかもしれません。その場合はご勘弁ください。 よろしくお願いいたします。

MsgBox("バックアップを取りますか？",36,"確認")=6 上記、条件式でユーザーが”はい”を選んだ場合のみ、 テーブル作成がされるようにしてます。 その後、自動的に、エクセル出力することは 可能でしょうか。 まとめると、 ユーザーが条件式で”はい"を選んだときのみ他のマクロを実行したいという ことです。 （注釈） マクロでエクセル出力方法はわかります。 VBAはわかりません。。

あとから貼り付けたデータなどで、エクセル内にふりがな情報が無い 文書にフリガナをつける方法を教えてください。 よろしくお願いします。

エクセル2000のマクロで、こんな作業をしたいのですが、 基本設定：「シート１」 　　　　　　グラフ（上半期）と、その元になる表（上半期）がある。 　　　　　　表は、月ごとの（シート３の）フラグ別で集計されている。 　　　　　「シート２」 　　　　　　シート１と同じ内容で、下半期分がある。 　　　　　「シート３」 　　　　　　シート１、２の元になる表があり、Ａ列に日付、Ｂ列以降にフラグが数個あり、 　　　　　　コメントが続く。 希望動作：マクロを実行すると、シート３の表を、 　　　　　実行日の年度の上半期、下半期、Ｂ列以降のフラグで、 　　　　　フィルタをかけ、ヒットする件数をシート１、２に送る。 これだけのことなんですが、解らないことがあって止まっています。 　(1)、今日の日付を取得し、その年度の上半期（４／１～９／３０） 　　　下半期（１０／１～３／３１）を取得する。 　　　Ａ列の日付は、（2002/11/15 18:45）という形式です。 　(2)、フィルタをかけた後、ヒットした件数を取得する関数。 よろしくお願いします。

エクセル2000のマクロで、こんな作業をしたいのですが、 基本設定：「シート１」 　　　　　　グラフ（上半期）と、その元になる表（上半期）がある。 　　　　　　表は、月ごとの（シート３の）フラグ別で集計されている。 　　　　　「シート２」 　　　　　　シート１と同じ内容で、下半期分がある。 　　　　　「シート３」 　　　　　　シート１、２の元になる表があり、Ａ列に日付、Ｂ列以降にフラグが数個あり、 　　　　　　コメントが続く。 希望動作：マクロを実行すると、シート３の表を、 　　　　　実行日の年度の上半期、下半期、Ｂ列以降のフラグで、 　　　　　フィルタをかけ、ヒットする件数をシート１、２に送る。 これだけのことなんですが、解らないことがあって止まっています。 　(1)、今日の日付を取得し、その年度の上半期（４／１～９／３０） 　　　下半期（１０／１～３／３１）を取得する。 　　　Ａ列の日付は、（2002/11/15 18:45）という形式です。 　(2)、フィルタをかけた後、ヒットした件数を取得する関数。 よろしくお願いします。

仮に下記のような式があった場合、 =IF(OR(A1=3,A1=8,A1=9,A1=12,A1=20),true) A1=3,A1=8,A1=9,A1=12A1=20 の部分をもっと簡略して書く方法はないのでしょうか？(=右辺の数値に規則性はないものとします。) あまりに同じ”A1=”が連続するもので疑問に思いました。

0930と2215という２つの４桁のただの数字があります。 2215-0930＝1285と言う答えになります。 が、この4桁の数字を時刻として 09：30と22：15の間は12時間45分と計算し、表示形式を12.75とする方法を知りたいです。これをアクセス上のデータで行いたいのですが、いい方法がありましたら教えて下さい。

今月の初日から今日まで・・・は、Between DateSerial(Year(Now()),Month(Now()),1) And Now()だと知りました。 では、今年の初日から今日までは？

アクセスのデータベースをエクセルでも管理しています。 アクセスは毎日更新されています。 エクセルでの更新は毎日、というわけではありません。 エクセルのファイルは、社内共通フォルダに置いてあって 時々、他の方が印刷をされたりします。 そこで、最終更新日（時間まで）を載せたいのですが ＮＯＷ関数では開くたびに更新されてしまいます。 昨日、マクロで日付を表示させるボタンを作りましたが 今朝見てびっくりです。「今じゃん！」 って、当然ですよね(笑) こんなおとぼけな私にご教授くださいませ(汗) エクセル・アクセス共に９７で、ウィンドウズは９５です。 説明不足でしたらすいません。

Excel2000を使用しています。 関数が参照するセルを指定する場合、例えばSUM、のとき。 セルA1には"B1"と入力されており、 同様にセルA2には"B5"が入力されていたとして(もちろん " は実際には入力されてません）、 この　セルA1 と A2 のテキストデータを参照して、SUM(B1:B5)　を得るにはどのように範囲を指定したらよいのでしょうか？ 別にセルA1 と A2 が "B1" 及び "B5" でなくてそれに代わるものでも構いません。 要は関数が参照するセルをほかのセルの値で指定したいのですが。

タイトルどおりの質問なんですが、範囲選択をしないでロックされていないセルの数値や文字、関数などを一度にクリアするにはどのようなマクロを組めばよいでしょうか？ ちなみにExcel2000です。 教えてくださいm(__)m

どなたか教えて下さい。 Access2002を使っています。 フォームの条件付書式を使い売上が100000円以上なら赤に背景色を変えようと思っています。 VBAの勉強の為に、ツールバーの条件付き書式を使わずにvbaで挑戦してみました。 Private Sub Form_Open(Cancel As Integer) If Me.売上.Value >=100000 Then Me.売上.BackColor = RGB(255, 0, 0) End If End Sub 単票形式ならば上手くいくのですが、フォームのデータシートタイプで表示すると反応しません。 但し、ツールバーの条件付き書式からの設定ではデータシートでも反応します。 上記のIF文では条件付書式にはなっていないのでしょうか？ helpでDatasheetBackColor プロパティというのを探せましたが、全体の背景色の変更になってしまいます。 ツールバーにあるからには、VBAで出来るだろうと考えるのは間違えでしょうか？ もしもデーターシートの条件にあったセルのみ背景色をvbaで変えられることを知っている方、よろしくお願いします。 haru

Access2000を使用しています。 以下のようなテーブルを作成し、町内毎に 実施したアンケートを集計しようと思います。 *************************************** 「アンケートテーブル」 --------------------------------------- 町内　　　　テキスト　　３バイト　　 入力連番　　数値　　　　４バイト 設問１　　　テキスト　　１バイト （主キー＝　町内＋入力連番（７バイト）） **************************************** これに対し入力用のフォームを作成しました。 非連結のテキストボックスに町内名を入れると自動的に 町内ごとの入力連番の最終番号を取得し、「町内」と「入力連番」 のテキストボックスに町内名と入力連番（の最終番号）を表示させ 「設問１」のテキストボックスにフォーカスを移動させたいのですが 主キーが２つ以上のフィールドを組み合わせてできている場合の最終 番号の取得のやり方とテキストボックスに表示させるやり方がよく 分かりません。 Dmaxを駆使すればよいのだと思いますが、どなたか解説していただけ ばありがたいのですが・・・・。 どうぞよろしくお願いいたします。

AccessでDCOUNT関数を使用したいのですが、 criteriaの書き方がよく分かりません。 「&」をつける場合や「'」をつける場合（文字列の場合に付ける とはありますが）、「"」の有無など基本的な意味がわからないので コンパイル時によくエラーになってしまいます。 それを詳しく解説してあるURLでもあれば教えていただきたいので すが。 よろしくお願いいたします。