Rev 2388 | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php/*** PHPExcel** Copyright (c) 2006 - 2013 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 - 2013 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 - 2013 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->getParent()->getParent()->getSheetByName($sheetName);} else {$pSheet = $pCell->getParent();}return PHPExcel_Calculation::getInstance()->extractNamedRange($cellAddress, $pSheet, FALSE);}if (strpos($cellAddress,'!') !== FALSE) {list($sheetName,$cellAddress) = explode('!',$cellAddress);$sheetName = trim($sheetName, "'");$pSheet = $pCell->getParent()->getParent()->getSheetByName($sheetName);} else {$pSheet = $pCell->getParent();}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->getParent()->getParent()->getSheetByName($sheetName);} else {$pSheet = $pCell->getParent();}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 valuesif ((!is_numeric($lookup_value)) && (!is_string($lookup_value)) && (!is_bool($lookup_value))) {return PHPExcel_Calculation_Functions::NA();}// match_type is 0, 1 or -1if (($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) cellsforeach($lookup_array as $i => $lookupArrayValue) {// check the type of the valueif ((!is_numeric($lookupArrayValue)) && (!is_string($lookupArrayValue)) &&(!is_bool($lookupArrayValue)) && (!is_null($lookupArrayValue))) {return PHPExcel_Calculation_Functions::NA();}// convert strings to lowercase for case-insensitive testingif (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 orderedif ($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 matchreturn ++$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_valueif ($i < 1){// 1st cell was allready smaller than the lookup_valuebreak;} else {// the previous cell was the matchreturn $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_valueif ($i < 1){// 1st cell was allready bigger than the lookup_valuebreak;} else {// the previous cell was the matchreturn $keySet[$i-1]+1;}}}// unsuccessful in finding a match, return #N/A error valuereturn 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 1if ($index_number < 1) {return PHPExcel_Calculation_Functions::VALUE();}// index_number must be less than or equal to the number of columns in lookup_arrayif ((!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 (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 responsereturn PHPExcel_Calculation_Functions::NA();} else {// otherwise return the appropriate valuereturn $lookup_array[$rowNumber][$returnColumn];}}return PHPExcel_Calculation_Functions::NA();} // function VLOOKUP()/*** 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