複数ファイルデータを1つに纏めるチェックボックス有
過去の質問タイトル『複数EXCELファイル中のデータを1つのファイルへ』、『複数ファイルのデータを1つのファイルへ纏めるマクロ』で大変お世話になっている者です。
HohoPapaさんからご教示頂きましたコードで、チェックボックス以外の値については、出力ファイルへ正常に纏める事が出来ました。
更にお伝えして、入力ファイル中のチェックボックス(リンク設定有り)を出力ファイルへ吐き出すマクロのコードをご教示頂きたく質問させて頂きました。
奥が深く、私にはコードを修正出来るだけの力が有りません。
どうか、お教え下さるようお願いいたします。
・入力ファイルの記載フォーマットは以下の通りになります。
B列=出力ファイルに付けるタイトルは6行目、データは8行目以降より
(出力ファイルには数値として吐き出したいが、入力ファイル中の記載は所々数値以外の形式で記載されている)
数値形式でない記載を数値形式で吐き出すのは困難である為、そのまま吐き出し。
C列=出力ファイルに付けるタイトルは6行目、データは8行目以降より
D列=出力ファイルに付けるタイトルは6行目、データは8行目以降より
E列=出力ファイルに付けるタイトルは6行目、データは8行目以降より
F列=出力ファイルに付けるタイトルは5行目、データは8行目以降より
G列=出力ファイルに付けるタイトルは6行目、データは8行目以降より出力ファイルへは、日付表示で吐き出し。
H列=出力ファイルに付けるタイトルは6行目、データは8行目以降より 出力ファイルへは、日付表示で吐き出し。
I列=リンク設定の有るチェックボックス
値はオンにチェックがついており、[リンクするセル』=『$Q$8』
J列=リンク設定の有るチェックボックス
値はオンにチェックがついており、[リンクするセル』=『$R$8』
K列=リンク設定の有るチェックボックス
値はオンにチェックがついており、[リンクするセル』=『$S$8』
L列=関数式『=IF(AND(S8=TRUE,OR(Q8=TRUE,R8=TRUE)),"","右欄も要確認")』が入っています。
M列=リンク設定の有るチェックボックス
値はオンにチェックがついており、[リンクするセル』=『$T$8』
N列=関数式『=IF(AND(S8=TRUE,OR(Q8=TRUE,R8=TRUE)),"合同設備等利用可能",IF(T8=TRUE,"合同設備等利用可能","内部運営管轄と相談下さい"))』が入っています。
Q列、R列、S列、T列=8行目以降より『TRUE』、『FLASE』の文字入っている。
出力ファイルの記載フォーマットは以下の通りになります。
1行目のタイトルセルは、
A列=『参加番号』
B列~K列、N列=上記の入力ファイルのタイトルから
A列:2行目以降=入力ファイル名の『課題参加者_23RF3001.xlsx』の『23RF3001』を入力ファイルのB列、C列、D列に記載が有る行数分記載。
B列~K列:2行目以降=上記のB列~K列の入力データから吐き出し
N列:2行目以降=上記のN列の入力データから吐き出し