High_Score の回答履歴

1行目は見出し Sheet1 A列に品番　B列に個数　C列に注文日　D列に納入日 Sheet2 A列に品番　B列に品が納入される週単位の数値 (1、2、4・・・等) Sheet1のA列～C列が入力された時、 Sheet2のA列を参照してSheet1のＡ列と合致した品番が Sheet2で見つかったら Sheet1のD列 = Sheet1のC列 * Sheet2のB列の数値x7日 を、表示させたいです。 合致する品番が無い場合は　該当なし　と表示させたいです。 どうか宜しくお願い致します。

風邪の時に風邪薬を服用して熱を下げたりするのは逆効果だと主張するお医者さんがいますが、本当の所はどうなんでしょう？こじれた症状の時は必要じゃないかなあともおもいますが・・・

お世話になります。 19歳女性です。 現在自分の食費は自分で出しているのですが、正直アルバイトのお小遣い内でやりくりするにはきついと感じています。 そこで捻くれた考えかもしれませんが親に食費を出して貰おうと思いました。 その事について間違っているかいないか判断をしかねているので、皆さまはどう思われるかお聞きしたいと思っています。 私の家庭は母子家庭で、私が高校1年生の時に両親が離婚しました。 当時から両親ともども身勝手なもので、2つ年上の姉も私も振り回されたのを覚えています。 しかし母子家庭としても板について来た頃から母は恋人探しに明け暮れ、以前からロクにしなかった家事を本当に全くしなくなってしまいました。 この頃私はまだ高校生だった事もあり、恋人探しや友人・姉との遊びで三者面談をすっぽかしたり進路相談に耳を傾けない母にこらえきれない怒りを感じていました。 なので母と衝突する事も多く、もともと贔屓癖のあった母を見ていると当然とも思えましたが、私と母の関係は険悪になる一方で姉と母は異常に仲が良くなっていきました。 そうした延長の様な具合で遂にお前の母親を辞めると言われ、私も頭に来たので言われた事を真に受け家事炊事のなにからなにまで自分で何とかする様になりました。 しかし今頃になってよく考えてみると私は未成年であるし、母に食費の請求くらいはしてもいいのではないかと思い始めました。 そう考えるきっかけとなったのは、母が私には食事も作らなければ誕生日のお祝いもしないのに、成人していて、尚且つお付き合いしている方の家族と同棲同然で金銭に何の苦労もない姉に対し、食事も作るし衣類も買ってやってる事を目の当たりにしたからです。 こう言ってしまったら自意識過剰かもしれませんが、私は不幸だと感じ泣いてしまいました。 私が買って食べている物は3袋入りで100円とかそう言ったものです。 母に食費の請求をするのは間違いでしょうか。 日用品にもお金がかかるので、食費だけでもなんとか浮かせたいと思います。 皆さまはどう思われますか。 回答宜しくお願いします。

10ｋｍあたり何分かかるか、どうやってだせばいいですか？ 距離 時間 40km 1:20 62km 2:03 51km 1:42 24km 0:47 15km 0:30 35km 1:10 というデータがあるのですが、 40kmを1:20かかる場合、10ｋｍ何分かかるかは、どういう計算式で出せますか？ =B2/A2 とすると、0:02になりますが、そもそも0:02というのは、1ｋｍあたりの時間でしょうか？ だとしたら、10ｋｍの場合はどういう式になりますか？

