my @Edges = qw(xlEdgeBottom xlEdgeLeft xlEdgeRight xlEdgeTop);
#foreach my $edge (@Edges) {
	$SheetWaferMap->Cells($ValueY,$ValueX)->Borders(eval($edge))->{LineStyle} = "xlContinuous";
	$SheetWaferMap->Cells($ValueY,$ValueX)->Borders(eval($edge))->{Weight} = "xlThick";
	$SheetWaferMap->Cells($ValueY,$ValueX)->Borders(eval($edge))->{ColorIndex} = 6;
}