hallo-2007 の回答履歴

Excel初心者です。教えてください。 アンケートの集計をしているのですが、 単票形式の入力用シートに入っているデータを、隣のシートに転記していきたいと思っています。 入力シートには会社名と担当者、多数の設問があり、その回答は全てチェックボックス形式です。(非表示のセルにチェックボックスのチェック有り無しをリンクさせています) 隣のシートには既に会社名などの一覧があり、そこの社名が一致する行にそのチェックの有り無しの値を転記用ボタンで転記したいと思っています。 ●入力シート A株式会社 担当：佐藤 設問1・・・ チェックあり 設問2・・・ チェックなし 設問3・・・ チェックあり ・ ・ ・ ●転記先シート 社名 設問1 設問2 設問3 A株式会社 TRUE FALSE TRUE B株式会社 C株式会社 マクロでどのようにしたらよいでしょうか。 すみませんが教えてください<(_ _)> よろしくお願いいたします。

マクロで以下のような操作をしたいと思っております。 どのようなコードを書けばよろしいでしょうか。ご教授ください。 【顧客データ一覧.xls】というブックのシート１に顧客データ一覧表があります。 同ブックのシート１上部にコマンドボタンを作成し、ボタン押下で以下のような操作を行いたい １.ファイルダイアログを開いて、【顧客データひとり分.xls】というブックを選択 ２．【顧客データひとり分.xls】に入力されているデータを、【顧客データ一覧.xls】の顧客データ一覧表の末尾に、コピーして追加・上書保存 顧客データひとり分はセル（3,4)に年齢が入力されている等、入力箇所は固定です。 ３.顧客データひとり分.xlsは閉じて、更新された顧客データ一覧.xlsを表示させる よろしくお願いいたします。マクロは作成したことがありますが、何年もブランクがあり、かなり忘れてしまいました・・・。 と、エクセル2003以来久しぶりに操作ですので、エクセルそのものに大変戸惑っております。。。実力不足でお恥ずかしいのですが、お力をお借りできれば幸いです。

2045年問題というのが話題になっていますね。 2045年ごろになると人工知能が人間の知能を上回るという話です。 先日、ホーキング博士が、「人工知能の発達による人類の終わりの可能性」について言及していました。 　↓ http://headlines.yahoo.co.jp/hl?a=20141203-00000035-jij_afp-sctch ホーキング博士の言うように、人類は人工知能の自発的な発達について行けなくなるのでしょうか。 人工知能は自分たちより知能の低い人類の生存を許すでしょうか。

よろしくお願いいたします。 工程表を作りたいという前提で、線を引きたいのですが。 開始日と終了日の差を数値としてとらえることができると思うのですが、 その数値をもとに「何cm」という線を引くにはどうしたらよいでしょうか。 excel2010を使用いたします。 簡単な方法がよいですが、結果としてその集合体を作りたいわけで、 マクロを使う、関数を使う、VBAを使う、など方法は問いません。 また、Accssessや別のソフトを使用しての方法でも問題ございません。 よろしくお願いいたします。 どうぞよろしくお願いいたします。

「失敗を恐れずにやれ。」 この発言の中身って 「失敗しても咎めたりせずに失敗の責任は会社が持つから、積極的なことをやれ。」 ではなく 「失敗したら厳罰だし責任は取ってもらうけど、従来よりも成果を出せよ。」 ってことでしょ？ これなら挑戦とかしないで言われたことやってる方が得だよね？ 「私は失敗したくないので挑戦はしません。しかし命じられたことを完璧にします、そうすれば挑戦などしなくても他の失敗した人よりは評価は必ずされます。」 こっちのが絶対いいじゃん。でもこれだと積極性がないとか文句言われるよね？ 失敗を許す土壌がないのに挑戦しろと言う方がおかしいと思うのですが