私の実家はものすごく散らかっていて食卓の半分は物であふれていて食事を食べるのに食卓の片付けからスタート。 食事をつくるのにも台所の調理台の上のスペース確保から始めなければなりません。 私は嫁いでいるのですが実家で仕事をしているので毎日実家には行きます。 4歳の子供もいますが毎日行きます。 出産前から実家で仕事をはじめたので産後は半年程実家で寝泊まりしました。 出産前から産後私が寝泊まり出来るスペースを確保して欲しいとお願いをしたんですが全くしてくれず、ハイハイして、歩いて、なんでも口に入れる時期など本当に大変でした。 怪我をしてしまうものはゴロゴロあるし、誤飲してしまうものもゴロゴロ、もちろんダニやホコリも尋常じゃない量だと思います。 私が片付けをする事も許されず、片付けしてくれる訳でもなく子供も4歳になり何事もなく成長しました。 母曰く今は何でも除菌除菌だからアレルギーとか増えたんだと言いますが本当にそうなんでしょうか？ それとこういう人って毎日使う食卓がものだらけでなんともないんでしょうか。 朝昼晩と食事は確実にするしその上母はそこで事務仕事とメイクもします。 食卓には物を置かないルールを決めるなり物入れを置き必要なものだけおくようにしたりと考えたりないんでしょうか。 母とは考え方が違いすぎて理解できません。 散らかっていると必要なものと必要でないものの区別がつかなかったり、消費期限切れにも気づけなかったり、たとえゴミがあったとしてもゴチャゴチャしててゴミかすらも気づけなかったりと悪循環だと思うんです。 綺麗にしていれば不必要な物が目立ち片付けられると思うのですが。

高校で講師をしています。普段は別の仕事をしており、担当している教科も関連する科目です。 先日ネット上で、偶然生徒からの批判を見てしまいました。 授業が退屈でつまらないなどの批判でした。 つまらないのは、授業内容というよりはおそらく私の性格的なものだと思います。 ある程度相手は大人だという接し方をしていたのですが、それも良くなかったようです。 一定数の生徒がつまらないと感じることは仕方がないけれど、一部の生徒は授業を少しは楽しんでくれているのではと思っていました。それが否定されたわけではないですが、誰が批判しているのかわからないので、生徒全員が私の授業を堪え難く感じているのではないかと思ってしまいます。 こうした批判にはどう対処すればよいでしょうか。 明るく楽しく面白い話しをたくさんする教員に突然変身することはできません。 年度途中ですが、生徒のためにも辞めた方がいいのかとも思います。 しかし学校側に迷惑をかけることを考えるとなかなか踏み切れません。 年度途中であっても教員の入れ替わりが多いようなので、許されるのかもしれませんが・・・。

