877 lines
		
	
	
		
			37 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			877 lines
		
	
	
		
			37 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| /**
 | |
|  * PHPExcel
 | |
|  *
 | |
|  * Copyright (c) 2006 - 2015 PHPExcel
 | |
|  *
 | |
|  * This library is free software; you can redistribute it and/or
 | |
|  * modify it under the terms of the GNU Lesser General Public
 | |
|  * License as published by the Free Software Foundation; either
 | |
|  * version 2.1 of the License, or (at your option) any later version.
 | |
|  *
 | |
|  * This library is distributed in the hope that it will be useful,
 | |
|  * but WITHOUT ANY WARRANTY; without even the implied warranty of
 | |
|  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 | |
|  * Lesser General Public License for more details.
 | |
|  *
 | |
|  * You should have received a copy of the GNU Lesser General Public
 | |
|  * License along with this library; if not, write to the Free Software
 | |
|  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 | |
|  *
 | |
|  * @category    PHPExcel
 | |
|  * @package        PHPExcel_Calculation
 | |
|  * @copyright    Copyright (c) 2006 - 2015 PHPExcel (http://www.codeplex.com/PHPExcel)
 | |
|  * @license        http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt    LGPL
 | |
|  * @version        ##VERSION##, ##DATE##
 | |
|  */
 | |
| 
 | |
| 
 | |
| /** PHPExcel root directory */
 | |
| if (!defined('PHPEXCEL_ROOT')) {
 | |
|     /**
 | |
|      * @ignore
 | |
|      */
 | |
|     define('PHPEXCEL_ROOT', dirname(__FILE__) . '/../../');
 | |
|     require(PHPEXCEL_ROOT . 'PHPExcel/Autoloader.php');
 | |
| }
 | |
| 
 | |
| 
 | |
| /**
 | |
|  * PHPExcel_Calculation_LookupRef
 | |
|  *
 | |
|  * @category    PHPExcel
 | |
|  * @package        PHPExcel_Calculation
 | |
|  * @copyright    Copyright (c) 2006 - 2015 PHPExcel (http://www.codeplex.com/PHPExcel)
 | |
|  */
 | |