VBA初心者です。皆様よろしくお願いいたします。 質問内容は、例えばsheet1に私が作ったFAXのsheetがあり、住所や 名前、電話番号、重複しないデータ等を指定したセルに出してFAX用紙の フォーマットを崩さないように印刷することです。 ユーザーフォームで、sheet1(私が作成したFAX用紙)に印刷ボタンを設置し、クリックすると 重複しないデータ(基礎となるデータがsheet2にはっております)データ記入欄の 表示がされ、基礎となるデータを管理Noだとすると、 印刷ボタンをクリック ↓ 上下にテキストボックスが2つ表示さる(000001)から(000006)管理Noです。 ※ただし、上のテキストボックスだけ入力しても印刷を可にしてほしいです。 ↓ テキストボックスに管理ナンバーを入力(管理NOは、連続した値とします) ↓ 発行部数の入力画面 ↓ 印刷される感じです。 発行部数が1部でしたら、管理No.0000001から000006までの間を各一部印刷です。 sheet2は、縦列は10行分A～J行 横の値は、複数行はいります。ここでは、横10行分とさせてください。 sheet2の値は、Aから、管理No（重複しない基礎のデータ)、名前、電話番号、FAX番号 住所、会社名、部署名、担当者、日付、担当営業とします。 縦の列は、上記のデータが入っているものとします。 sheet1に戻り例えば、管理NoをA3,名前をB5,電話番号をC6,FAX番号をD6 住所をD3,会社名はD4,部署名をD5、担当者がB5,日付がA6,担当営業がB5に いれるような事ができたらと思い質問させていただきました。 皆様、何卒ご教授お願いいたします。

今度の総選挙、民主主義の原点である、選挙権は、ぜひ行使したいし、今まで、選挙を棄権した事がありません。 そして、毎回、候補者の主張を自分なりに、解釈して、自分がふさわしいと思う候補者に投票しています。 でも・・・・、実際には、ほぼ、毎回、公約を裏切られている印象を受けています。 最近では、高速道路の無料化すると主張していた。民主党に裏切られ、アベノミクスで、景気が良くなると約束してくれた、自民党に裏切られ・・・。 第三極と言われた政党も、分裂や消滅、頼りない印象もあり、共産党はイメージ的に、受け付けない。 何より、お目当ての候補者がいたとしても、我が選挙区で立候補してなければ、投票出来ない。 正直、八方塞がりの袋小路に陥ってます。 投票したいけど、投票する候補者が存在しない。どうすれば良いのでしょうか？

仕事でなりゆきでマクロを使用したいのですが、どなたかマクロを作っていただけませんか？ 【内容】 下記のような管理ファイルがあります。 管理ファイルの各項目に背景色を染めて違う別の一覧ファイルに染めた管理ファイルの項目を 抽出したいというものです。 ・管理ファイルは、列見出は、01～10までありそれぞれ下に「歳(1)(2)」「視角(1)(2)」「寿命(1)(2)(3)」「顕」という項目があります。 ・行見出は、A1～A7、B1～B7がJまであります。 ・抽出する見出は、全部ではなく、歳(1)(2)と視角(2)と顕のみです。 ・基本、管理ファイルは、色を手作業で染めるだけで文字は、入りません。 ・管理ファイルに今回だけ手入力で染めたモノだけを抽出したいので管理ファイルの空いてる箇所にマクロボタンを作成して、色を染める→ボタンを押す→一覧に反映みたいな形にしたいです。 ・一覧ファイルは、別のexcelファイルで各シート名が歳一覧、視角一覧、顕一覧になっていて、各項目の箇所にデータを抽出したいです。 ・一覧ファイルは、すべて同じ作りでアドレスの項目の所にデータを抽出したいです。 画像のアドレスは、H3、I3ですが、実際会社のファイルは、H6、I6からです。 わかりにくいかもですが、よろしくお願いします。

新築の間取りを考えている最中ですが、○の部分のが×の部分の影になってしまい、日当たりが悪くなってしまわないか心配しています(>_<) ちなみに、総二階です。 5200と11000の方には家が建っていますが、それ以外は道路に面しています。 画像の取り込み方がわからず手書きで見苦しいかもしれません。申し訳ないです(;_;) アドバイス頂けると助かります!!よろしくお願いいたします(>_<)

