|
当方、vba初心者のため的を得ない質問かと思いますが、
どなたかご助力いただければ幸いです。
前任者の組んだマクロ(vlookup)で、
列に返す値の位置の指定が上手くできていない部分があります。
Y列に検索値から18列目値
AB列に検索値から21列目値
AC列に検索値から22列目値
AD列に検索値から23列目値
を返したいのですが、マクロを動かしても
該当のセルに数式が反映されません。
しかも、AB列には23列目の値が返されてしまっています。
恐らく下記のmodsettingがおかしいのではないかと踏んでいるのですが…
(Public Constの後の"HonLCol"に何か意味があり、
それが正しいものが入力されていない??)
★の箇所がこちらの意図した値が返らない部分です。
お気づきの点があれば、ご指摘下さい。
どうぞ宜しくお願い致します。
以下、modsetting
'=== セルの場所設定 ===
'VLOOKUPで検索するセルの場所
Public Const VSC = "H" '一番左のセル
Public Const VEC = "BH" '最後のセル
'前月分の場所(シートでの位置)
Public Const HonLCol = "R" '本給−前月分
Public Const NenLCol = "T" '年俸月額−前月分
Public Const SyaLCol = "V" '謝金−前月分
Public Const SaiLCol = "X" '裁量労働-前月分
Public Const SaeLCol = "Y" '超過勤務・法定内 ★
Public Const OvGLCol = "Z" '超過勤務・法定外(60h外)
Public Const OvNLCol = "AA" '超過勤務・法定外(60h内)
Public Const HldLCol = "AB" '休日勤務 ★ ※23列目の値が返されている
Public Const HmdLCol = "AC" '休日勤務(60h内) ★
Public Const HndLCol = "AD" '休日勤務(60h外) ★
Public Const OvSLCol = "AE" '超過勤務・深夜
Public Const HeiLCol = "AF" '平日勤務
Public Const ShnLCol = "AG" '深夜手当
Public Const JyuLCol = "AI" '住居手当−前月
Public Const TkNLCol = "AK" '通勤手当−前月
Public Const TkTLCol = "AM" '特殊通勤手当−前月
Public Const EtcLCol = "AP" 'その他支給−前月
Public Const KenLCol = "AT" '(事業主)健康保険-前月分
Public Const KaiLCol = "AV" '(事業主)介護保険-前月分
Public Const KouLCol = "AX" '(事業主)厚生年金-前月分
Public Const JidLCol = "AZ" '(事業主)児童拠出厚年-前
Public Const KiHLCol = "BB" '(事業主)基金標準-前月分
Public Const KiALCol = "BD" '(事業主)基金加算-前月分
Public Const KohLCol = "BF" '(事業主)会計用雇保-前月
Public Const RouLCol = "BH" '(事業主)会計用労災-前月
'当月分データの場所(”VLOOKUP”で選択したセルの左からの位置)
Public Const HonTCol = "11" '本給−当月分
Public Const NenTCol = "13" '年俸月額−当月分
Public Const SyaTCol = "15" '謝金−当月分
Public Const SaiTCol = "17" '裁量労働-当月分
Public Const SaeTCol = "18" '超過勤務・法定内 ★
Public Const OvGTCol = "19" '超過勤務・法定外
Public Const OvNTCol = "20" '超過勤務・法定内
Public Const HldTCol = "21" '休日勤務 ★
Public Const HmdTCol = "22" '休日勤務(60h内) ★
Public Const HndTCol = "23" '休日勤務(60h外) ★ ※AB列に値が返る
Public Const OvSTCol = "24" '超過勤務・深夜
Public Const HeiTCol = "25" '平日勤務
Public Const ShnTCol = "26" '深夜手当
Public Const JyuTCol = "28" '住居手当
Public Const TkNTCol = "30" '通勤手当
Public Const TkTTCol = "32" '特殊通勤手当
Public Const EtcTCol = "35" 'その他支給
Public Const KenTCol = "39" '(事業主)健康保険
Public Const KaiTCol = "41" '(事業主)介護保険
Public Const KouTCol = "43" '(事業主)厚生年金
Public Const JidTCol = "45" '(事業主)児童拠出厚年
Public Const KiHTCol = "47" '(事業主)基金標準
Public Const KiATCol = "49" '(事業主)基金加算
Public Const KohTCol = "51" '(事業主)会計用雇保
Public Const RouTCol = "53" '(事業主)会計用労災
|
|