旦那＆義母と実母が不仲です。実母とはどう付き合うべきでしょうか。 旦那の実家で同棲し、そのまま結婚しました。 旦那は母子家庭なので義母と旦那、私で同居しています。 以下のような事情で、義実家と私の両親が不仲です。 •同棲して半年位の頃、トラブルがあり私が旦那に大怪我をさせてしまい、 自分では対処しきれなかったため父親に電話をして 義実家近くまで来てもらいました。 私がなかなか来ないので待ちくたびれた両親が、 義実家に来てしまいました。 両親揃って深夜にきましたが、 こんばんはや夜分遅く～など何の挨拶もせず、 義母は私の両親が家に来るのを知らなかったので義母にとっては突然の訪問でしたが、 挨拶をしたり『どうぞ上がってください』と言った義母や旦那を、 両親とも無言で無視して私が出てくるまで外で棒立ち。 その後、真冬なのに義実家のドア開けっ放しのまま母と私が玄関で話をし、 その後私が外に出て両親と話を済ませましたが、 私と話し終えると両親は義実家には深夜に突然訪問したにも関わらず 何の挨拶もなく、そのまま帰宅。 なぜ義母や旦那に何の挨拶もなかったのかを聞くと、 『私ちゃんに呼ばれたから来ただけ』 『家に上がってないからお邪魔はしてない』と言い、 あくまで自分達は悪くないと思ってます。 その後も義実家のことを『挨拶にうるさい家だから嫌だ』などと言い、 この時点で義母＆旦那は両親に良くない印象だったと思います。 •また、同棲して一年位の頃に、ちょっとした用事で実家に半日程帰らなくてはいけなくなり、 その際に母が、『義実家に置いてある通帳や印鑑、貴重品は持ってきなさいね』と私に言いました。 理由は、盗まれるかもしれないから、泥棒入るかもしれないから…などと言ってましたが、 旦那や義母は、『それって、俺や義母が盗むって言いたいの？？』と、不快に思ったようです。 •父が私を心配して電話をしたがり、私が電話に出ないでいたら父が怒って 『出ないなら110番する』と言ってきたのですが、 それも義母や旦那からみたら110番したら義実家に警察が来ることになるのに、人んちに対する迷惑は考えないのか…と不快に思ったようです。 •私の両親が新興宗教に入っており、私も生まれたときから 入会させられていました。 ただ、旦那と付き合うまで私はその宗教の存在すら知らず、 私の家の様子を私から聞いた旦那が 『もしかしてそういう宗教に入ってる？？』と言われて、 初めて自分の両親や自分が宗教に入っていることに気がつきました。 私はその宗教に入ってることが嫌だったので脱会したいと 母に話しましたが、 その時も『誰かに言われたの？』『旦那さん家は宗教入ってるの？』などと、 旦那一家が宗教に入ってて私をもとの宗教から引き抜こうとしてるような 言い方をされ、不快に思ったようです。 同棲中、私は義母にかなりお世話になりました。 私が困った時など、お金を貸してくれたり、両親と変わらない位義母に助けてもらいました。 旦那にも迷惑をかけたり助けてもらいました。 不注意で大怪我もさせました。 それを知っていても、両親は義母や旦那にそういう態度をします。 その他にも色々あり、結果的に義母＆旦那は、『私が実家に会いにいくのはいいが、 義母＆旦那は私の両親とは関わりたくない、家同士の関わりは避けたい』と、 結婚前から言われています。 旦那が好きだったので、それを承知して結婚しました。 私も、両親の態度や宗教のことが許せず、両親とは結婚後2～3年位絶縁状態でした。 義母には、色々迷惑をかけましたが現在も実の娘のように可愛がってもらい仲はいいです。 旦那とも仲は良く、子供にも恵まれて妊娠6ヶ月です。 両親がいなくとも何の不自由もない生活ですが、ふと両親のことを思い出します。 義母や旦那と両親が仲良くして欲しいのが本音です。 先日2～3年ぶりに母に電話しましたが、悪気はなかったんだから～を繰り返し、 義母や旦那に悪いとは全く思っていない様子で、 私は『両家に仲良くしてほしいから義母や旦那に謝ってほしい、できないならいまのように絶縁状態でいるしかない』と訴えましたが、 母はあくまでも謝る気も悪いことした認識もなく、忙しいからと電話を切られました。 義母や旦那は、私の両親が今までの態度を悪いと思ってくれているなら仲良くしたいが、 悪いとは思ってくれてないなら、関わりたくないと言っています。 両親は、私には優しいですが義母や旦那への態度は変わらないと思います。 義母や旦那には、私だけ会いに行くのは構わないとは言われてますが、 そんな両親と仲良くするなんて義母や旦那に申し訳なくてできないし、 私自身も、態度を改めてくれない両親とは仲良くしたくありません。 旦那は、『私や旦那や義母から見ると両親が非常識に見えるだけなのかなぁ？』と言ってますが、 皆さんから見ても両親は非常識でしょうか？ この先、両親とはどう付き合っていけばよいでしょうか？

