- ベストアンサー
エクセル関数&マクロの質問です。
どなたか、お願いします。 今度は画像にしました。 開けますでしょうか? ↓ http://firestorage.jp/download/2d2687a0ba32e2e2bdd6a8e9327791e859ed9c4f どうか宜しくお願いいたします。 出来ればマクロをご教授くださると嬉しいです。
- baseball_b
- お礼率54% (18/33)
- Visual Basic
- 回答数2
- ありがとう数1
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
今晩は。マクロがいいとの事なので、勉強になればと思ってさっき作ってみました。 Sub 担当者表示() For 列 = 3 To 7 For 行 = 2 To 6 If Cells(行, 列) = "○" Then Cells(7, 列) = Cells(行, 2) End If Next Next End Sub マクロの起動のさせ方は、 ・Altを押しながらF11 でVBE画面を開く ・画面左側にある「ThisWorkbook」をダブルクリック ・右側の画面に、上のコードをコピー この時点で、画面上の再生ボタン(緑の三角のやつ)を押すと発動します。 準備してくれた画像を見るとボタンも配置する予定のようなので、 ↓ボタンの配置方法とマクロ登録方法 (※ちなみに画像を見る限りExcel2002か2003っぽいんでそのつもりで説明します。) ・エクセル画面上の[表示] メニュー → [ツールバー] → [フォーム] にチェックを入れる。 ・[フォーム] ツール バーが表示されるので、その中の [オプション ボタン] をクリック → シート上にボタンの輪郭を描く → 作成したボタンを右クリックして「マクロの登録」 → 「担当者表示」を選択して「OK」 で準備完了b 今は手元にExcel2007以降しか無いので記憶を頼りに書いてるんで 弱冠言葉に違いがあるかもしれませんけど。。 で、ここからマクロの勉強タイム。 If Cells(行, 列) = "○" Then Cells(7, 列) = Cells(行, 2) End If は、「もし今検索しているセル(Cells(行, 列) )が○だったら 同じ「列」の「7」行目のセル(Cells(7, 列))に、 同じ「行」の「2」列目(つまりB列)のセル(Cells(行, 2))の値をいれなさい」 という意味。 その外側の For 行 = 2 To 6 Next は、上で説明した検索作業を「2行目から6行目まで繰り返しなさい」の意味。 更にその外側の For 列 = 3 To 7 Next は、月曜から金曜まで同じ事をやりたいので、 「3列目から7列目(つまりC列からG列)までやってしまいなさい」の意味。 これからどうぞマクロの勉強頑張って。 プログラム組んでる時間は楽しいよー ^^b
その他の回答 (1)
- hallo-2007
- ベストアンサー率41% (888/2115)
画像を拝見しました。 既にMatch関数で 何行目に ○ があるのか検索していますので =INDEX($B2:$B6,MATCH("○",C2:C6,0)) といった関数で表示できますが VBAでなくてはいけない理由があれば別ですが。
関連するQ&A
- jpgなのに動く画像を作って欲しいです。
僕はpcがないのでやってほしいです。 この画像をgifから動くjpgにして欲しいです https://cdn.discordapp.com/attachments/1169634254012026965/1170243856479039538/Videotogif.gif?ex=65585585&is=6545e085&hm=c4ce139baf4ed9e3f5a1f87f567a7f9769e376c09301a724bdd5456454c6e44d&
- 締切済み
- その他(SNS・掲示板・ブログ)
- Excelのマクロの組み方を教えてください
3行と2列のデーターの塊があり、これを 1行のデータに並べ替えるにはどうしたらいいでしょうか? ただし 行方向(縦に) 30件、列方向(横に) 20件ほど入っていて、複雑です。 空白の行や列はないものと考えていただいて結構です。 詳細説明 A1からCB1はタイトルなどが入っていて、無視して、 データーの配列が以下の場合 A2 B2 C2 D2 E2 F2 →CB2まで A3 B3 C3 D3 E3 F3 →CB3まで A4 B4 C4 D4 E4 F4 →CB4まで A5 B5 C5 D5 E5 F5→CB5まで A6 B6 C6 D6 E6 F6→CB6まで A7 B7 C7 D7 E7 F7→CB7まで ↓ ↓ ↓ ↓↓ ↓ A120まで CB120まで を A2 A3 A4 B2 B3 B4 C2 C3 C4 D2 D3 D4 ↓ CA2 CA3 CA4 CB2 CB3 CB4 次に A5 A6 A7 B5 B6 B7 C5 C6 C7 D5 D6 D7 ↓ A118 A119 A120 B118 A119 A120 などと並べかえはどのようにマクロを組めばよいですか?
- 締切済み
- その他(ビジネス・キャリア)
- gifのファイル名だけ.jpgに変えて欲しいです。
このgifのファイル名だけ.jpgに変えて偽装みたいなことはできないですかね? 友達がやってて僕もやりたかったのでよろしくお願いします。 https://cdn.discordapp.com/attachments/1169634254012026965/1170243856479039538/Videotogif.gif?ex=65585585&is=6545e085&hm=c4ce139baf4ed9e3f5a1f87f567a7f9769e376c09301a724bdd5456454c6e44d&
- 締切済み
- その他(SNS・掲示板・ブログ)
- Excelマクロに関しての質問
Excelマクロに関しての質問です。 ファイルAの”シート1”のF1,F16,F42,F65,F97,F122を別のファイルBの”集計シート”のB2,C2,D2,E2,F2,G2にデータ(数値or文字)を移します。 そしてファイルAの”シート2”のF1,F16,F42,F65,F97,F122をファイルBの”集計シート”のB3,C3,D3,E3,F3,G3にデータを移します。 それをファイルAの”シート29”まで繰り返し行いたいのですが、どのようなマクロを組めば良いのでしょうか? 教えて頂きたいです。
- 締切済み
- その他MS Office製品
- Excelで複数行を1行にするマクロについて
Excel2000で3行を繰り返し、1つの行にまとめていくマクロの書き方についてご教授ください。 例えば下記のような並びの時、 A B C D E F G H I ..... マクロを使って、 A B C D E F G H I ...... のようにしたいと考えています。
- ベストアンサー
- その他MS Office製品
- ソレノイド(東大レベル)
(2)からまるで分からなくなってしまったので、解ける方は解答を教えて頂きたいです。 問題をアップロードしておきました。 http://firestorage.jp/download/ed285085ea67e2ca57a4163f473f2defcceb4d66
- ベストアンサー
- 物理学
- エクセル関数 マクロ
EXCELで作ってある表に数字を入力する時、 (例)セルA1⇒B1⇒C1(⇒D1⇒F1)と入力した後エンターキーを押したら、 セルA2⇒B2⇒C2(⇒D2⇒F2)へ、またエンターキーを押したら、 セルA3⇒B3⇒C3(⇒D1⇒F3)と移動する方法(関数?マクロ?!)を教えて下さい。
- 締切済み
- オフィス系ソフト
- マクロかエクセル関数教えて下さい。
エクセルマクロ及び関数式で教えていただけないでしょうか? 月 火 水 木 金 太郎 ○ 花子 ○ 一郎 ○ 次郎 ○ 三郎 ○ 担当者名 太郎 一郎 三郎 花子 次郎 このように、丸が入ると担当欄のセルに「担当者名:月は太郎、火は一郎‥」を自動表示させたい。 1.そのセルに関数式 2.マクロ(サンプル) を、ご教授してくださる方が、おられましたら宜しくお願い致します。 これでご覧になれますでしょうか? ↓ http://firestorage.jp/download/37abd45beb74cb129a16bd3a92042647c013... 宜しくお願い致します。
- ベストアンサー
- その他(データベース)
- excel 2つの条件(続き)
http://okwave.jp/qa5054165.html の続きですが、 A B C D E F G 1 あ 3 22 4 15 ? 2 い 4 15 4 10 ? 3 う 2 10 4 え 4 10 E1に=LARGE(B1:B4,1) E2に=LARGE(B1:B4,2) F1とF2に{=MOD(LARGE(B1:B4*(MAX(C1:C4)+1)+C1:C4,ROW(B1:B4)),MAX(C1:C4)+1)} をいれました、画像のようにG1とG2に対応したA列を表示させるにはどうすれば良いでしょうか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル関数か出来ればマクロでしょうか
教えてもエクセルも初心者ですが、 http://firestorage.jp/download/37abd45beb74cb129a16bd3a92042647c0133353 C7からD7に○の表示されている担当者の名前を表示したいのですが、 いかがでしょうか? 上記ウルトラでファイルが開けますでしょうか? どうぞ宜しくお願いいたします。
- ベストアンサー
- Visual Basic
お礼
computer さま ご丁寧な解答本当に有難うございました。 感謝×感謝です^^ 近くにいらっしゃったら、一杯おごってさし上げたくなりますです。はい^^ 早速勉強します。 出来ましたら今後とも宜しくご指導下さい。。。