| class PHPExcel_Calculation_LookupRef {
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * CELL_ADDRESS
 | |
|      *
 | |
|      * Creates a cell address as text, given specified row and column numbers.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =ADDRESS(row, column, [relativity], [referenceStyle], [sheetText])
 | |
|      *
 | |
|      * @param    row                Row number to use in the cell reference
 | |
|      * @param    column            Column number to use in the cell reference
 | |
|      * @param    relativity        Flag indicating the type of reference to return
 | |
|      *                                1 or omitted    Absolute
 | |
|      *                                2                Absolute row; relative column
 | |
|      *                                3                Relative row; absolute column
 | |
|      *                                4                Relative
 | |
|      * @param    referenceStyle    A logical value that specifies the A1 or R1C1 reference style.
 | |
|      *                                TRUE or omitted        CELL_ADDRESS returns an A1-style reference
 | |
|      *                                FALSE                CELL_ADDRESS returns an R1C1-style reference
 | |
|      * @param    sheetText        Optional Name of worksheet to use
 | |
|      * @return    string
 | |
|      */
 | |
|     public static function CELL_ADDRESS($row, $column, $relativity=1, $referenceStyle=True, $sheetText='') {
 | |
|         $row        = PHPExcel_Calculation_Functions::flattenSingleValue($row);
 | |
|         $column        = PHPExcel_Calculation_Functions::flattenSingleValue($column);
 | |
|         $relativity    = PHPExcel_Calculation_Functions::flattenSingleValue($relativity);
 | |
|         $sheetText    = PHPExcel_Calculation_Functions::flattenSingleValue($sheetText);
 | |
| 
 | |
|         if (($row < 1) || ($column < 1)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         if ($sheetText > '') {
 | |
|             if (strpos($sheetText,' ') !== False) { $sheetText = "'".$sheetText."'"; }
 | |
|             $sheetText .='!';
 | |
|         }
 | |
|         if ((!is_bool($referenceStyle)) || $referenceStyle) {
 | |
|             $rowRelative = $columnRelative = '$';
 | |
|             $column = PHPExcel_Cell::stringFromColumnIndex($column-1);
 | |
|             if (($relativity == 2) || ($relativity == 4)) { $columnRelative = ''; }
 | |
|             if (($relativity == 3) || ($relativity == 4)) { $rowRelative = ''; }
 | |
|             return $sheetText.$columnRelative.$column.$rowRelative.$row;
 | |
|         } else {
 | |
|             if (($relativity == 2) || ($relativity == 4)) { $column = '['.$column.']'; }
 | |
|             if (($relativity == 3) || ($relativity == 4)) { $row = '['.$row.']'; }
 | |
|             return $sheetText.'R'.$row.'C'.$column;
 | |
|         }
 | |
|     }    //    function CELL_ADDRESS()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * COLUMN
 | |
|      *
 | |
|      * Returns the column number of the given cell reference
 | |
|      * If the cell reference is a range of cells, COLUMN returns the column numbers of each column in the reference as a horizontal array.
 | |
|      * If cell reference is omitted, and the function is being called through the calculation engine, then it is assumed to be the
 | |
|      *        reference of the cell in which the COLUMN function appears; otherwise this function returns 0.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =COLUMN([cellAddress])
 | |
|      *
 | |
|      * @param    cellAddress        A reference to a range of cells for which you want the column numbers
 | |
|      * @return    integer or array of integer
 | |
|      */
 | |
|     public static function COLUMN($cellAddress=Null) {
 | |
|         if (is_null($cellAddress) || trim($cellAddress) === '') { return 0; }
 | |
| 
 | |
|         if (is_array($cellAddress)) {
 | |
|             foreach($cellAddress as $columnKey => $value) {
 | |
|                 $columnKey = preg_replace('/[^a-z]/i','',$columnKey);
 | |
|                 return (integer) PHPExcel_Cell::columnIndexFromString($columnKey);
 | |
|             }
 | |
|         } else {
 | |
|             if (strpos($cellAddress,'!') !== false) {
 | |
|                 list($sheet,$cellAddress) = explode('!',$cellAddress);
 | |
|             }
 | |
|             if (strpos($cellAddress,':') !== false) {
 | |
|                 list($startAddress,$endAddress) = explode(':',$cellAddress);
 | |
|                 $startAddress = preg_replace('/[^a-z]/i','',$startAddress);
 | |
|                 $endAddress = preg_replace('/[^a-z]/i','',$endAddress);
 | |
|                 $returnValue = array();
 | |
|                 do {
 | |
|                     $returnValue[] = (integer) PHPExcel_Cell::columnIndexFromString($startAddress);
 | |
|                 } while ($startAddress++ != $endAddress);
 | |
|                 return $returnValue;
 | |
|             } else {
 | |
|                 $cellAddress = preg_replace('/[^a-z]/i','',$cellAddress);
 | |
|                 return (integer) PHPExcel_Cell::columnIndexFromString($cellAddress);
 | |
|             }
 | |
|         }
 | |
|     }    //    function COLUMN()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * COLUMNS
 | |
|      *
 | |
|      * Returns the number of columns in an array or reference.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =COLUMNS(cellAddress)
 | |
|      *
 | |
|      * @param    cellAddress        An array or array formula, or a reference to a range of cells for which you want the number of columns
 | |
|      * @return    integer            The number of columns in cellAddress
 | |
|      */
 | |
|     public static function COLUMNS($cellAddress=Null) {
 | |
|         if (is_null($cellAddress) || $cellAddress === '') {
 | |
|             return 1;
 | |
|         } elseif (!is_array($cellAddress)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         $x = array_keys($cellAddress);
 | |
|         $x = array_shift($x);
 | |
|         $isMatrix = (is_numeric($x));
 | |
|         list($columns,$rows) = PHPExcel_Calculation::_getMatrixDimensions($cellAddress);
 | |
| 
 | |
|         if ($isMatrix) {
 | |
|             return $rows;
 | |
|         } else {
 | |
|             return $columns;
 | |
|         }
 | |
|     }    //    function COLUMNS()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * ROW
 | |
|      *
 | |
|      * Returns the row number of the given cell reference
 | |
|      * If the cell reference is a range of cells, ROW returns the row numbers of each row in the reference as a vertical array.
 | |
|      * If cell reference is omitted, and the function is being called through the calculation engine, then it is assumed to be the
 | |
|      *        reference of the cell in which the ROW function appears; otherwise this function returns 0.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =ROW([cellAddress])
 | |
|      *
 | |
|      * @param    cellAddress        A reference to a range of cells for which you want the row numbers
 | |
|      * @return    integer or array of integer
 | |
|      */
 | |
|     public static function ROW($cellAddress=Null) {
 | |
|         if (is_null($cellAddress) || trim($cellAddress) === '') { return 0; }
 | |
| 
 | |
|         if (is_array($cellAddress)) {
 | |
|             foreach($cellAddress as $columnKey => $rowValue) {
 | |
|                 foreach($rowValue as $rowKey => $cellValue) {
 | |
|                     return (integer) preg_replace('/[^0-9]/i','',$rowKey);
 | |
|                 }
 | |
|             }
 | |
|         } else {
 | |
|             if (strpos($cellAddress,'!') !== false) {
 | |
|                 list($sheet,$cellAddress) = explode('!',$cellAddress);
 | |
|             }
 | |
|             if (strpos($cellAddress,':') !== false) {
 | |
|                 list($startAddress,$endAddress) = explode(':',$cellAddress);
 | |
|                 $startAddress = preg_replace('/[^0-9]/','',$startAddress);
 | |
|                 $endAddress = preg_replace('/[^0-9]/','',$endAddress);
 | |
|                 $returnValue = array();
 | |
|                 do {
 | |
|                     $returnValue[][] = (integer) $startAddress;
 | |
|                 } while ($startAddress++ != $endAddress);
 | |
|                 return $returnValue;
 | |
|             } else {
 | |
|                 list($cellAddress) = explode(':',$cellAddress);
 | |
|                 return (integer) preg_replace('/[^0-9]/','',$cellAddress);
 | |
|             }
 | |
|         }
 | |
|     }    //    function ROW()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * ROWS
 | |
|      *
 | |
|      * Returns the number of rows in an array or reference.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =ROWS(cellAddress)
 | |
|      *
 | |
|      * @param    cellAddress        An array or array formula, or a reference to a range of cells for which you want the number of rows
 | |
|      * @return    integer            The number of rows in cellAddress
 | |
|      */
 | |
|     public static function ROWS($cellAddress=Null) {
 | |
|         if (is_null($cellAddress) || $cellAddress === '') {
 | |
|             return 1;
 | |
|         } elseif (!is_array($cellAddress)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         $i = array_keys($cellAddress);
 | |
|         $isMatrix = (is_numeric(array_shift($i)));
 | |
|         list($columns,$rows) = PHPExcel_Calculation::_getMatrixDimensions($cellAddress);
 | |
| 
 | |
|         if ($isMatrix) {
 | |
|             return $columns;
 | |
|         } else {
 | |
|             return $rows;
 | |
|         }
 | |
|     }    //    function ROWS()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * HYPERLINK
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =HYPERLINK(linkURL,displayName)
 | |
|      *
 | |
|      * @access    public
 | |
|      * @category Logical Functions
 | |
|      * @param    string            $linkURL        Value to check, is also the value returned when no error
 | |
|      * @param    string            $displayName    Value to return when testValue is an error condition
 | |
|      * @param    PHPExcel_Cell    $pCell            The cell to set the hyperlink in
 | |
|      * @return    mixed    The value of $displayName (or $linkURL if $displayName was blank)
 | |
|      */
 | |
|     public static function HYPERLINK($linkURL = '', $displayName = null, PHPExcel_Cell $pCell = null) {
 | |
|         $args = func_get_args();
 | |
|         $pCell = array_pop($args);
 | |
| 
 | |
|         $linkURL        = (is_null($linkURL))        ? '' :    PHPExcel_Calculation_Functions::flattenSingleValue($linkURL);
 | |
|         $displayName    = (is_null($displayName))    ? '' :    PHPExcel_Calculation_Functions::flattenSingleValue($displayName);
 | |
| 
 | |
|         if ((!is_object($pCell)) || (trim($linkURL) == '')) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         }
 | |
| 
 | |
|         if ((is_object($displayName)) || trim($displayName) == '') {
 | |
|             $displayName = $linkURL;
 | |
|         }
 | |
| 
 | |
|         $pCell->getHyperlink()->setUrl($linkURL);
 | |
| 
 | |
|         return $displayName;
 | |
|     }    //    function HYPERLINK()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * INDIRECT
 | |
|      *
 | |
|      * Returns the reference specified by a text string.
 | |
|      * References are immediately evaluated to display their contents.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =INDIRECT(cellAddress)
 | |
|      *
 | |
|      * NOTE - INDIRECT() does not yet support the optional a1 parameter introduced in Excel 2010
 | |
|      *
 | |
|      * @param    cellAddress        $cellAddress    The cell address of the current cell (containing this formula)
 | |
|      * @param    PHPExcel_Cell    $pCell            The current cell (containing this formula)
 | |
|      * @return    mixed            The cells referenced by cellAddress
 | |
|      *
 | |
|      * @todo    Support for the optional a1 parameter introduced in Excel 2010
 | |
|      *
 | |
|      */
 | |
|     public static function INDIRECT($cellAddress = NULL, PHPExcel_Cell $pCell = NULL) {
 | |
|         $cellAddress    = PHPExcel_Calculation_Functions::flattenSingleValue($cellAddress);
 | |
|         if (is_null($cellAddress) || $cellAddress === '') {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         }
 | |
| 
 | |
|         $cellAddress1 = $cellAddress;
 | |
|         $cellAddress2 = NULL;
 | |
|         if (strpos($cellAddress,':') !== false) {
 | |
|             list($cellAddress1,$cellAddress2) = explode(':',$cellAddress);
 | |
|         }
 | |
| 
 | |
|         if ((!preg_match('/^'.PHPExcel_Calculation::CALCULATION_REGEXP_CELLREF.'$/i', $cellAddress1, $matches)) ||
 | |
|             ((!is_null($cellAddress2)) && (!preg_match('/^'.PHPExcel_Calculation::CALCULATION_REGEXP_CELLREF.'$/i', $cellAddress2, $matches)))) {
 | |
|             if (!preg_match('/^'.PHPExcel_Calculation::CALCULATION_REGEXP_NAMEDRANGE.'$/i', $cellAddress1, $matches)) {
 | |
|                 return PHPExcel_Calculation_Functions::REF();
 | |
|             }
 | |
| 
 | |
|             if (strpos($cellAddress,'!') !== FALSE) {
 | |
|                 list($sheetName, $cellAddress) = explode('!',$cellAddress);
 | |
|                 $sheetName = trim($sheetName, "'");
 | |
|                 $pSheet = $pCell->getWorksheet()->getParent()->getSheetByName($sheetName);
 | |
|             } else {
 | |
|                 $pSheet = $pCell->getWorksheet();
 | |
|             }
 | |
| 
 | |
|             return PHPExcel_Calculation::getInstance()->extractNamedRange($cellAddress, $pSheet, FALSE);
 | |
|         }
 | |
| 
 | |
|         if (strpos($cellAddress,'!') !== FALSE) {
 | |
|             list($sheetName,$cellAddress) = explode('!',$cellAddress);
 | |
|             $sheetName = trim($sheetName, "'");
 | |
|             $pSheet = $pCell->getWorksheet()->getParent()->getSheetByName($sheetName);
 | |
|         } else {
 | |
|             $pSheet = $pCell->getWorksheet();
 | |
|         }
 | |
| 
 | |
|         return PHPExcel_Calculation::getInstance()->extractCellRange($cellAddress, $pSheet, FALSE);
 | |
|     }    //    function INDIRECT()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * OFFSET
 | |
|      *
 | |
|      * Returns a reference to a range that is a specified number of rows and columns from a cell or range of cells.
 | |
|      * The reference that is returned can be a single cell or a range of cells. You can specify the number of rows and
 | |
|      * the number of columns to be returned.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =OFFSET(cellAddress, rows, cols, [height], [width])
 | |
|      *
 | |
|      * @param    cellAddress        The reference from which you want to base the offset. Reference must refer to a cell or
 | |
|      *                                range of adjacent cells; otherwise, OFFSET returns the #VALUE! error value.
 | |
|      * @param    rows            The number of rows, up or down, that you want the upper-left cell to refer to.
 | |
|      *                                Using 5 as the rows argument specifies that the upper-left cell in the reference is
 | |
|      *                                five rows below reference. Rows can be positive (which means below the starting reference)
 | |
|      *                                or negative (which means above the starting reference).
 | |
|      * @param    cols            The number of columns, to the left or right, that you want the upper-left cell of the result
 | |
|      *                                to refer to. Using 5 as the cols argument specifies that the upper-left cell in the
 | |
|      *                                reference is five columns to the right of reference. Cols can be positive (which means
 | |
|      *                                to the right of the starting reference) or negative (which means to the left of the
 | |
|      *                                starting reference).
 | |
|      * @param    height            The height, in number of rows, that you want the returned reference to be. Height must be a positive number.
 | |
|      * @param    width            The width, in number of columns, that you want the returned reference to be. Width must be a positive number.
 | |
|      * @return    string            A reference to a cell or range of cells
 | |
|      */
 | |
|     public static function OFFSET($cellAddress=Null,$rows=0,$columns=0,$height=null,$width=null) {
 | |
|         $rows        = PHPExcel_Calculation_Functions::flattenSingleValue($rows);
 | |
|         $columns    = PHPExcel_Calculation_Functions::flattenSingleValue($columns);
 | |
|         $height        = PHPExcel_Calculation_Functions::flattenSingleValue($height);
 | |
|         $width        = PHPExcel_Calculation_Functions::flattenSingleValue($width);
 | |
|         if ($cellAddress == Null) {
 | |
|             return 0;
 | |
|         }
 | |
| 
 | |
|         $args = func_get_args();
 | |
|         $pCell = array_pop($args);
 | |
|         if (!is_object($pCell)) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         }
 | |
| 
 | |
|         $sheetName = NULL;
 | |
|         if (strpos($cellAddress,"!")) {
 | |
|             list($sheetName,$cellAddress) = explode("!",$cellAddress);
 | |
|             $sheetName = trim($sheetName, "'");
 | |
|         }
 | |
|         if (strpos($cellAddress,":")) {
 | |
|             list($startCell,$endCell) = explode(":",$cellAddress);
 | |
|         } else {
 | |
|             $startCell = $endCell = $cellAddress;
 | |
|         }
 | |
|         list($startCellColumn,$startCellRow) = PHPExcel_Cell::coordinateFromString($startCell);
 | |
|         list($endCellColumn,$endCellRow) = PHPExcel_Cell::coordinateFromString($endCell);
 | |
| 
 | |
|         $startCellRow += $rows;
 | |
|         $startCellColumn = PHPExcel_Cell::columnIndexFromString($startCellColumn) - 1;
 | |
|         $startCellColumn += $columns;
 | |
| 
 | |
|         if (($startCellRow <= 0) || ($startCellColumn < 0)) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         }
 | |
|         $endCellColumn = PHPExcel_Cell::columnIndexFromString($endCellColumn) - 1;
 | |
|         if (($width != null) && (!is_object($width))) {
 | |
|             $endCellColumn = $startCellColumn + $width - 1;
 | |
|         } else {
 | |
|             $endCellColumn += $columns;
 | |
|         }
 | |
|         $startCellColumn = PHPExcel_Cell::stringFromColumnIndex($startCellColumn);
 | |
| 
 | |
|         if (($height != null) && (!is_object($height))) {
 | |
|             $endCellRow = $startCellRow + $height - 1;
 | |
|         } else {
 | |
|             $endCellRow += $rows;
 | |
|         }
 | |
| 
 | |
|         if (($endCellRow <= 0) || ($endCellColumn < 0)) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         }
 | |
|         $endCellColumn = PHPExcel_Cell::stringFromColumnIndex($endCellColumn);
 | |
| 
 | |
|         $cellAddress = $startCellColumn.$startCellRow;
 | |
|         if (($startCellColumn != $endCellColumn) || ($startCellRow != $endCellRow)) {
 | |
|             $cellAddress .= ':'.$endCellColumn.$endCellRow;
 | |
|         }
 | |
| 
 | |
|         if ($sheetName !== NULL) {
 | |
|             $pSheet = $pCell->getWorksheet()->getParent()->getSheetByName($sheetName);
 | |
|         } else {
 | |
|             $pSheet = $pCell->getWorksheet();
 | |
|         }
 | |
| 
 | |
|         return PHPExcel_Calculation::getInstance()->extractCellRange($cellAddress, $pSheet, False);
 | |
|     }    //    function OFFSET()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * CHOOSE
 | |
