B列のグループによってC列の人を変えたい マクロなしは前記事参照 snack.elve.club これをマクロで記録して整頓すると Sub Macro1() '名前を付ける Range("H1:H5,I1:I4,J1:J6,K1:K7,L1:L5").CreateNames Top:=True, Left:=False, Bottom:=False, Right:=False 'B列リスト設定 Range("B2:B6").Select With Selection.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="=グループ" End With 'C列リスト設定 Range("C2:C6").Select With S