大阪で３歳の娘に食事を与えず虐待し衰弱死させた母親と継父が逮捕されたニュースの直後に、同程度の年齢の女児の脳死判定で心臓・肺・肝臓・腎臓…の移植提供をさせた両親のニュースを取り上げ、それを比較的に、コンナ立派なご両親もおられる的なコメント報道するキャスター、これには多いに違和感を覚えましたので、質問させていただいた次第です。 脳死とされた女児、心臓は脈打っていて、目は覚まさないけど、息をして横たわって寝ているような、この自分の子＝娘の息の根を無理やり遮断し、心臓を止めて、本当に殺した上で、体を切って内蔵を取り出して運ぶ、こんなことをする親、母親や父親やら、何で大阪の虐待衰弱死事件と比較して報道するのでしょうか？しかも臓器移植した両親の方は対比させた上での美談的な取り扱い方ミエミエ…！ これら両親、どっちも子殺しで、核心のところはどちらも全く似たような性根で、どちらも本音・本心のところはこの子に対する愛情が無かった又は希薄だった、ということでしょ、そして、片や悪人で片や善人…？！、ヤッパリすんなりと理解できません、ので教えてください。

エクセルで２つの在庫表を照合する方法について教えてください。 過去の質問もいろいろ参照したのですが、エクセル関数の理解度がSUMだけの私にとって、似たような内容ではどうも応用が利かずかなり苦戦しております。 エクセルの内容は A列　アイテムNO B列　商品名 C列　規格名 D列　当月末在庫数 E列　定価 という内容で（計500アイテム程度）毎週在庫表が届くのですが、これを前回の在庫表と照合しようとしています（現在は手作業です。。）。 アイテムNoはよく増減があります。 知りたいのは、在庫数の増減で、 １．今回新たに在庫が2以下になったもの　 ２．前回は在庫が2以下だったが、今回2以上になったもの ３．新たに追加されたもの なのですが、どのようにすれば簡単に照合できるのでしょうか？ エクセルお詳しい方どうぞ教えてください！

20代前半女性です。会社ではPhotoshopを使う仕事をしています。仕事はとなりに座っている先輩に教わることがほとんどなのですが、 言われたことをすぐに忘れてしまいます。 また、説明が理解できなかったり、分かったと思っても実は勘違いだったということもあります。 ミスを防ぐために言われたことを復唱しながらメモをし、これはこうだからこうするんですね？と確認しています。パソコン作業の一部を見せて確認することもあります。 同期(同い年)がやってますが、説明を聞いて「はい…はい…わかりました。」では駄目なのです。脳がフリーズして頭に残らないのです。よそ事考えているわけではなく、むしろ ちゃんと聞こうとしているのに、です。 どんな単純仕事であっても上記の対策をしないと、不安です。それを分かってか、 昨日は先輩が何をどうやるかメモを書いてくれました。 (昼休みは交代制で、後半の1時間に先輩がいなくなる時) 情けなく、申し訳ない気持ちになりました。 それなのにどうでもいいこと、例えば昼休みにしたたわいもない会話内容や、 自分への悪口だと忘れないのです。 自分は頭がおかしいのでは…と思っていたところ、若年性健忘症というのを 知りました。自己診断を見てみると、10個あてはまりました。 これだと病院で診てもらった方がいいのでしょうか？ 今は脳のトレーニングになるようなこと(日常生活に変化をつけるなど)を実践していますが…。 長文で申し訳ありません。