私が子供の頃は、学校から帰ったら真っ先に空き地に行ったものです。 当時は帰宅後に空き地に行けば、クラス中の友達が集まってると思うぐらい みんな走り回ってあそんでいました、「みんなー○○○しようぜ！」と言えば 親友も知らない子も集まってきて　缶蹴りや鬼ごっこやかくれんぼをして、真っ暗になるまで遊んで 帰宅すると母に叱られるというのが　当時の私たちの小学校生活でした。 遊ぶというのはそうゆうことなのだと私はずーっと信じていたのですが　時代が変り 私はあまりにも悲しい気持ちになります。 今の子供は帰宅しても公園で遊ばず　自分の家または友人の家でテレビゲームばかりです。 ただ同じ場所に座って　画面に映された物を動かして楽しむ姿が　とても気の毒に思います それだけではなく　子供達は現実の区別が付かないくなり、死んでもリセットできると思ってるという ニュースが出たときは、もうこの世は終わりだと思いました。 毎日同じ画面ばかり見続けていると目も悪くなります 目が悪くなる遊びなんて子供にやらせるのは間違っていると思います なので私の息子には絶対にテレビゲームはやらせないように 遊びというのは外で友達と楽しむものだと教え続けました それなのに息子は「ＤＳが欲しいだの」「ＰＳ３が欲しいだの」　ねだるものはゲームばかりです ゲームがどれだけくだらないかを教えても聞く耳を持ちません。 ついには「友達はみんな持ってるんだよ」とまで言いました。 息子は今の子供の悪影響を受けてしまい、これ以上酷くならないために 「テレビゲームが好きな子とは友達になるな」と言い聞かせましたが 私の知らない間に、友達の家で毎日のようにゲームしてることを知りました 我が子ながら情けないです、鬼ごっこやかくれんぼよりも、なぜテレビゲームなんて 小難しいボタンをいじる遊びを選ぶのか理解できません。 このままでは　みんな骨抜きな子供ばかりがあふれて、絶望的な世の中になるのではないでしょうか 私はテレビゲームを生み出した企業がすべて許せません、近いうちに廃止運動も考えています 一体どうすれば私の息子も含め今の子供達はテレビゲームをやらなくなるでしょうか

お世話になります。 3つ以上の条件を含む式の間違いが分かりません。 =COUNTIFS(sheet1!A$1:A$200,E$1,sheet1!C$1:C$200,"2",sheet1!G$1:Q$200,B3) のようなブック内の別シートを3つの条件に合うデータ件数を集計したいのですが、#value!が出ます。 （ )内の3つの条件をばらして、 =COUNTIFS(sheet1!A$1:A$200,E$1)　(1) =COUNTIFS(sheet1!C$1:C$200,"2")　(2) =COUNTIFS(sheet1!G$1:Q$200,B3)　(3) および =COUNTIFS(sheet1!A$1:A$200,E$1,sheet1!C$1:C$200,"2") は、正しく計算できるのですが、なぜか(1)～(3)を一つの式にすると、エラーになります。 何が悪いのでしょうか。

エクセルのVBAについて。 指定した範囲の中から検索条件に一致したデータを検索し、取り出してくれる関数vlookup をVBAで実現したいのですが、 目標として、エクセルのセル（列）に、値を入力されているとします。 VBAを実行するボタンをクリックすると、、、 その値に対応する文字列（事前に用意）をその値の右のセルに自動で入力させたいです。 このVBAを作ることが目標です。 vbaでvlookupを実現でなくても、それよりも簡単な方法があれば教えていただきたいです。 お手数ですが、よろしくお願いします。

２２歳、大学入試を考えています。 学部は経営学を希望。 将来は会社の経営がしたいです。 大学は夜間か昼間か悩んでいます。 年齢から言うと、いろいろ難しいでしょうか？ 現在は会社で派遣として勤務しています。 社会人２年目ですが、大学は行きたいです。そして無事に卒業し会社に就職。 卒業は２８歳の設定です。 ご回答、アドバイス等ありましたら、宜しくお願いします。

弟は今30歳、自営業で小さい居酒屋をやっている母と実家暮らし、私は一人暮らし独身です。 母となにかとそりがあわず、また、昔から弟ばかり贔屓されているのが我慢ができず、四年程前に実家をでました。 二年程前に母が軽い脳梗塞を患い、それからは月に一度は帰るようにしたり連絡をとるようになりました。 今年の三月に弟がヘルニアになり、仕事を休みそのままズルズルと引きこもるようになりました。 もともと月に一度は風邪だなんだと休む癖があり、最初の数ヶ月は本人も痛いと言うし、無理をして悪化しても…と思っていました。 しかし、様子を見てると、働けない状態からは回復しています。 家計も楽じゃないので、何度もいつから仕事に行くかきくと１日だけ行くそうですが、その次の日には行かないそうです。給料がほぼないので、保険代とかを母が会社に支払っているそうです。 母から相談されると話をしに行ったりしてるのですが、最初のうちは明日いくとか言ってましたが、ここ数ヶ月は完全無視でこの間は家から出ていきました。 相談相手がいないし、母が言ってもきかないから何とかして欲しいと言われますが、正直どうにもできません。 働かないといけないようにご飯つくるのをやめたら、と言ってもそれはかわいそうとか、家からお金を持ち出すかもとか、免許があるのでサラ金に手を出したら困るとか、なんだかんだで母が甘く、強硬策にもでれません。 友人に相談したら、母がそういう風ならどうしようもないし、巻き込まれる必要ないんじゃないかと言われました。 でも、そりが合わないとはいえ、母子家庭で育ててくれた母に感謝してますし、母は大事なので、相談されたら動かざるをえません。 一体どうしたらいいのか、何かアドバイスをいただければと思います。

