rivoisu の回答履歴

全526件中421~440件表示
  • テーブル設計について(Access2003)

    製品の在庫管理のデータベースを考えております。 [製品]テーブルと[材料]テーブルがあり構成は 次のようになっております。 この場合のそれぞれのテーブルの設計はどのよう にしたらよろしいでしょうか? 製品A   材料A   材料B   材料C 製品B   材料C   材料D 製品C   材料B   材料D

  • エクセルマクロ-条件付き繰り返し

    マクロ初心者です。(エクセル2003使用) シート1にある表で、M列が空白以外(処理済みなどの値がある場合)である場合、その行全体をコピーし、シート2の最終行に貼り付けして、シート1からはその行を削除するマクロを作成したいと思っていますができません。 すみませんが、どなたかご教授願います。 (シート1の表) ・8行目が題目となっており、A9から表となっています。 ・表の全体サイズは、横がAからMまでで、縦はC(シー)の管理番号行分までとなっています。(Mは、空欄があったり値(処理済みなどの値)が入っていたりしています) (考えているマクロ) ・Loopの回数は、Cの管理番号が終わるまで ・IFでCに値があり、Mが空欄だった場合は、そのまま(何もしない) ・Cに値があり、Mに値があった場合は、その行全体を選択しコピーし、シート3の最終行に貼り付け、シート1のその行は削除する Sub 処理済み() Range("C9").Select Do While ActiveCell.Value = "" ActiveCell.Offset(1).Select Loop If ActiveCell.Offset(, 10).Value = "" Then そのまま Else If ActiveCell.Offset(, 10).Value = "値があったら" Then その行全体を Select.Copy Sheets("Sheet2").Select Dim 下 下 = Range("A").End(xlDown).Row ペースト 削除 End If End Sub すみませんが、どなたか教えていただけましたら助かります。 よろしくお願いいたします。

    • kkk-z
    • 回答数4
  • VBAでもsort

    今、FOM出版のVBAの実践編を勉強中です。宜しくお願いします。 その中の「sort」メソッドでどうしても納得できず、前に進めない事があります。 構文:rangeオブジェクト.sort(kye1,order1,key2,order2,key3,order3,header) これは理解できるし、どこも省略せずに記入すればその通りに動くのですが orderは省略でき、省略した場合は昇順に並べ替えられると本には載っているのですが 私の記述はうまくいきません。 なぜ、こうなるのか教えてください。 B3  C3   D3 No.  氏名  住所 という表があり、氏名を昇順に並べようとしています。 構文通りに Range("B3").Sort key1:=Range("C3"), order1:=xlAscending, header:=xlyes とすれば問題なく Range("B3").Sort key1:=Range("C3"), header:=xlyes と記述すると、最初はうまくいきますが もう一度試そうと氏名欄を降順に並べ替え、それから実行すると動きません。 また、No.欄を昇順に並べ替えて実行するとちゃんと動き No.を降順に並べ替えて、氏名欄を昇順で並べ替えを実行すると氏名欄も降順で 並べ替えられてしまいます。 なぜ、こんな安定しない動きをするのかがわかりません。 初歩的な質問で申し訳ないのですが、どうしても気になって先に進めないので どうぞ教えてください。 ちなみに、もう一度試そうとNo.欄を並べ替える時は、エクセルの昇順降順アイコンで 並べ替えています。これが問題なのでしょうか?

    • pasta1
    • 回答数3
  • 論理数学で条件節が理解できない

    命題Aが真のときに命題Bが偽ならばなんでA→Bが偽になるんですか? 理解しかねます わかりやすく説明しているサイトを教えてください。

    • noname#115727
    • 回答数4
  • 卑弥呼

     卑弥呼はシャーマンだったろう、ということを聞いております。  ◎これはほぼそうかも知れないと思っても遠からずでしょうか?  ◎一般に祭政的シャーマンとは独自に国家とかの統治や政治を行うことと両立しえましょうか?  ◎卑弥呼の時代にはもう古墳時代になっていたかも知れないというお話しもありますようですが、膨大な労働と人を動員したであろう古墳築造は国家権力とか、統治権力の存在を想像しても間違いではないでしょうか?  ◎卑弥呼などシャーマンが国政を行うものでないとしたら、国政担当者として、卑弥呼などのシャーマン以外の存在を画けないでしょうか?  ━シャーマンを利用しているかもしれない人物など━

  • インターネットの特性とインターネット問題の本質

    タイトル通りなのですが インターネット上で起こる様々な問題(犯罪も含め)がインターネットの特性に由来するものである場合、インターネット問題の本質とはなんですか? 例 問題:動画サイトでの著作権侵害 原因:インターネットの特性である、著作物の容易な複写、大量発信・受信が可能なこと 問題の本質:(   ) ↑みたいな感じで、「たとえばこんなことがインターネットの問題として挙がっているけど、それはインターネットの○○な特性に依っているよね。それで、(     )だから、インターネット問題の本質は(   )だって言うことができますね。」これぐらい優しく易しく教えていただけると嬉しいです! お願いします。

    • noname#93923
    • 回答数1
  • 歴史の問題作ってください(暇な人お願いします)

    下に並んでる語句が答えになるような歴史の問題を 語句の数だけ作ってください。 必ず歴史の問題になるようにしてください。 1.ルネサンス 2.宗教改革 3.プロテスタント 4.イエズス会 5.香辛料 6.コロンブス 7.バスコ・ダ・ガマ 8.マゼラン 9.ステカ帝国 10.インカ帝国 11.東インド会社 12.種子島 13.鉄砲 14.南蛮人 15.南蛮貿易 16.長崎 17.平戸 18.生糸 19.銀 20.フランシスコ・ザビエル 21.キリシタン大名 22.織田信長 23.桶狭間の戦い 24.長篠の戦い 25.安土城 26.明智光秀 27.本能寺の変 28.楽市・楽座 29.境 30.豊臣秀吉 31.大阪城 32.関白 33.石高 34.太閤検地 35.検地帳 36.刀狩令 37.兵農分離 38.文禄の役 39.李舜臣 40.慶弔の役 41.桃山文化 42.姫路城 43.天守閣 44.障壁画 45.狩野永徳 46.千利休 47.有田焼 48.出雲の阿国 49.歌舞伎 50.人形浄瑠璃 51.南蛮文化 一つでも結構です。 神様のような方が現れるのを待っています。

    • lilinet
    • 回答数9
  • クエリでの出力の仕方について

    ACCESSでクエリを使って出力の仕方について、 教えてほしいのですが、 クエリで重複したデータを出力することはできますが、 仮にその重複がなくて空だった場合、元のテーブルを表示させること ってできないのでしょうか。 今できることは、 元のテーブル⇒重複クエリ実行⇒元テーブルと重複したテーブルを 比較して重複していないデータを出力 やりたいことは、 元のテーブル⇒重複クエリ実行⇒元テーブルと元テーブルと重複した テーブルを比較して重複していないデータを出力 ※重複したテーブルがない場合は、元のテーブルを出力

    • meteo14
    • 回答数3
  • 判定関数の作成

    次のような判定を行う関数を作成中です ・規格と測定値を比較し、測定値が規格内かどうかを判定する ・規格にはいくつか表記の種類がある(代表例は下記4つ)  『10±5』,『10+5/-0』,『10±5mV』,『汚れなき事』 ・測定値は数値のみの入力 (ただし規格が数値でなければ測定値は判定結果のOKかNGを記入) 現在、代表例の1つめにある規格の文字列で±を+と-に置換して計算し、 MaxとMinに代入して、測定値と規格を判定する所までは出来ています。 ただ、規格の表記がバラバラな事が問題で、読み取った規格が 『数字』±『数字』 でなければ、正常に作動しません。 上記にあるような規格から、最大値と最小値を求める方法はあるのでしょうか? どうにかして数字以外の文字列を削除する方法を教えてください。

  • テーブル設計について(Access2003)

    製品の在庫管理のデータベースを考えております。 [製品]テーブルと[材料]テーブルがあり構成は 次のようになっております。 この場合のそれぞれのテーブルの設計はどのよう にしたらよろしいでしょうか? 製品A   材料A   材料B   材料C 製品B   材料C   材料D 製品C   材料B   材料D

  • TRON系とその他OS

    国内ではTRONで開発している製品が多いように見えますが、そもそもTRONとはどういう特徴をもったOSなんでしょうか? 坂村チームはどんな良さがあると考えてTRONを推奨したんでしょうか? LinuxやWindowsと比べて何がそんなに優れているんでしょうか? また、LinuxやWindowsは自宅のPCで気軽に動かせますが、TRON系は見たことがありません。 そもそもTRONはμITRONのようなリアルタイムOSだけが出世してるんでしょうか 自宅で使って便利なものはあるんでしょうか? ちなみに当方は素人です。

    • Myers
    • 回答数3
  • ネット右翼の人達って…。

    最近の回答を見て 思ったりしたのですが、 いわゆる『ネット右翼』の方達…ですか?(最近はっきりこの名前知りました…^^;) ネット右翼の方達ですが、 「なんでそこまで…?」っていうくらい、 なんかすごいですね…。 異常というか極端というか…。 麻生さんも、たしかネット右翼の方達が 推したんではなかったんでしたっけ…? そこまで徹底して意見を言ってるのに、 選んだものは間違っているという…。 よくわからない…^^; 右翼でいることがかっこいいと、思ってるのかな。

  • マクロ:横並びデータを縦並びに変更

    添付のように、横に並んでいるデータを、 縦に並べ変えるマクロを組みたいのですが、 ネットで検索して、組んでみたのですが、 基本的な知識がなくてうまくいきません。 データ量もあり、頻繁に発生する作業なので、 教えて頂けると大変助かります。 よろしくお願い申し上げます。

  • 【設計】vb.netでファイルを読み込みDB登録を行う

    すみません、vb.netで開発を行うにあたり設計に詳しい方が いらっしゃいましたらご教授願います。 開発する機能はタイトルの通り、txtファイルからデータを読み取り 内容をデータベースに登録するというものですが 現在、開発するにあたり二つのロジックを思いついており どちらが適切か迷っております。 (1) あらかじめtxtファイルの内容を全てリードし配列等の一時変数に退避   ファイルリード終了後、配列に格納されたデータを1件ずつ登録 (2) txtファイルの内容を1件リードするごとにデータベースに登録 開発環境は、vb.net、Oracle です。 txtファイルに格納されているデータ量はファイルにより様々ですが 多くても2万件が予想されます。 迷っている理由としては、 (1)は2万件のデータ量を配列に格納したとしてメモリが耐えれるかどうか? (2)は、1件ずつ読込みデータベースに登録するとなると  その分ファイル及びデータベースへのアクセス時間が長くなり  負荷がかかるのでは? という、懸念事項が考えられ迷っております。 上記、二つの開発手法の内どちらがベストか または、上記以外にベストなロジックがあればご教授お願い致します。

  • セルの選択でその行に色を付けたい

    横に長いデータがあり、その1つのセルを選択するとその行全体に色が付くようにしたいのです。過去の質問で以下のようなものを見つけましたが、問題はその場合、通常のコピー→貼り付けができない点です。 その辺を問題なく行える方法はないでしょうか? よろしくお願いいたします。 Public m, n Private Sub Worksheet_SelectionChange(ByVal Target As Range) If m <> 0 Then Range(Cells(m, 1), Cells(m, 256)).Interior.ColorIndex = n End If m = Target.Row n = Target.Interior.ColorIndex Range(Cells(Target.Row, 1), Cells(Target.Row, 256)).Interior.ColorIndex = 6 End Sub

    • ponpa22
    • 回答数9
  • エクセルのDSUM関数について教えてください!

    エクセルのDSUM関数を使用するときに Datebaseの所に関数を使用していたり フィールドの所に関数を使用していたら 使えないのでしょうか? また、複数検索をするときにDSUM関数以外で使用できるものはありますか? よろしくお願いします!

  • セルの選択でその行に色を付けたい

    横に長いデータがあり、その1つのセルを選択するとその行全体に色が付くようにしたいのです。過去の質問で以下のようなものを見つけましたが、問題はその場合、通常のコピー→貼り付けができない点です。 その辺を問題なく行える方法はないでしょうか? よろしくお願いいたします。 Public m, n Private Sub Worksheet_SelectionChange(ByVal Target As Range) If m <> 0 Then Range(Cells(m, 1), Cells(m, 256)).Interior.ColorIndex = n End If m = Target.Row n = Target.Interior.ColorIndex Range(Cells(Target.Row, 1), Cells(Target.Row, 256)).Interior.ColorIndex = 6 End Sub

    • ponpa22
    • 回答数9
  • ドットインパクトプリンタへの出力

    NEC製のドットインパクトプリンタ(multiimpact700xx2)に出力プログラムを開発しています。 先日まではWindowsのテストページ等が印刷できていたのですが、 突然印字を指示するとプリンタの電源が落ちるようになってしまいました。 表示には「AL-09 パワーOFFしてください」と表示されます。 しかし、マニュアル等を見てもエラーが出ておらず問い合わせても回答が返ってきません。 現状は、ActiveReportの印刷イメージの出力先をドットインパクトのプリンタにして出力しようとしています。 実現の仕方の誤りや良い調査方法があればご教授ください。

  • 警察の無能、職権乱用に被害届をどこに出したら、よいですか。

    日本政府の警察の無能とは、例えば、海上保安庁は、多くの漁労労働者が、数年前、他国に拿捕、拘留されているにもかかわらず、事実を隠蔽している。半年前の、鳥取県の第38吉丸の拿捕事件は、先例が、片付いておらないのに、独善的に、罰金を支払い、、乗員を召還させてしまっている。にもかかわらず、警察は、多くの職員を公道に、出動させ、交通取締りを行使したり、一般人には、職務質問など、執行している。これは、公務を全うしておらないのに、職権を乱用しているに等しい。 日本政府警察に被害届を提出するより、外国の国際裁判所に日本の一般市民として、提出する場合、どこに提出すれば、よろしいでしょうか。また、実際、実例など、ご教授ください。

  • セルの選択でその行に色を付けたい

    横に長いデータがあり、その1つのセルを選択するとその行全体に色が付くようにしたいのです。過去の質問で以下のようなものを見つけましたが、問題はその場合、通常のコピー→貼り付けができない点です。 その辺を問題なく行える方法はないでしょうか? よろしくお願いいたします。 Public m, n Private Sub Worksheet_SelectionChange(ByVal Target As Range) If m <> 0 Then Range(Cells(m, 1), Cells(m, 256)).Interior.ColorIndex = n End If m = Target.Row n = Target.Interior.ColorIndex Range(Cells(Target.Row, 1), Cells(Target.Row, 256)).Interior.ColorIndex = 6 End Sub

    • ponpa22
    • 回答数9