my $SortOrd1 = $Sheet->Range("A2");
	my $SortOrd2 = $Sheet->Range("B2");
	my $SortOrd3 = $Sheet->Range("C2");
	
	my $Selection = $Sheet->Range("A:M");
		$Selection->Sort(
		{Key1 => $SortOrd1,                   
		Order1 => xlAscending,                    
		Key2 => $SortOrd2,                   
		Order2 => xlAscending,                  
		Key3 => $SortOrd3,                    
		Order3 => xlAscending,
		});