Sub 転記_Click() Dim wst1 As Worksheet Dim wst2 As Worksheet Set wst1 = ThisWorkbook.Worksheets("Sheet1") Set wst2 = ThisWorkbook.Worksheets("Sheet2") For i = 10 To 12 If wst1.Range("A" & i) <> "" And Not IsNull(wst1.Range("A" & i)) Then myRow = wst2.Cells(Rows.Count, 1).End(xlUp).Row + 1 wst2.Range("A" & myRow) = wst1.Range("D4") wst2.Range("B" & myRow) = wst1.Range("A4") wst2.Range("C" & myRow) = wst1.Range("A" & i) wst2.Range("D" & myRow) = wst1.Range("B" & i) wst2.Range("E" & myRow) = wst1.Range("C" & i) wst2.Range("F" & myRow) = wst1.Range("D" & i) End If Next i wst1.Range("A4").ClearContents wst1.Range("A10:C12").ClearContents End Sub こんにちは、はじめまして！よろしくお願いします！！ 今回イベントの係になりました、複数人の回答を集計するのに上のを 作って頂きシュミレーションも上手くいったのですが… この集計とは別にA6の項目も準備の為に必要だと個人的に思い 昨日一晩色々と試したのですが、上手くいきません。 メモ的なものですので、同じSheet2（転記データの横）の　G　H　I　とかに　 D4　A５　A6と3箇所 上から順番に"一行だけ"入るようには出来ないでしょうか。 もしくは、シートを増やして新Sheet3のA　B　C に D4　A５　A6 と上から順番に転記され入る様にしたいです。（一行だけ） （※自分でやると Ｇ　H　I に3行も同じものが転記されてしまいます、上3行空いて4行目から、入ったりします） クラブ活動の合間とかに各々に回答してもらう予定です。 ボタンを押すと転記されその後クリアで空欄にし次の人…なる設定にします、 1回のボタンで出来ますでしょうか（上のものに組み込んだり出来るでしょうか） お詳しい先生方どうぞよろしくお願いします。

初心者ですみません。 excelを使って、毎日の売上表を日にちごとにブックを作成しています。 また、月まとめの売上一覧表をも作成しております。 毎日の売上表の特定のデータのみを抽出して自動的に月まとめの売上表に書き込む やり方を教えてください。 毎日の売上表では 収入****円 社保****円 国保****円 月まとめの入金票 1日収入****円　社保****円　国保****円 2日収入****円　社保****円　国保****円 3日収入****円　社保****円　国保****円 4日収入****円　社保****円　国保****円 5日収入****円　社保****円　国保****円 毎日の 収入****円 社保****円 国保****円 を月まとめの入金票にデータを自動書き込みたいのです。 どうかご教示よろしくお願い申し上げます。

あるソフトウェアメーカーに勤めている入社２年半の営業マンです。悩みがあり、相談に乗ってくださると幸いです。 数ヶ月前、私は自分の所属する営業部の不正を転職サイトに書き込みました。不正というのは営業マンによる架空発注や、納期が数年間先の発注をノルマに計上するという行為でした。毎月少なくない営業マンがそういうやり方でノルマを達成していて、部の責任者たちも数字が必要なためそれを利用していました。私はそうした状況や体質が許せず、周囲にも平素から訴えていたのですが、ついに数ヶ月前、ネットに告発的な内容を書き込んでしまいました。すぐに書き込みは発覚し、他部署や本社でも大多数の社員がそれを読んだようでした。 悩みというのは果たして自分の行動が正しかったのか、ということです。書き込んだ当時の自分の考えは、「売上が落ち、顧客も減少している中、不正をしていてはいつまでも前進していけない。誰も声をあげないなら自分があげる」というものでした。結果的に支社の営業所長が代わり、不正は現在管理禁止されています。 しかし、今は、果たして自分のやったことが正しかったのかと疑問に思っています。役員を見ていると、私が思うとおりには会社は変わっていかないだろうと今さら気づいている自分がいます。ネット書き込みでの告発という行為は非常識ですし、所属する組織の論理には逆らうものだと思います。自分に余裕がなく冷静さを欠いていた時期でもありました。まだまだ周囲に助けられながら仕事をしている自分でもあります。 特に声もあげず、穏当にやり過ごしながら早めに転職することが正解だったんじゃないか、今は半ばそう思っています。 不正をやらされたある若手の先輩はお酒を飲めば文句を言ってました。けれど、上司や会社に意見することはありませんでした。そ知らぬ顔で不正を続ける先輩たち、見てみぬふりをする先輩、自分の仕事で手一杯なベテラン。全部が許せず、今も当時に戻ったのなら自分は耐えられるだろうかと思います。 私のやったことは間違いだったんでしょうか。正しかったのでしょうか。社会人や人生の先輩方のお考えが聞きたいです。よろしくお願いします。