|      *
 | |
|      * Uses lookup_value to return a value from the list of value arguments.
 | |
|      * Use CHOOSE to select one of up to 254 values based on the lookup_value.
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =CHOOSE(index_num, value1, [value2], ...)
 | |
|      *
 | |
|      * @param    index_num        Specifies which value argument is selected.
 | |
|      *                            Index_num must be a number between 1 and 254, or a formula or reference to a cell containing a number
 | |
|      *                                between 1 and 254.
 | |
|      * @param    value1...        Value1 is required, subsequent values are optional.
 | |
|      *                            Between 1 to 254 value arguments from which CHOOSE selects a value or an action to perform based on
 | |
|      *                                index_num. The arguments can be numbers, cell references, defined names, formulas, functions, or
 | |
|      *                                text.
 | |
|      * @return    mixed            The selected value
 | |
|      */
 | |
|     public static function CHOOSE() {
 | |
|         $chooseArgs = func_get_args();
 | |
|         $chosenEntry = PHPExcel_Calculation_Functions::flattenArray(array_shift($chooseArgs));
 | |
|         $entryCount = count($chooseArgs) - 1;
 | |
| 
 | |
|         if(is_array($chosenEntry)) {
 | |
|             $chosenEntry = array_shift($chosenEntry);
 | |
|         }
 | |
|         if ((is_numeric($chosenEntry)) && (!is_bool($chosenEntry))) {
 | |
|             --$chosenEntry;
 | |
|         } else {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
|         $chosenEntry = floor($chosenEntry);
 | |
|         if (($chosenEntry < 0) || ($chosenEntry > $entryCount)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         if (is_array($chooseArgs[$chosenEntry])) {
 | |
|             return PHPExcel_Calculation_Functions::flattenArray($chooseArgs[$chosenEntry]);
 | |
|         } else {
 | |
|             return $chooseArgs[$chosenEntry];
 | |
|         }
 | |
|     }    //    function CHOOSE()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * MATCH
 | |
|      *
 | |
|      * The MATCH function searches for a specified item in a range of cells
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =MATCH(lookup_value, lookup_array, [match_type])
 | |
|      *
 | |
|      * @param    lookup_value    The value that you want to match in lookup_array
 | |
|      * @param    lookup_array    The range of cells being searched
 | |
|      * @param    match_type        The number -1, 0, or 1. -1 means above, 0 means exact match, 1 means below. If match_type is 1 or -1, the list has to be ordered.
 | |
|      * @return    integer            The relative position of the found item
 | |
|      */
 | |
|     public static function MATCH($lookup_value, $lookup_array, $match_type=1) {
 | |
|         $lookup_array = PHPExcel_Calculation_Functions::flattenArray($lookup_array);
 | |
|         $lookup_value = PHPExcel_Calculation_Functions::flattenSingleValue($lookup_value);
 | |
|         $match_type    = (is_null($match_type)) ? 1 : (int) PHPExcel_Calculation_Functions::flattenSingleValue($match_type);
 | |
|         //    MATCH is not case sensitive
 | |
|         $lookup_value = strtolower($lookup_value);
 | |
| 
 | |
|         //    lookup_value type has to be number, text, or logical values
 | |
|         if ((!is_numeric($lookup_value)) && (!is_string($lookup_value)) && (!is_bool($lookup_value))) {
 | |
|             return PHPExcel_Calculation_Functions::NA();
 | |
|         }
 | |
| 
 | |
|         //    match_type is 0, 1 or -1
 | |
|         if (($match_type !== 0) && ($match_type !== -1) && ($match_type !== 1)) {
 | |
|             return PHPExcel_Calculation_Functions::NA();
 | |
|         }
 | |
| 
 | |
|         //    lookup_array should not be empty
 | |
|         $lookupArraySize = count($lookup_array);
 | |
|         if ($lookupArraySize <= 0) {
 | |
|             return PHPExcel_Calculation_Functions::NA();
 | |
|         }
 | |
| 
 | |
|         //    lookup_array should contain only number, text, or logical values, or empty (null) cells
 | |
|         foreach($lookup_array as $i => $lookupArrayValue) {
 | |
|             //    check the type of the value
 | |
|             if ((!is_numeric($lookupArrayValue)) && (!is_string($lookupArrayValue)) &&
 | |
|                 (!is_bool($lookupArrayValue)) && (!is_null($lookupArrayValue))) {
 | |
|                 return PHPExcel_Calculation_Functions::NA();
 | |
|             }
 | |
|             //    convert strings to lowercase for case-insensitive testing
 | |
|             if (is_string($lookupArrayValue)) {
 | |
|                 $lookup_array[$i] = strtolower($lookupArrayValue);
 | |
|             }
 | |
|             if ((is_null($lookupArrayValue)) && (($match_type == 1) || ($match_type == -1))) {
 | |
|                 $lookup_array = array_slice($lookup_array,0,$i-1);
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         // if match_type is 1 or -1, the list has to be ordered
 | |
|         if ($match_type == 1) {
 | |
|             asort($lookup_array);
 | |
|             $keySet = array_keys($lookup_array);
 | |
|         } elseif($match_type == -1) {
 | |
|             arsort($lookup_array);
 | |
|             $keySet = array_keys($lookup_array);
 | |
|         }
 | |
| 
 | |
|         // **
 | |
|         // find the match
 | |
|         // **
 | |
|         // loop on the cells
 | |
| //        var_dump($lookup_array);
 | |
| //        echo '<br />';
 | |
|         foreach($lookup_array as $i => $lookupArrayValue) {
 | |
|             if (($match_type == 0) && ($lookupArrayValue == $lookup_value)) {
 | |
|                 //    exact match
 | |
|                 return ++$i;
 | |
|             } elseif (($match_type == -1) && ($lookupArrayValue <= $lookup_value)) {
 | |
| //                echo '$i = '.$i.' => ';
 | |
| //                var_dump($lookupArrayValue);
 | |
| //                echo '<br />';
 | |
| //                echo 'Keyset = ';
 | |
| //                var_dump($keySet);
 | |
| //                echo '<br />';
 | |
|                 $i = array_search($i,$keySet);
 | |
| //                echo '$i='.$i.'<br />';
 | |
|                 // if match_type is -1 <=> find the smallest value that is greater than or equal to lookup_value
 | |
|                 if ($i < 1){
 | |
|                     // 1st cell was allready smaller than the lookup_value
 | |
|                     break;
 | |
|                 } else {
 | |
|                     // the previous cell was the match
 | |
|                     return $keySet[$i-1]+1;
 | |
|                 }
 | |
|             } elseif (($match_type == 1) && ($lookupArrayValue >= $lookup_value)) {
 | |
| //                echo '$i = '.$i.' => ';
 | |
| //                var_dump($lookupArrayValue);
 | |
| //                echo '<br />';
 | |
| //                echo 'Keyset = ';
 | |
| //                var_dump($keySet);
 | |
| //                echo '<br />';
 | |
|                 $i = array_search($i,$keySet);
 | |
| //                echo '$i='.$i.'<br />';
 | |
|                 // if match_type is 1 <=> find the largest value that is less than or equal to lookup_value
 | |
|                 if ($i < 1){
 | |
|                     // 1st cell was allready bigger than the lookup_value
 | |
|                     break;
 | |
|                 } else {
 | |
|                     // the previous cell was the match
 | |
|                     return $keySet[$i-1]+1;
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         //    unsuccessful in finding a match, return #N/A error value
 | |
|         return PHPExcel_Calculation_Functions::NA();
 | |
|     }    //    function MATCH()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * INDEX
 | |
|      *
 | |
|      * Uses an index to choose a value from a reference or array
 | |
|      *
 | |
|      * Excel Function:
 | |
|      *        =INDEX(range_array, row_num, [column_num])
 | |
|      *
 | |
|      * @param    range_array        A range of cells or an array constant
 | |
|      * @param    row_num            The row in array from which to return a value. If row_num is omitted, column_num is required.
 | |
|      * @param    column_num        The column in array from which to return a value. If column_num is omitted, row_num is required.
 | |
|      * @return    mixed            the value of a specified cell or array of cells
 | |
|      */
 | |
|     public static function INDEX($arrayValues,$rowNum = 0,$columnNum = 0) {
 | |
| 
 | |
|         if (($rowNum < 0) || ($columnNum < 0)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         if (!is_array($arrayValues)) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         }
 | |
| 
 | |
|         $rowKeys = array_keys($arrayValues);
 | |
|         $columnKeys = @array_keys($arrayValues[$rowKeys[0]]);
 | |
| 
 | |
|         if ($columnNum > count($columnKeys)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         } elseif ($columnNum == 0) {
 | |
|             if ($rowNum == 0) {
 | |
|                 return $arrayValues;
 | |
|             }
 | |
|             $rowNum = $rowKeys[--$rowNum];
 | |
|             $returnArray = array();
 | |
|             foreach($arrayValues as $arrayColumn) {
 | |
|                 if (is_array($arrayColumn)) {
 | |
|                     if (isset($arrayColumn[$rowNum])) {
 | |
|                         $returnArray[] = $arrayColumn[$rowNum];
 | |
|                     } else {
 | |
|                         return $arrayValues[$rowNum];
 | |
|                     }
 | |
|                 } else {
 | |
|                     return $arrayValues[$rowNum];
 | |
|                 }
 | |
|             }
 | |
|             return $returnArray;
 | |
|         }
 | |
|         $columnNum = $columnKeys[--$columnNum];
 | |
|         if ($rowNum > count($rowKeys)) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         } elseif ($rowNum == 0) {
 | |
|             return $arrayValues[$columnNum];
 | |
|         }
 | |
|         $rowNum = $rowKeys[--$rowNum];
 | |
| 
 | |
|         return $arrayValues[$rowNum][$columnNum];
 | |
|     }    //    function INDEX()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * TRANSPOSE
 | |
|      *
 | |
|      * @param    array    $matrixData    A matrix of values
 | |
|      * @return    array
 | |
|      *
 | |
|      * Unlike the Excel TRANSPOSE function, which will only work on a single row or column, this function will transpose a full matrix.
 | |
|      */
 | |
|     public static function TRANSPOSE($matrixData) {
 | |
|         $returnMatrix = array();
 | |
|         if (!is_array($matrixData)) { $matrixData = array(array($matrixData)); }
 | |
| 
 | |
|         $column = 0;
 | |
|         foreach($matrixData as $matrixRow) {
 | |
|             $row = 0;
 | |
|             foreach($matrixRow as $matrixCell) {
 | |
|                 $returnMatrix[$row][$column] = $matrixCell;
 | |
|                 ++$row;
 | |
|             }
 | |
|             ++$column;
 | |
|         }
 | |
|         return $returnMatrix;
 | |
|     }    //    function TRANSPOSE()
 | |
| 
 | |
| 
 | |
|     private static function _vlookupSort($a,$b) {
 | |
|         $f = array_keys($a);
 | |
|         $firstColumn = array_shift($f);
 | |
|         if (strtolower($a[$firstColumn]) == strtolower($b[$firstColumn])) {
 | |
|             return 0;
 | |
|         }
 | |
|         return (strtolower($a[$firstColumn]) < strtolower($b[$firstColumn])) ? -1 : 1;
 | |
|     }    //    function _vlookupSort()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|     * VLOOKUP
 | |
|     * The VLOOKUP function searches for value in the left-most column of lookup_array and returns the value in the same row based on the index_number.
 | |
|     * @param    lookup_value    The value that you want to match in lookup_array
 | |
|     * @param    lookup_array    The range of cells being searched
 | |
|     * @param    index_number    The column number in table_array from which the matching value must be returned. The first column is 1.
 | |
|     * @param    not_exact_match    Determines if you are looking for an exact match based on lookup_value.
 | |
|     * @return    mixed            The value of the found cell
 | |
|     */
 | |
|     public static function VLOOKUP($lookup_value, $lookup_array, $index_number, $not_exact_match=true) {
 | |
|         $lookup_value    = PHPExcel_Calculation_Functions::flattenSingleValue($lookup_value);
 | |
|         $index_number    = PHPExcel_Calculation_Functions::flattenSingleValue($index_number);
 | |
|         $not_exact_match    = PHPExcel_Calculation_Functions::flattenSingleValue($not_exact_match);
 | |
| 
 | |
|         // index_number must be greater than or equal to 1
 | |
|         if ($index_number < 1) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         // index_number must be less than or equal to the number of columns in lookup_array
 | |
|         if ((!is_array($lookup_array)) || (empty($lookup_array))) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         } else {
 | |
|             $f = array_keys($lookup_array);
 | |
|             $firstRow = array_pop($f);
 | |
|             if ((!is_array($lookup_array[$firstRow])) || ($index_number > count($lookup_array[$firstRow]))) {
 | |
|                 return PHPExcel_Calculation_Functions::REF();
 | |
|             } else {
 | |
|                 $columnKeys = array_keys($lookup_array[$firstRow]);
 | |
|                 $returnColumn = $columnKeys[--$index_number];
 | |
|                 $firstColumn = array_shift($columnKeys);
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         if (!$not_exact_match) {
 | |
|             uasort($lookup_array,array('self','_vlookupSort'));
 | |
|         }
 | |
| 
 | |
|         $rowNumber = $rowValue = False;
 | |
|         foreach($lookup_array as $rowKey => $rowData) {
 | |
|             if ((is_numeric($lookup_value) && is_numeric($rowData[$firstColumn]) && ($rowData[$firstColumn] > $lookup_value)) ||
 | |
|                 (!is_numeric($lookup_value) && !is_numeric($rowData[$firstColumn]) && (strtolower($rowData[$firstColumn]) > strtolower($lookup_value)))) {
 | |
|                 break;
 | |
|             }
 | |
|             $rowNumber = $rowKey;
 | |
|             $rowValue = $rowData[$firstColumn];
 | |
|         }
 | |
| 
 | |
|         if ($rowNumber !== false) {
 | |
|             if ((!$not_exact_match) && ($rowValue != $lookup_value)) {
 | |
|                 //    if an exact match is required, we have what we need to return an appropriate response
 | |
|                 return PHPExcel_Calculation_Functions::NA();
 | |
|             } else {
 | |
|                 //    otherwise return the appropriate value
 | |
|                 return $lookup_array[$rowNumber][$returnColumn];
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         return PHPExcel_Calculation_Functions::NA();
 | |
|     }    //    function VLOOKUP()
 | |
| 
 | |
| 
 | |
| /**
 | |
|     * HLOOKUP
 | |
|     * The HLOOKUP function searches for value in the top-most row of lookup_array and returns the value in the same column based on the index_number.
 | |
|     * @param    lookup_value    The value that you want to match in lookup_array
 | |
|     * @param    lookup_array    The range of cells being searched
 | |
|     * @param    index_number    The row number in table_array from which the matching value must be returned. The first row is 1.
 | |
|     * @param    not_exact_match Determines if you are looking for an exact match based on lookup_value.
 | |
|     * @return   mixed           The value of the found cell
 | |
|     */
 | |
|     public static function HLOOKUP($lookup_value, $lookup_array, $index_number, $not_exact_match=true) {
 | |
|         $lookup_value   = PHPExcel_Calculation_Functions::flattenSingleValue($lookup_value);
 | |
|         $index_number   = PHPExcel_Calculation_Functions::flattenSingleValue($index_number);
 | |
|         $not_exact_match    = PHPExcel_Calculation_Functions::flattenSingleValue($not_exact_match);
 | |
| 
 | |
|         // index_number must be greater than or equal to 1
 | |
|         if ($index_number < 1) {
 | |
|             return PHPExcel_Calculation_Functions::VALUE();
 | |
|         }
 | |
| 
 | |
|         // index_number must be less than or equal to the number of columns in lookup_array
 | |
|         if ((!is_array($lookup_array)) || (empty($lookup_array))) {
 | |
|             return PHPExcel_Calculation_Functions::REF();
 | |
|         } else {
 | |
|             $f = array_keys($lookup_array);
 | |
|             $firstRow = array_pop($f);
 | |
|             if ((!is_array($lookup_array[$firstRow])) || ($index_number > count($lookup_array[$firstRow]))) {
 | |
|                 return PHPExcel_Calculation_Functions::REF();
 | |
|             } else {
 | |
|                 $columnKeys = array_keys($lookup_array[$firstRow]);
 | |
|                                 $firstkey = $f[0] - 1;
 | |
|                 $returnColumn = $firstkey + $index_number;
 | |
|                 $firstColumn = array_shift($f);
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         if (!$not_exact_match) {
 | |
|             $firstRowH = asort($lookup_array[$firstColumn]);
 | |
|         }
 | |
| 
 | |
|         $rowNumber = $rowValue = False;
 | |
|         foreach($lookup_array[$firstColumn] as $rowKey => $rowData) {
 | |
|             if ((is_numeric($lookup_value) && is_numeric($rowData) && ($rowData > $lookup_value)) ||
 | |
|                 (!is_numeric($lookup_value) && !is_numeric($rowData) && (strtolower($rowData) > strtolower($lookup_value)))) {
 | |
|                 break;
 | |
|             }
 | |
|             $rowNumber = $rowKey;
 | |
|             $rowValue = $rowData;
 | |
|         }
 | |
| 
 | |
|         if ($rowNumber !== false) {
 | |
|             if ((!$not_exact_match) && ($rowValue != $lookup_value)) {
 | |
|                 //  if an exact match is required, we have what we need to return an appropriate response
 | |
|                 return PHPExcel_Calculation_Functions::NA();
 | |
|             } else {
 | |
|                 //  otherwise return the appropriate value
 | |
|                 return $lookup_array[$returnColumn][$rowNumber];
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         return PHPExcel_Calculation_Functions::NA();
 | |
|     }   //  function HLOOKUP()
 | |
| 
 | |
| 
 | |
|     /**
 | |
|      * LOOKUP
 | |
|      * The LOOKUP function searches for value either from a one-row or one-column range or from an array.
 | |
|      * @param    lookup_value    The value that you want to match in lookup_array
 | |
|      * @param    lookup_vector    The range of cells being searched
 | |
|      * @param    result_vector    The column from which the matching value must be returned
 | |
|      * @return    mixed            The value of the found cell
 | |
|      */
 | |
|     public static function LOOKUP($lookup_value, $lookup_vector, $result_vector=null) {
 | |
|         $lookup_value    = PHPExcel_Calculation_Functions::flattenSingleValue($lookup_value);
 | |
| 
 | |
|         if (!is_array($lookup_vector)) {
 | |
|             return PHPExcel_Calculation_Functions::NA();
 | |
|         }
 | |
|         $lookupRows = count($lookup_vector);
 | |
|         $l = array_keys($lookup_vector);
 | |
|         $l = array_shift($l);
 | |
|         $lookupColumns = count($lookup_vector[$l]);
 | |
|         if ((($lookupRows == 1) && ($lookupColumns > 1)) || (($lookupRows == 2) && ($lookupColumns != 2))) {
 | |
|             $lookup_vector = self::TRANSPOSE($lookup_vector);
 | |
|             $lookupRows = count($lookup_vector);
 | |
|             $l = array_keys($lookup_vector);
 | |
|             $lookupColumns = count($lookup_vector[array_shift($l)]);
 | |
|         }
 | |
| 
 | |
|         if (is_null($result_vector)) {
 | |
|             $result_vector = $lookup_vector;
 | |
|         }
 | |
|         $resultRows = count($result_vector);
 | |
|         $l = array_keys($result_vector);
 | |
|         $l = array_shift($l);
 | |
|         $resultColumns = count($result_vector[$l]);
 | |
|         if ((($resultRows == 1) && ($resultColumns > 1)) || (($resultRows == 2) && ($resultColumns != 2))) {
 | |
|             $result_vector = self::TRANSPOSE($result_vector);
 | |
|             $resultRows = count($result_vector);
 | |
|             $r = array_keys($result_vector);
 | |
|             $resultColumns = count($result_vector[array_shift($r)]);
 | |
|         }
 | |
| 
 | |
|         if ($lookupRows == 2) {
 | |
|             $result_vector = array_pop($lookup_vector);
 | |
|             $lookup_vector = array_shift($lookup_vector);
 | |
|         }
 | |
|         if ($lookupColumns != 2) {
 | |
|             foreach($lookup_vector as &$value) {
 | |
|                 if (is_array($value)) {
 | |
|                     $k = array_keys($value);
 | |
|                     $key1 = $key2 = array_shift($k);
 | |
|                     $key2++;
 | |
|                     $dataValue1 = $value[$key1];
 | |
|                 } else {
 | |
|                     $key1 = 0;
 | |
|                     $key2 = 1;
 | |
|                     $dataValue1 = $value;
 | |
|                 }
 | |
|                 $dataValue2 = array_shift($result_vector);
 | |
|                 if (is_array($dataValue2)) {
 | |
|                     $dataValue2 = array_shift($dataValue2);
 | |
|                 }
 | |
|                 $value = array($key1 => $dataValue1, $key2 => $dataValue2);
 | |
|             }
 | |
|             unset($value);
 | |
|         }
 | |
| 
 | |
|         return self::VLOOKUP($lookup_value,$lookup_vector,2);
 | |
|      }    //    function LOOKUP()
 | |
| 
 | |
| }    //    class PHPExcel_Calculation_LookupRef
 | 