1問目に答えた人で2問目に答えた人は何人いたか・・・ 2問目で初めて答えた人は何人いたか・・・・というのを計算させたいです。 たとえば(1)のデータがあった時に、(2)のデータのように変換したいとしたらどのようなVBAマクロにすればよいのでしょうか。 (1) 質問No,回答者, 1,AAAAA 1,BBBBB 1,CCCCC 1,AAAAA 2,AAAAA 2,BBBBB 3,AAAAA 3,DDDDD (2) 1 2 3 ←回答回数 1問目 3 2 1 2問目 0 0 3問目 1 上の結果ですが、 1問目で1回目に答えたのはAAAAA,BBBBB,CCCCCの3人、 1問目に答えて2問目に答えたのは、AAAAA,BBBBBの2人、 そのまま2問目に答えた人で3問目にも答えたのはAAAAAの1人、 2問目で初めて答えた人、その中で2問答えたのは0人 3問目で初めて答えた人は、DDDDDの１人 のような表を意味しています。 データは２万行ほどあるので、VBAで処理しなければならないと考えています。 ほかにも何か方法があれば教えていただけると助かります。 どうぞよろしくお願いします。

エクセルのVBAについて。 指定した範囲の中から検索条件に一致したデータを検索し、取り出してくれる関数vlookup をVBAで実現したいのですが、 目標として、エクセルのセル（列）に、値を入力されているとします。 VBAを実行するボタンをクリックすると、、、 その値に対応する文字列（事前に用意）をその値の右のセルに自動で入力させたいです。 このVBAを作ることが目標です。 vbaでvlookupを実現でなくても、それよりも簡単な方法があれば教えていただきたいです。 お手数ですが、よろしくお願いします。

旦那のモラハラに耐えられず離婚しました。 親権は私にあります。 旦那には子供が1歳になるまで週1の面会を 約束させられました。養育費は無しです。 旦那の元に入った児童手当も渡そうとしません。 先日面会の日になり、会いに行きました。 途中からモラハラ発言&態度になり怖くなって もう帰ろうと言ったのですが そこから説教？&脅迫を何時間も受けました。 復縁を迫られ断ると私を売り飛ばすと言われました。本当に殺されると思いました。結局家に着いたのは日付が変わってからです。 次また会えば本当に何をされるか分かりません。 私ももう二度と会いたくないし、 子供とも会わせたくありません。 このような場合どうすればいいのでしょうか。 連絡先を変えても 家に来たらとか考えてしまい、怯えています。

物理実験で、RLC直列回路のアドミタンスの周波数特性をグラフにしました。 すると、入力波形が方形波、のこぎり波のとき、このグラフに共振周波数とは別に副ピークが現れました。この理由を考えているのですが、よく分かりません。 テキストには『入力波形をフーリエ成分に分け、含まれる周波数成分、大きさを考えよ』と、ありました。そして、色々調べているうちに遮断周波数というキーワードにたどり着きました。 フーリエ展開の意味や共振周波数の意味などは分かっているつもりなのですが、この遮断周波数というものがどういうもので、何故これがあると副ピークが生じるのかさっぱり分かりません。 どなたか教えてください(> <)

