rukuku の回答履歴
- エクセルのマクロを組めば可能でしょうか?
エクセルは普通に使えますが、マクロは組めません。 前の職場で、マクロを組める人が何人かいたため、組んでほしいときにはお願いができたり、 「こんなことがしたいけどできる?」といって相談にのってもらえたのが、 現職場では誰もマクロを組めず、もし、今、やろうとしていることが、マクロで可能なら自分で覚えようかと思っています。 以下のことがマクロで可能かどうか教えてください。 一品ずつエクセルファイルで作った書面があり、旧フォームと新フォーム混在していて、 旧フォームを新フォームに移行する作業を行おうとしています。 手作業では一旦そのファイルを開いて、フォームが古いかどうかを確認し、 古ければ新しいフォームに書き換える必要があります。 この作業が約500ファイルあり、大変な作業となっています。 また、手作業で実施するため間違いも発生しやすいです。 上記の作業をマクロで自動化できるでしょうか? また、できるとしたら、全くマクロを組んだことが無い人が 今から覚えて完成させるには難易度はいかほどでしょうか?
- 破れた電気コードに水がかかるとショートする?
あるミステリー映画で、猫が電灯(デスクスタンド)の電気コードをかじり、そこに花瓶の水がこぼれて回路がショートし、停電になるというものがありました。 これで実際にショートしますか? するとすればどういう理由でしょうか?水が電流を大量に流してしまうのでしょうか。ちょっと水がかかっただけでもそうなりますか? よろしくお願いします。
- ベストアンサー
- 科学
- yoshinobu_09
- 回答数6
- vba 順次記録
下記のマクロはツール、マクロ、新しいマクロの記録で作成しました。 順序はa1に ”=RSS|'3315.T'!現在値” 最初から入力しておきます。 1回目a1に楽天のマーケットスピード (MS) より数字が入力されます a1に入力したすうじをa5とa6にコピーします。 2回目 MS より次の入力が入ります。 a1に入力したすうじをa5にコピーします。 a5,a6 を a6,a7 にコピーします。 3回目 MS より次の入力が入ります。 a1に入力したすうじをa5にコピーします。 a5,a6,a7 を a6,a7,a8 にコピーします。 4回目 MS より次の入力が入ります。 a1に入力したすうじをa5にコピーします。 a5,a6,a7,a8 を a6,a7,a8,a9 にコピーします。 n回目 MS より次の入力が入ります。 a1に入力したすうじをa5にコピーします。 a5,a6,a7,a8,-----a? を a6,a7,a8,a9,-----a? にコピーします。 以後入力有り次第 繰り返し続けて記録したいのです。 下記のマクロはa列に記録ですがb、c、d、と4箇所形式は同じですがデータの違いのが有るのですが a,b,c,d,列入力順序がばらばらなのです a列のみでもお願いします。 Sub M3() Range("A1").Select Selection.Copy Range("A5").Select ActiveSheet.Paste Application.CutCopyMode = False Selection.Copy Range("A5:A6").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A5").Select Range("A1").Select Selection.Copy Range("A5").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A5:A6").Select Selection.Copy Range("A6").Select ActiveSheet.Paste Range("A1").Select Selection.Copy Range("A5").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A5:A7").Select Selection.Copy Range("A6").Select ActiveSheet.Paste Range("A5").Select Range("A1").Select Selection.Copy Range("A5").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A5:A8").Select Selection.Copy Range("A6").Select ActiveSheet.Paste Range("A5").Select Range("A1").Select Selection.Copy Range("A5").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A5:A9").Select Selection.Copy Range("A6").Select ActiveSheet.Paste Range("A5").Select Range("A1").Select Selection.Copy Range("A5").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A5:A10").Select Selection.Copy Range("A6").Select ActiveSheet.Paste Range("A5").Select End Sub
- 某サイト(英語)の登録方法が分かりません。
あるサイトに登録しようとしたのですが住所?の書き方が分からず、入力して申請してもエラーになります。 どのように入力すればいいのか分かる方いればご教授お願いします。 Address Line 1*: ---------- [Street address, P.O. box, company name, c/o ] Address Line 2 --------- [Apartment, suite, unit, building, floor, etc. ] City*: --------- State, Province or Region*: -------------- ZIP or Postal Code*: --------------- Country*:------------- * required fields という入力フォームです。
- ベストアンサー
- その他(インターネット・Webサービス)
- SoRa1547
- 回答数2
- 緊張すると心臓がバクバク、動悸が。。。
どうもこんにちは。30代会社員です。 通常仕事時には起こらないのですが、教えてください。 朝礼で数十名の前で企業理念を1ページ交替で朗読するのですが 緊張し心臓がバクバクし、声が震え、正常に読めなくなります。 (支店長や上司がおり、聞いていると思うと心臓がバクバクします) 1回目は「緊張していたからかもしれない」と思っていましたが 先日、2回目も同じような症状になりました。 それを嫁に伝えると、心療内科へ行ってみるといいよ。とのこと。 週末のため、病院へ行けず、ちょっと待ちの状態になります。 そこでお聞きしたいのですが、この症状はやはり病気ですか? 昔から上司、先輩から怒られると萎縮している状況が多く 続きました。これらも影響しているかもしれません。 改善する方法はありますでしょうか。 ちょっと今後もそうなると困るので治したいと思っています。
- ベストアンサー
- 心の病気・メンタルヘルス
- mido00202
- 回答数6
- ワード2007 用紙サイズの登録
ワード2007にて用紙サイズの設定をし、登録をしてプルダウンに表示される方法を教えてください。 時々、自分で設定した決まったサイズを使用します。 基本は起動時A4です。 ”規定値に登録”では、毎回そのサイズになってしまいます。 どうやって登録したらいいですか。 宜しくお願いします。
- エクセルで検索範囲より特定文字に対応するセルの値を求めたい。
教えてください。 A1~D4に,下記のようにDATAがある場合、 セルA7に ”A1”と入力すると セルB7に ”部品A”と表示させたい。 セルA8に ”D3”と入力すると セルB8に ”部品C”と表示させたい。 どのような関数で求められるでしょうか。 A B C D 1 使用部品 番号1 番号2 番号3 2 部品A A1 B1 3 部品B A2 A3 B5 4 部品C D1 D3 A4 5 部品D C2 C3 6 7 A1 部品A 8 D3 部品C 9 C3 部品D 10A4 部品C
- EXCELVBAで同じフォームボタンで表示のON/OFFをする。
EXCELVBA初心者です。 図形描写の”表示”、”非表示”はできたのですが 同じボタンをクリックしてON/OFFする方法を教えてください。 ボタンが2個だといまいちなので、よろしくお願いします。 Sub 図形_del() ActiveSheet.Shapes("daily7").Visible = False End Sub Sub 図形_add() ActiveSheet.Shapes("daily7").Visible = True End Sub
- ExcelでSheet1/2を作成・・・
S1に請求書、S2に顧客情報を 初めて質問を投稿いたします。 ExcelでSheet1・Sheet2があります。 Sheet2には顧客情報があります。 A列 B列 C列 D列 会社名 郵便番号 住所 電話番号 a xxx-xxxx a1xxxxx xxx-xxxx b xxx-xxxx b1xxxxx xxx-xxxx c xxx-xxxx c1xxxxx xxx-xxxx c xxx-xxxx c2xxxxx xxx-xxxx c xxx-xxxx c3xxxxx xxx-xxxx とあるとします。 そこで請求書をSheet1を作成してあり、会社名をリストで選択するようにしてあります。会社名を選択するとSheet1上にある、住所が自動的に入力されるようにしてあります。 質問は、会社Cには複数住所があります。そこで、会社Cを選んだときだけ、住所欄にプルダウンで住所を選べるようにしたいのですが、可能でしょうか?
- VBA 並び替え
たびたびお世話になります 選択範囲の並べ替えを行いたく こちらで教わった方法で セル位置の取得を行い Set r = Columns("A").Find("b1", lookat:=xlWhole, After:=Range("A" & Rows.Count)) Set rr = Columns("A").Find("bm123-1", After:=r, Searchdirection:=2) その取得した位置を元に並べ替えを行いたい 範囲選択をしています Range(r, rr.Offset(, 14)).Select その後並び替えを実施したいのですが Selection.Sort Key1:=Range(r.Offset(, 14)) この様にしてみましたが 実行時エラー1004が返されてしまいます どのようにすれば 並び替えができるのでしょうか よろしくお願いします
- VBA 並び替え
たびたびお世話になります 選択範囲の並べ替えを行いたく こちらで教わった方法で セル位置の取得を行い Set r = Columns(\"A\").Find(\"b1\", lookat:=xlWhole, After:=Range(\"A\" & Rows.Count)) Set rr = Columns(\"A\").Find(\"bm123-1\", After:=r, Searchdirection:=2) その取得した位置を元に並べ替えを行いたい 範囲選択をしています Range(r, rr.Offset(, 14)).Select その後並び替えを実施したいのですが Selection.Sort Key1:=Range(r.Offset(, 14)) この様にしてみましたが 実行時エラー1004が返されてしまいます どのようにすれば 並び替えができるのでしょうか よろしくお願いします
- VBAでの範囲選択 並び替え
いつもお世話になっています。 早速ですが A B 1 a1 10 2 a1 11 3 a1 12 4 b1 15 5 b1 13 6 b1 11 7 c1 80 とある場合 Cells.Find("b1") で始まりを見つけることは出来ると思うのですが b1の終わり(これではA6)を どうすれば取得できるのでしょうか? end(xlUp)では A列の最終行になりますし・・・・ 選択後B列を並び替えを実施したいのです またc1も同じように処理したいのですが・・・・ よろしくお願いします
- エクセルのマクロを組めば可能でしょうか?
エクセルは普通に使えますが、マクロは組めません。 前の職場で、マクロを組める人が何人かいたため、組んでほしいときにはお願いができたり、 「こんなことがしたいけどできる?」といって相談にのってもらえたのが、 現職場では誰もマクロを組めず、もし、今、やろうとしていることが、マクロで可能なら自分で覚えようかと思っています。 以下のことがマクロで可能かどうか教えてください。 一品ずつエクセルファイルで作った書面があり、旧フォームと新フォーム混在していて、 旧フォームを新フォームに移行する作業を行おうとしています。 手作業では一旦そのファイルを開いて、フォームが古いかどうかを確認し、 古ければ新しいフォームに書き換える必要があります。 この作業が約500ファイルあり、大変な作業となっています。 また、手作業で実施するため間違いも発生しやすいです。 上記の作業をマクロで自動化できるでしょうか? また、できるとしたら、全くマクロを組んだことが無い人が 今から覚えて完成させるには難易度はいかほどでしょうか?
- ナットとねじ山の関係
橋梁に照明柱を取付ける工事を担当しています。コンクリートの橋梁の躯体にアンカーボルトが別の業者によって埋めこまれているのですが、施工の管理が悪く十分な長さがありません。ナットの組み合わせは1種×2、ばね座金、丸座金を基本としていますが、長さの足りない部分は3種×1、ばね座金、丸座金としても、ナットの上に出るねじ山に余裕がありません。そこで、このねじ山の余裕という問題ですが、3山以上出るのが正しいということになっていると思います。この根拠について知りたいのです。ただの見栄えだという人もいますが、ねじ山に余裕があって初めて設計強度が得られるのだという人もいます。本当のところは何なのでしょうか。役人相手に話をするので、系統的に説明しているサイトなどを教えていただけると助かります。また、ナットには1種から3種まで厚みに種類がありますが、強度の違いはどうなっているのか、これも知りたいです。よろしくお願いします。
- EXCEL2007 顧客名簿を作っているのですが
表題ソフトにて顧客名簿を作りたいのですが、どのような関数を使えばやりたいことが実現できるのか、どうかお教えくださいませ! やりたい事というのは、一番前のシートのリストに顧客名と担当者名ををどんどん入れていくと、担当者別にしたそれぞれのシートのリストに顧客名が入っていくというようにしたいのですが、方法が分からず困っています。 お手数ですが、どうかお教えください。
- 成績管理(個人カルテ)をエクセルで
学校に勤務しています。 タイトルは成績管理となっていますが、テストの結果等の数字の処理はなんとかできています。 ところが、個人懇談などに使う資料づくりをエクセルでしたいのです。 まず、クラスの名簿があります。 出席番号順に縦に名前が並びます。 横には項目が並びます。 たとえば、担当している係、また所属するクラブ活動などです。 こういう一覧は、普通に作成していますが、それをそのまま懇談などで使うと、本人の情報ばかりでなく、クラスの他の生徒の情報も見えてしまいます。 そこで、シートの2枚目以降を個人データのカルテのようにつくりたいのです。シートの2枚目は出席番号1番、3枚目は出席番号2番・・というように。 当然、一枚目の情報が2枚目以降に反映される必要があります。 私の頼りない知識では、セルに=を入力して、1枚目の必要なセルを指定すれば、反映させることはできます。しかし、それではひとつひとつすべて入力しないといけません。クラス30人分のシートをつくるだけでかなり時間がかかります。 便利な方法はないでしょうか。 また、すでにそういうシートの形式がどこかに紹介されていましたら教えてください。
- 成績管理(個人カルテ)をエクセルで
学校に勤務しています。 タイトルは成績管理となっていますが、テストの結果等の数字の処理はなんとかできています。 ところが、個人懇談などに使う資料づくりをエクセルでしたいのです。 まず、クラスの名簿があります。 出席番号順に縦に名前が並びます。 横には項目が並びます。 たとえば、担当している係、また所属するクラブ活動などです。 こういう一覧は、普通に作成していますが、それをそのまま懇談などで使うと、本人の情報ばかりでなく、クラスの他の生徒の情報も見えてしまいます。 そこで、シートの2枚目以降を個人データのカルテのようにつくりたいのです。シートの2枚目は出席番号1番、3枚目は出席番号2番・・というように。 当然、一枚目の情報が2枚目以降に反映される必要があります。 私の頼りない知識では、セルに=を入力して、1枚目の必要なセルを指定すれば、反映させることはできます。しかし、それではひとつひとつすべて入力しないといけません。クラス30人分のシートをつくるだけでかなり時間がかかります。 便利な方法はないでしょうか。 また、すでにそういうシートの形式がどこかに紹介されていましたら教えてください。
- エクセルVBAでマクロなしのブックでマクロを使う方法
タイトルが変ですが、こういうことです。 Sub serch() Application.Dialogs(xlDialogFormulaFind).Show ActiveCell.Value End Sub このコードは検索ダイアログを表示するものですが、これをマクロなしの様々なブックで使いたいのです。 何か方法があるでしょうか?
- ナットとねじ山の関係
橋梁に照明柱を取付ける工事を担当しています。コンクリートの橋梁の躯体にアンカーボルトが別の業者によって埋めこまれているのですが、施工の管理が悪く十分な長さがありません。ナットの組み合わせは1種×2、ばね座金、丸座金を基本としていますが、長さの足りない部分は3種×1、ばね座金、丸座金としても、ナットの上に出るねじ山に余裕がありません。そこで、このねじ山の余裕という問題ですが、3山以上出るのが正しいということになっていると思います。この根拠について知りたいのです。ただの見栄えだという人もいますが、ねじ山に余裕があって初めて設計強度が得られるのだという人もいます。本当のところは何なのでしょうか。役人相手に話をするので、系統的に説明しているサイトなどを教えていただけると助かります。また、ナットには1種から3種まで厚みに種類がありますが、強度の違いはどうなっているのか、これも知りたいです。よろしくお願いします。
- ナットとねじ山の関係
橋梁に照明柱を取付ける工事を担当しています。コンクリートの橋梁の躯体にアンカーボルトが別の業者によって埋めこまれているのですが、施工の管理が悪く十分な長さがありません。ナットの組み合わせは1種×2、ばね座金、丸座金を基本としていますが、長さの足りない部分は3種×1、ばね座金、丸座金としても、ナットの上に出るねじ山に余裕がありません。そこで、このねじ山の余裕という問題ですが、3山以上出るのが正しいということになっていると思います。この根拠について知りたいのです。ただの見栄えだという人もいますが、ねじ山に余裕があって初めて設計強度が得られるのだという人もいます。本当のところは何なのでしょうか。役人相手に話をするので、系統的に説明しているサイトなどを教えていただけると助かります。また、ナットには1種から3種まで厚みに種類がありますが、強度の違いはどうなっているのか、これも知りたいです。よろしくお願いします。