Book1で入力データ作成し、保存次第、添付画像の黄色部分に、自動転記する様マクロを組みたいと考えています。 現在、勉強中で、簡単な下記の様なマクロはできました。 これを応用して実践してみたいのですが、何を加えればよいのか、アドバイス頂けたら幸いです。 --------- Sub Macro1() ' ' Macro1 Macro ' ' a = ActiveCell.Value Range("A2").Select ChDir "C:\Users\takana\Desktop" Workbooks.Open Filename:="C:\Users\takana\Desktop\転記.xlsx" Sheets("Sheet2").Select ActiveCell.FormulaR1C1 = "" Range("B2").Select ActiveCell.FormulaR1C1 = a Range("B3").Select End Sub -----------

社員研修を企画しいてます。 勤務時間内（給料が出る）という事で計画していますが、業務に直結している （あるいは、ある程度間接的にでも関係がある）場合には認められて、単純な 自己啓発の場合は認められないという考え方は一般的と、とらえるべきなんで しょうか。 たとえば、業務上パソコンにほとんど触れる機会が無いだろう社員に対して、 Microsoft Officeについての講習を受けさせるという事は無駄ととらえるべき なんでしょうか。 おのおのの企業の考え方という事は分かりますが、一般的には（何を一般的と とらえるかという事は考えずに）許す、許さない、どちらの考えになるので しょうか。

地球上に生息する生物の頂点にたつ生き物はなんでしょうか。 人間か、それとも他の生き物でしょうか 仮に人間だとしたら、人間が頂点に立ったのはいつごろのことだと思いますか？

従業員４０人ほどの（運送業）を親が営んでいます 親は半引退状態で実質経営は私がほとんど行っています 人材不足/運賃の値下げ/顧客からのサービス向上要求など毎日が悩みの連続です 携帯を風呂場の脱衣所やトイレにも持ち込み、２４時間いつでも鳴れば必ず電話を取ります 人材不足に苦しみ友人を会社に迎え入れました（今までの友人関係ではなくなると承知で） 全て家族を養う為だけに耐えています 妻や子供に苦労をわかって貰おうとは思いません 実際わかっておらず、逆に小さな悩みをいくつも打ち明けられます 私が死んでも保険金で不自由のない生活はできるようにしています 趣味/家族/友人を捨て、会社に入ってから会社の為だけを思い行動してきました 仕事上で憎まれる立場に立ち、かげ口を叩かれても恨まれても、それで会社が良くなるなら と思い入社以降、働いてきました 家族は感謝してくれるでしょうが私は私が生きている意味を見出せません 勤務中は従業員や顧客と何食わぬ顔で会話し厳しい話や馬鹿話をしますが もう心から笑う事はできません 心を通じあえる相手もいません 作りたいですが作り方もわかりません 今更、どうやって友達を作ればよいかもわかりまん 仕事を優先しなければならなくなれば、もう少しで友達になれる場面が作れても 簡単にあきらめると思います この人生は何の意味があるのか私自身ではわかりません 人生相談を閲覧していると何かを成し遂げ様としてるとかよく見ますが 私は理解できません

職場の事務所で二人きりになりたくないという女性はどういう女性ですか？私は一人事務員です。複数人がいる時はいるのですが、その人達が事務所から出ていくと、一人二人と皆出ていきます。ある男性は夜番のシフトに入っている日には、まだ定時になっていないのに、上がって良いよと言われます。あとバレンタインの日に何を勘違いしているのか？やけに早く上がって良いと言われました。誰もおまえにチョコなんか上げないよと思いました。 私の性格は皆が雑談していても、中には入れずに黙々と仕事しています。だからか？おしゃべり好きの男性達は息が詰まるのかな？と思いました。皆ほとんど既婚者の男性です。私は独身です。今は30代ですが、20代の時はこれでもいじられるキャラでした。 やはり暗くて無口な女性とは二人きりの空間にいたくないですか？