一緒に仕事をしている男性についてです。 そのかたは普段気さくで、誰にでもそつなく話すかたで話しやすい人なのですが、たまに私と話しているとき ～が～で、○※△‥となったり、「え…と…あ…」みたいに真顔で固まるときがあります(向こうからの話で、それまでは普通に会話できています) 話したがりでも恥ずかしがり、みたいな性格なのか、何かあるのか気になります。自分から話していくような明るいタイプの人なので、不思議に感じています。 少ない情報ですが、回答お願いします。

ノーベル物理学賞を受賞した中村修二氏が日亜化学工業と仲直りしたいと希望したのに、 日亜化学工業の側が中村修二氏との面会を断ったのはなぜでしょうか。

エクセル マクロについて質問です。 現在，以下のような記述をエクセル上のボタンに登録しています。 ボタンを押すと，デスクトップ上の任意のCSVファイルの選択を行い，CSVファイルを選択し，そのCSVデータを全てエクセル上のデータとして落としさせたいと思っています。 しかし，csvファイルによっては， 「実行時エラー　 アプリケーション定義またはオブジェクト定義のエラーです。」と出て， 「デバック（D）」ボタンを押すと，下から４行目の 「Cells(i, j) = strCell」のところが，黄色くエラーとして表示されてしまいます。 下記の記述もネット上で皆さんに教えていただきながらなんとかやっているもので，正直自分自身でよく理解できていませんが，上記のようなエラーを回避する方法をどなたかご教示いただけないかと思います。 どうかよろしくお願いいたします。 Sub Macro5() Dim varFileName As Variant Dim intFree As Integer Dim strRec As String Dim strSplit() As String Dim i As Long, j As Long, k As Long Dim lngQuate As Long Dim strCell As String varFileName = Application.GetOpenFilename(FileFilter:="CSVファイル(*.csv),*.csv", _ Title:="CSVファイルの選択") If varFileName = False Then Exit Sub End If intFree = FreeFile '空番号を取得 Open varFileName For Input As #intFree 'CSVファィルをオープン i = 0 Do Until EOF(intFree) Line Input #intFree, strRec '1行読み込み i = i + 1 j = 0 lngQuate = 0 strCell = "" For k = 1 To Len(strRec) Select Case Mid(strRec, k, 1) Case "," '「"」が偶数なら区切り、奇数ならただの文字 If lngQuate Mod 2 = 0 Then Call PutCell(i, j, strCell, lngQuate) Else strCell = strCell & Mid(strRec, k, 1) End If Case """" '「"」のカウントをとる lngQuate = lngQuate + 1 strCell = strCell & Mid(strRec, k, 1) Case Else strCell = strCell & Mid(strRec, k, 1) End Select Next '最終列の処理 Call PutCell(i, j, strCell, lngQuate) Loop Close #intFree End Sub Sub PutCell(ByRef i As Long, ByRef j As Long, ByRef strCell As String, ByRef lngQuate As Long) j = j + 1 '「""」を「"」で置換 strCell = Replace(strCell, """""", """") '前後の「"」を削除 If Left(strCell, 1) = """" And Right(strCell, 1) = """" Then strCell = Mid(strCell, 2, Len(strCell) - 2) End If Cells(i, j) = strCell strCell = "" lngQuate = 0 End Sub

８ヶ月前に犯罪に巻き込まれた記憶が沸々と、日に日に強くなってきて精神的にとても辛いです。 特にまともな人と接している時に「もうこの人みたいに健全な生き方は出来ないのか」と思ったり 「どうしてあの時、犯人に服従してしまったのか」等 考えると本当に当時の自分も嫌になり、死にたくなります。 今まではそこまで重大に捉えていなかった（心のどこかでシャットアウトしていた）のですが 半年以上して、前向きに色々とやり出した最中、急激にトラウマの様になってきました。 毎日毎日、朝から寝るまで考えてしまい本当に辛いです。 一日のなかで死にたいと思う時間が長くなっていきます。 それは絶対してはいけないとわかっています。 悩みの要因である諸々は、解決は望めません。 自分の気持ちが楽になるようにするには、どうしたらいいですか？ 自殺願望だけは消したいです。メンタルヘルスを受診して良くなっていきますか？