Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


70563 / 76738 ←次へ | 前へ→

【10679】Re:プロシジャー分割
回答  かぷ  - 04/2/6(金) 0:18 -

引用なし
パスワード
   ▼ichinose さん:
こんばんは。
>>
>>>で、知りたいのは、シート「氏名一覧」の4行目氏名にデータの場合には、
>>>各シートのほとんどが4行目を表示・非表示の設定、役員シートの役員と監事がそれぞれ
>>>100+4、200+4行目を表示・非表示の設定を行っています。
>>
>>>これが、シート「氏名一覧」の5行目氏名に対しては、各シートの何行目に対して
>>>表示・非表示の設定を行うのかということなんです。
>>
>>氏名一覧の一部ですが(現状)
>>A4 は 1 (1)
>>B4 は 入力禁則で変更します(掃除)
>>C4 は 氏名(A)
>>D4 は 口座店名
>>E4 は 口座番号
>>F4 は 時間給1(1000)
>>G4 は 時間給2(1100)
>>H4 は 時間給3(1200)
>>I4 は 入力禁則で変更します(乙)
>>J4 は 人数(0)
>>K4 は チェックボックス($Q$4)
>>M4 は =IF(Q4=TRUE,B4,IF(B4="社長","社長",""))
>>Q4 FALSE (TRUE)
>>A5 は (2)
>>B5 は 入力禁則で変更します(役員)
>>C5 は 氏名(A)
>>D5 は 口座店名
>>E5 は 口座番号
>>F5 は 時間給1(1000)
>>G5 は 時間給2(1100)
>>H5 は 時間給3(1200)
>>I5 は 入力禁則で変更します(乙)
>>J5 は 人数(0)
>>K5 は チェックボックス($Q$5)
>>M5 は =IF(Q5=TRUE,B5,IF(B5="社長","社長",""))
>>Q5 FALSE (TRUE)
>>A6 (3)
>>以下同様です。
>はい、ここまではわかりましたし、想像していたとおりです。
>
>で、知りたかったのはこれ以下のレイアウト
>何となく、想像つくんですが、はっきりしないんです。
>
>
>>
>>役員シートの
>>A4 =氏名一覧!M4
>>B4 =氏名一覧!O4
>>C4 =IF(B4="","",VLOOKUP(B4,氏名一覧!$A$3:$E$102,2))
>>D4 =IF(C4="社長",IF(B4="","",VLOOKUP(B4,氏名一覧!$A$3:$E$102,3)),"")
>>E4 =IF(C4="社長",IF(B4="","",(VLOOKUP(B4,氏名一覧!$A$3:$E$102,4))),"")
>>・
>>・
>>・
>>A104 =氏名一覧!M4
>>B104 =氏名一覧!O4
>>C104 =IF(B104="","",VLOOKUP(B104,氏名一覧!$A$3:$E$102,2))
>>D104 =IF(C104="役員",IF(B104="","",VLOOKUP(B104,氏名一覧!$A$3:$E$102,3)),"")
>>E104 =IF(C104="役員",IF(B104="","",(VLOOKUP(B104,氏名一覧!$A$3:$E$102,4))),"")
>>・
>>・
>>・
>>A204 =氏名一覧!M4
>>B204 =氏名一覧!O4
>>C204 =IF(B204="","",VLOOKUP(B104,氏名一覧!$A$3:$E$102,2))
>>D204 =IF(C204="監事",IF(B204="","",VLOOKUP(B204,氏名一覧!$A$3:$E$102,3)),"")
>>E204 =IF(C204="監事",IF(B204="","",(VLOOKUP(B204,氏名一覧!$A$3:$E$102,4))),"")
>
>上記は、シート氏名一覧の4行目のデータが役員だった場合ですよね?
>では、5行目が役員だった場合は?
>A5 =氏名一覧!M5
>B5 =氏名一覧!O5
>C5 =IF(B5="","",VLOOKUP(B5,氏名一覧!$A$3:$E$102,2))
>D5 =IF(C5="社長",IF(B5="","",VLOOKUP(B5,氏名一覧!$A$3:$E$102,3)),"")
>E5 =IF(C5="社長",IF(B5="","",(VLOOKUP(B5,氏名一覧!$A$3:$E$102,4))),"")
>・
>・
>・
>A105 =氏名一覧!M5
>B105 =氏名一覧!O5
>C105 =IF(B105="","",VLOOKUP(B105,氏名一覧!$A$3:$E$102,2))
>D105 =IF(C105="役員",IF(B105="","",VLOOKUP(B105,氏名一覧!$A$3:$E$102,3)),"")
>E105 =IF(C105="役員",IF(B105="","",(VLOOKUP(B105,氏名一覧!$A$3:$E$102,4))),"")
>・
>・
>・
>A205 =氏名一覧!M5
>B205 =氏名一覧!O5
>C205 =IF(B205="","",VLOOKUP(B105,氏名一覧!$A$3:$E$102,2))
>D205 =IF(C205="監事",IF(B205="","",VLOOKUP(B205,氏名一覧!$A$3:$E$102,3)),"")
>E205 =IF(C205="監事",IF(B205="","",(VLOOKUP(B205,氏名一覧!$A$3:$E$102,4))),"")
>
>という数式が既に入っているということでよろしいのですか?
>6行以下も同様の数式が入っているという解釈です。
>
>そして、もしそうだとしたら、「シート氏名一覧には、上限100人までのデータが
>入力可能というレイアウトになっている」
>ということでよろしいでしょうか?
>よって、この役員シートでは、役員ではない方の行を非表示にしたい
>という仕様でしょうか?
>
>
>教えて下さい。

はい、その通りです。
今のところは数式が入っていてそれを出したり消したりしていたんですが、とても膨大な数のマクロが必要になってしまって、自分なりに考えてもまとまらなかったので、ここに記載させて貰った次第でございます。
0 hits

【10642】[無題] かぷ 04/2/4(水) 16:42 質問
【10644】Re:[無題] 通りすがりの者 04/2/5(木) 0:00 発言
【10645】Re:[無題] かぷ 04/2/5(木) 0:33 発言
【10646】プロシジャー分割 ichinose 04/2/5(木) 2:32 回答
【10647】誤字脱字が・・・ ichinose 04/2/5(木) 2:44 発言
【10648】Re:プロシジャー分割 かぷ 04/2/5(木) 7:58 発言
【10653】Re:プロシジャー分割 かぷ 04/2/5(木) 13:22 発言
【10676】さらに追記 かぷ 04/2/5(木) 18:53 発言
【10678】Re:プロシジャー分割 ichinose 04/2/5(木) 23:54 質問
【10679】Re:プロシジャー分割 かぷ 04/2/6(金) 0:18 回答
【10680】Re:プロシジャー分割 ichinose 04/2/6(金) 1:10 回答
【10683】Re:プロシジャー分割 かぷ 04/2/6(金) 9:50 お礼

70563 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free