my @Edges = qw(xlEdgeBottom xlEdgeLeft xlEdgeRight xlEdgeTop xlDiagonalUp xlDiagonalDown);
			foreach my $edge (@Edges) {
				$SheetWaferMap->Range("$Excel_LUT{$ValueX}$ValueY")->Borders(eval($edge))->{LineStyle} = 7;
}