1 files changed, 685 insertions, 0 deletions

diff --git a/admin/survey/excel/PHPExcel/ReferenceHelper.php b/admin/survey/excel/PHPExcel/ReferenceHelper.php
new file mode 100644
index 0000000..28b6318
--- /dev/null
+++ b/admin/survey/excel/PHPExcel/ReferenceHelper.php
@@ -0,0 +1,685 @@
+<?php

+/**

+ * PHPExcel

+ *

+ * Copyright (c) 2006 - 2012 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

+ * @copyright  Copyright (c) 2006 - 2012 PHPExcel (http://www.codeplex.com/PHPExcel)

+ * @license	http://www.gnu.org/licenses/old-licenses/lgpl-2.1.txt	LGPL

+ * @version	1.7.8, 2012-10-12

+ */

+

+

+/**

+ * PHPExcel_ReferenceHelper (Singleton)

+ *

+ * @category   PHPExcel

+ * @package	PHPExcel

+ * @copyright  Copyright (c) 2006 - 2012 PHPExcel (http://www.codeplex.com/PHPExcel)

+ */

+class PHPExcel_ReferenceHelper

+{

+	/**	Constants				*/

+	/**	Regular Expressions		*/

+	const REFHELPER_REGEXP_CELLREF		= '((\w*|\'[^!]*\')!)?(?<![:a-z\$])(\$?[a-z]{1,3}\$?\d+)(?=[^:!\d\'])';

+	const REFHELPER_REGEXP_CELLRANGE	= '((\w*|\'[^!]*\')!)?(\$?[a-z]{1,3}\$?\d+):(\$?[a-z]{1,3}\$?\d+)';

+	const REFHELPER_REGEXP_ROWRANGE		= '((\w*|\'[^!]*\')!)?(\$?\d+):(\$?\d+)';

+	const REFHELPER_REGEXP_COLRANGE		= '((\w*|\'[^!]*\')!)?(\$?[a-z]{1,3}):(\$?[a-z]{1,3})';

+

+	/**

+	 * Instance of this class

+	 *

+	 * @var PHPExcel_ReferenceHelper

+	 */

+	private static $_instance;

+

+	/**

+	 * Get an instance of this class

+	 *

+	 * @return PHPExcel_ReferenceHelper

+	 */

+	public static function getInstance() {

+		if (!isset(self::$_instance) || (self::$_instance === NULL)) {

+			self::$_instance = new PHPExcel_ReferenceHelper();

+		}

+

+		return self::$_instance;

+	}

+

+	/**

+	 * Create a new PHPExcel_ReferenceHelper

+	 */

+	protected function __construct() {

+	}

+

+	/**

+	 * Insert a new column, updating all possible related data

+	 *

+	 * @param	int	$pBefore	Insert before this one

+	 * @param	int	$pNumCols	Number of columns to insert

+	 * @param	int	$pNumRows	Number of rows to insert

+	 * @throws	Exception

+	 */

+	public function insertNewBefore($pBefore = 'A1', $pNumCols = 0, $pNumRows = 0, PHPExcel_Worksheet $pSheet = null) {

+		$aCellCollection = $pSheet->getCellCollection();

+

+		// Get coordinates of $pBefore

+		$beforeColumn	= 'A';

+		$beforeRow		= 1;

+		list($beforeColumn, $beforeRow) = PHPExcel_Cell::coordinateFromString( $pBefore );

+

+

+		// Clear cells if we are removing columns or rows

+		$highestColumn	= $pSheet->getHighestColumn();

+		$highestRow	= $pSheet->getHighestRow();

+

+		// 1. Clear column strips if we are removing columns

+		if ($pNumCols < 0 && PHPExcel_Cell::columnIndexFromString($beforeColumn) - 2 + $pNumCols > 0) {

+			for ($i = 1; $i <= $highestRow - 1; ++$i) {

+				for ($j = PHPExcel_Cell::columnIndexFromString($beforeColumn) - 1 + $pNumCols; $j <= PHPExcel_Cell::columnIndexFromString($beforeColumn) - 2; ++$j) {

+					$coordinate = PHPExcel_Cell::stringFromColumnIndex($j) . $i;

+					$pSheet->removeConditionalStyles($coordinate);

+					if ($pSheet->cellExists($coordinate)) {

+						$pSheet->getCell($coordinate)->setValueExplicit('', PHPExcel_Cell_DataType::TYPE_NULL);

+						$pSheet->getCell($coordinate)->setXfIndex(0);

+					}

+				}

+			}

+		}

+

+		// 2. Clear row strips if we are removing rows

+		if ($pNumRows < 0 && $beforeRow - 1 + $pNumRows > 0) {

+			for ($i = PHPExcel_Cell::columnIndexFromString($beforeColumn) - 1; $i <= PHPExcel_Cell::columnIndexFromString($highestColumn) - 1; ++$i) {

+				for ($j = $beforeRow + $pNumRows; $j <= $beforeRow - 1; ++$j) {

+					$coordinate = PHPExcel_Cell::stringFromColumnIndex($i) . $j;

+					$pSheet->removeConditionalStyles($coordinate);

+					if ($pSheet->cellExists($coordinate)) {

+						$pSheet->getCell($coordinate)->setValueExplicit('', PHPExcel_Cell_DataType::TYPE_NULL);

+						$pSheet->getCell($coordinate)->setXfIndex(0);

+					}

+				}

+			}

+		}

+

+

+		// Loop through cells, bottom-up, and change cell coordinates

+		while (($cellID = ($pNumCols < 0 || $pNumRows < 0) ? array_shift($aCellCollection) : array_pop($aCellCollection))) {

+			$cell = $pSheet->getCell($cellID);

+

+			// New coordinates

+			$newCoordinates = PHPExcel_Cell::stringFromColumnIndex( PHPExcel_Cell::columnIndexFromString($cell->getColumn()) - 1 + $pNumCols ) . ($cell->getRow() + $pNumRows);

+

+			// Should the cell be updated? Move value and cellXf index from one cell to another.

+			if ((PHPExcel_Cell::columnIndexFromString( $cell->getColumn() ) >= PHPExcel_Cell::columnIndexFromString($beforeColumn)) &&

+				($cell->getRow() >= $beforeRow)) {

+

+				// Update cell styles

+				$pSheet->getCell($newCoordinates)->setXfIndex($cell->getXfIndex());

+				$cell->setXfIndex(0);

+

+				// Insert this cell at its new location

+				if ($cell->getDataType() == PHPExcel_Cell_DataType::TYPE_FORMULA) {

+					// Formula should be adjusted

+					$pSheet->getCell($newCoordinates)

+						   ->setValue($this->updateFormulaReferences($cell->getValue(),

+						   					$pBefore, $pNumCols, $pNumRows, $pSheet->getTitle()));

+				} else {

+					// Formula should not be adjusted

+					$pSheet->getCell($newCoordinates)->setValue($cell->getValue());

+				}

+

+				// Clear the original cell

+				$pSheet->getCell($cell->getCoordinate())->setValue('');

+

+			} else {

+				/*	We don't need to update styles for rows/columns before our insertion position,

+						but we do still need to adjust any formulae	in those cells					*/

+				if ($cell->getDataType() == PHPExcel_Cell_DataType::TYPE_FORMULA) {

+					// Formula should be adjusted

+					$cell->setValue($this->updateFormulaReferences($cell->getValue(),

+										$pBefore, $pNumCols, $pNumRows, $pSheet->getTitle()));

+				}

+

+			}

+		}

+

+

+		// Duplicate styles for the newly inserted cells

+		$highestColumn	= $pSheet->getHighestColumn();

+		$highestRow	= $pSheet->getHighestRow();

+

+		if ($pNumCols > 0 && PHPExcel_Cell::columnIndexFromString($beforeColumn) - 2 > 0) {

+			for ($i = $beforeRow; $i <= $highestRow - 1; ++$i) {

+

+				// Style

+				$coordinate = PHPExcel_Cell::stringFromColumnIndex( PHPExcel_Cell::columnIndexFromString($beforeColumn) - 2 ) . $i;

+				if ($pSheet->cellExists($coordinate)) {

+					$xfIndex = $pSheet->getCell($coordinate)->getXfIndex();

+					$conditionalStyles = $pSheet->conditionalStylesExists($coordinate) ?

+						$pSheet->getConditionalStyles($coordinate) : false;

+					for ($j = PHPExcel_Cell::columnIndexFromString($beforeColumn) - 1; $j <= PHPExcel_Cell::columnIndexFromString($beforeColumn) - 2 + $pNumCols; ++$j) {

+						$pSheet->getCellByColumnAndRow($j, $i)->setXfIndex($xfIndex);

+						if ($conditionalStyles) {

+							$cloned = array();

+							foreach ($conditionalStyles as $conditionalStyle) {

+								$cloned[] = clone $conditionalStyle;

+							}

+							$pSheet->setConditionalStyles(PHPExcel_Cell::stringFromColumnIndex($j) . $i, $cloned);

+						}

+					}

+				}

+

+			}

+		}

+

+		if ($pNumRows > 0 && $beforeRow - 1 > 0) {

+			for ($i = PHPExcel_Cell::columnIndexFromString($beforeColumn) - 1; $i <= PHPExcel_Cell::columnIndexFromString($highestColumn) - 1; ++$i) {

+

+				// Style

+				$coordinate = PHPExcel_Cell::stringFromColumnIndex($i) . ($beforeRow - 1);

+				if ($pSheet->cellExists($coordinate)) {

+					$xfIndex = $pSheet->getCell($coordinate)->getXfIndex();

+					$conditionalStyles = $pSheet->conditionalStylesExists($coordinate) ?

+						$pSheet->getConditionalStyles($coordinate) : false;

+					for ($j = $beforeRow; $j <= $beforeRow - 1 + $pNumRows; ++$j) {

+						$pSheet->getCell(PHPExcel_Cell::stringFromColumnIndex($i) . $j)->setXfIndex($xfIndex);

+						if ($conditionalStyles) {

+							$cloned = array();

+							foreach ($conditionalStyles as $conditionalStyle) {

+								$cloned[] = clone $conditionalStyle;

+							}

+							$pSheet->setConditionalStyles(PHPExcel_Cell::stringFromColumnIndex($i) . $j, $cloned);

+						}

+					}

+				}

+			}

+		}

+

+

+		// Update worksheet: column dimensions

+		$aColumnDimensions = array_reverse($pSheet->getColumnDimensions(), true);

+		if (!empty($aColumnDimensions)) {

+			foreach ($aColumnDimensions as $objColumnDimension) {

+				$newReference = $this->updateCellReference($objColumnDimension->getColumnIndex() . '1', $pBefore, $pNumCols, $pNumRows);

+				list($newReference) = PHPExcel_Cell::coordinateFromString($newReference);

+				if ($objColumnDimension->getColumnIndex() != $newReference) {

+					$objColumnDimension->setColumnIndex($newReference);

+				}

+			}

+			$pSheet->refreshColumnDimensions();

+		}

+

+

+		// Update worksheet: row dimensions

+		$aRowDimensions = array_reverse($pSheet->getRowDimensions(), true);

+		if (!empty($aRowDimensions)) {

+			foreach ($aRowDimensions as $objRowDimension) {

+				$newReference = $this->updateCellReference('A' . $objRowDimension->getRowIndex(), $pBefore, $pNumCols, $pNumRows);

+				list(, $newReference) = PHPExcel_Cell::coordinateFromString($newReference);

+				if ($objRowDimension->getRowIndex() != $newReference) {

+					$objRowDimension->setRowIndex($newReference);

+				}

+			}

+			$pSheet->refreshRowDimensions();

+

+			$copyDimension = $pSheet->getRowDimension($beforeRow - 1);

+			for ($i = $beforeRow; $i <= $beforeRow - 1 + $pNumRows; ++$i) {

+				$newDimension = $pSheet->getRowDimension($i);

+				$newDimension->setRowHeight($copyDimension->getRowHeight());

+				$newDimension->setVisible($copyDimension->getVisible());

+				$newDimension->setOutlineLevel($copyDimension->getOutlineLevel());

+				$newDimension->setCollapsed($copyDimension->getCollapsed());

+			}

+		}

+

+

+		// Update worksheet: breaks

+		$aBreaks = array_reverse($pSheet->getBreaks(), true);

+		foreach ($aBreaks as $key => $value) {

+			$newReference = $this->updateCellReference($key, $pBefore, $pNumCols, $pNumRows);

+			if ($key != $newReference) {

+				$pSheet->setBreak( $newReference, $value );

+				$pSheet->setBreak( $key, PHPExcel_Worksheet::BREAK_NONE );

+			}

+		}

+

+		// Update worksheet: comments

+		$aComments = $pSheet->getComments();

+		$aNewComments = array(); // the new array of all comments

+		foreach ($aComments as $key => &$value) {

+			$newReference = $this->updateCellReference($key, $pBefore, $pNumCols, $pNumRows);

+			$aNewComments[$newReference] = $value;

+		}

+		$pSheet->setComments($aNewComments); // replace the comments array

+

+		// Update worksheet: hyperlinks

+		$aHyperlinkCollection = array_reverse($pSheet->getHyperlinkCollection(), true);

+		foreach ($aHyperlinkCollection as $key => $value) {

+			$newReference = $this->updateCellReference($key, $pBefore, $pNumCols, $pNumRows);

+			if ($key != $newReference) {

+				$pSheet->setHyperlink( $newReference, $value );

+				$pSheet->setHyperlink( $key, null );

+			}

+		}

+

+

+		// Update worksheet: data validations

+		$aDataValidationCollection = array_reverse($pSheet->getDataValidationCollection(), true);

+		foreach ($aDataValidationCollection as $key => $value) {

+			$newReference = $this->updateCellReference($key, $pBefore, $pNumCols, $pNumRows);

+			if ($key != $newReference) {

+				$pSheet->setDataValidation( $newReference, $value );

+				$pSheet->setDataValidation( $key, null );

+			}

+		}

+

+

+		// Update worksheet: merge cells

+		$aMergeCells = $pSheet->getMergeCells();

+		$aNewMergeCells = array(); // the new array of all merge cells

+		foreach ($aMergeCells as $key => &$value) {

+			$newReference = $this->updateCellReference($key, $pBefore, $pNumCols, $pNumRows);

+			$aNewMergeCells[$newReference] = $newReference;

+		}

+		$pSheet->setMergeCells($aNewMergeCells); // replace the merge cells array

+

+

+		// Update worksheet: protected cells

+		$aProtectedCells = array_reverse($pSheet->getProtectedCells(), true);

+		foreach ($aProtectedCells as $key => $value) {

+			$newReference = $this->updateCellReference($key, $pBefore, $pNumCols, $pNumRows);

+			if ($key != $newReference) {

+				$pSheet->protectCells( $newReference, $value, true );

+				$pSheet->unprotectCells( $key );

+			}

+		}

+

+

+		// Update worksheet: autofilter

+		$autoFilter = $pSheet->getAutoFilter();

+		$autoFilterRange = $autoFilter->getRange();

+		if (!empty($autoFilterRange)) {

+			if ($pNumCols != 0) {

+				$autoFilterColumns = array_keys($autoFilter->getColumns());

+				if (count($autoFilterColumns) > 0) {

+					list($column,$row) = sscanf($pBefore,'%[A-Z]%d');

+					$columnIndex = PHPExcel_Cell::columnIndexFromString($column);

+					list($rangeStart,$rangeEnd) = PHPExcel_Cell::rangeBoundaries($autoFilterRange);

+					if ($columnIndex <= $rangeEnd[0]) {

+						if ($pNumCols < 0) {

+							//	If we're actually deleting any columns that fall within the autofilter range,

+							//		then we delete any rules for those columns

+							$deleteColumn = $columnIndex + $pNumCols - 1;

+							$deleteCount = abs($pNumCols);

+							for ($i = 1; $i <= $deleteCount; ++$i) {

+								if (in_array(PHPExcel_Cell::stringFromColumnIndex($deleteColumn),$autoFilterColumns)) {

+									$autoFilter->clearColumn(PHPExcel_Cell::stringFromColumnIndex($deleteColumn));

+								}

+								++$deleteColumn;

+							}

+						}

+						$startCol = ($columnIndex > $rangeStart[0]) ? $columnIndex : $rangeStart[0];

+

+						//	Shuffle columns in autofilter range

+						if ($pNumCols > 0) {

+							//	For insert, we shuffle from end to beginning to avoid overwriting

+							$startColID = PHPExcel_Cell::stringFromColumnIndex($startCol-1);

+							$toColID = PHPExcel_Cell::stringFromColumnIndex($startCol+$pNumCols-1);

+							$endColID = PHPExcel_Cell::stringFromColumnIndex($rangeEnd[0]);

+

+							$startColRef = $startCol;

+							$endColRef = $rangeEnd[0];

+							$toColRef = $rangeEnd[0]+$pNumCols;

+

+							do {

+								$autoFilter->shiftColumn(PHPExcel_Cell::stringFromColumnIndex($endColRef-1),PHPExcel_Cell::stringFromColumnIndex($toColRef-1));

+								--$endColRef;

+								--$toColRef;

+							} while ($startColRef <= $endColRef);

+						} else {

+							//	For delete, we shuffle from beginning to end to avoid overwriting

+							$startColID = PHPExcel_Cell::stringFromColumnIndex($startCol-1);

+							$toColID = PHPExcel_Cell::stringFromColumnIndex($startCol+$pNumCols-1);

+							$endColID = PHPExcel_Cell::stringFromColumnIndex($rangeEnd[0]);

+							do {

+								$autoFilter->shiftColumn($startColID,$toColID);

+								++$startColID;

+								++$toColID;

+							} while ($startColID != $endColID);

+						}

+					}

+				}

+			}

+			$pSheet->setAutoFilter( $this->updateCellReference($autoFilterRange, $pBefore, $pNumCols, $pNumRows) );

+		}

+

+

+		// Update worksheet: freeze pane

+		if ($pSheet->getFreezePane() != '') {

+			$pSheet->freezePane( $this->updateCellReference($pSheet->getFreezePane(), $pBefore, $pNumCols, $pNumRows) );

+		}

+

+

+		// Page setup

+		if ($pSheet->getPageSetup()->isPrintAreaSet()) {

+			$pSheet->getPageSetup()->setPrintArea( $this->updateCellReference($pSheet->getPageSetup()->getPrintArea(), $pBefore, $pNumCols, $pNumRows) );

+		}

+

+

+		// Update worksheet: drawings

+		$aDrawings = $pSheet->getDrawingCollection();

+		foreach ($aDrawings as $objDrawing) {

+			$newReference = $this->updateCellReference($objDrawing->getCoordinates(), $pBefore, $pNumCols, $pNumRows);

+			if ($objDrawing->getCoordinates() != $newReference) {

+				$objDrawing->setCoordinates($newReference);

+			}

+		}

+

+

+		// Update workbook: named ranges

+		if (count($pSheet->getParent()->getNamedRanges()) > 0) {

+			foreach ($pSheet->getParent()->getNamedRanges() as $namedRange) {

+				if ($namedRange->getWorksheet()->getHashCode() == $pSheet->getHashCode()) {

+					$namedRange->setRange(

+						$this->updateCellReference($namedRange->getRange(), $pBefore, $pNumCols, $pNumRows)

+					);

+				}

+			}

+		}

+

+		// Garbage collect

+		$pSheet->garbageCollect();

+	}

+

+	/**

+	 * Update references within formulas

+	 *

+	 * @param	string	$pFormula	Formula to update

+	 * @param	int		$pBefore	Insert before this one

+	 * @param	int		$pNumCols	Number of columns to insert

+	 * @param	int		$pNumRows	Number of rows to insert

+	 * @return	string	Updated formula

+	 * @throws	Exception

+	 */

+	public function updateFormulaReferences($pFormula = '', $pBefore = 'A1', $pNumCols = 0, $pNumRows = 0, $sheetName = '') {

+		//	Update cell references in the formula

+		$formulaBlocks = explode('"',$pFormula);

+		$i = false;

+		foreach($formulaBlocks as &$formulaBlock) {

+			//	Ignore blocks that were enclosed in quotes (alternating entries in the $formulaBlocks array after the explode)

+			if ($i = !$i) {

+				$adjustCount = 0;

+				$newCellTokens = $cellTokens = array();

+				//	Search for row ranges (e.g. 'Sheet1'!3:5 or 3:5) with or without $ absolutes (e.g. $3:5)

+				$matchCount = preg_match_all('/'.self::REFHELPER_REGEXP_ROWRANGE.'/i', ' '.$formulaBlock.' ', $matches, PREG_SET_ORDER);

+				if ($matchCount > 0) {

+					foreach($matches as $match) {

+						$fromString = ($match[2] > '') ? $match[2].'!' : '';

+						$fromString .= $match[3].':'.$match[4];

+						$modified3 = substr($this->updateCellReference('$A'.$match[3],$pBefore,$pNumCols,$pNumRows),2);

+						$modified4 = substr($this->updateCellReference('$A'.$match[4],$pBefore,$pNumCols,$pNumRows),2);

+

+						if ($match[3].':'.$match[4] !== $modified3.':'.$modified4) {

+							if (($match[2] == '') || (trim($match[2],"'") == $sheetName)) {

+								$toString = ($match[2] > '') ? $match[2].'!' : '';

+								$toString .= $modified3.':'.$modified4;

+								//	Max worksheet size is 1,048,576 rows by 16,384 columns in Excel 2007, so our adjustments need to be at least one digit more

+								$column = 100000;

+								$row = 10000000+trim($match[3],'$');

+								$cellIndex = $column.$row;

+

+								$newCellTokens[$cellIndex] = preg_quote($toString);

+								$cellTokens[$cellIndex] = '/(?<!\d)'.preg_quote($fromString).'(?!\d)/i';

+								++$adjustCount;

+							}

+						}

+					}

+				}

+				//	Search for column ranges (e.g. 'Sheet1'!C:E or C:E) with or without $ absolutes (e.g. $C:E)

+				$matchCount = preg_match_all('/'.self::REFHELPER_REGEXP_COLRANGE.'/i', ' '.$formulaBlock.' ', $matches, PREG_SET_ORDER);

+				if ($matchCount > 0) {

+					foreach($matches as $match) {

+						$fromString = ($match[2] > '') ? $match[2].'!' : '';

+						$fromString .= $match[3].':'.$match[4];

+						$modified3 = substr($this->updateCellReference($match[3].'$1',$pBefore,$pNumCols,$pNumRows),0,-2);

+						$modified4 = substr($this->updateCellReference($match[4].'$1',$pBefore,$pNumCols,$pNumRows),0,-2);

+

+						if ($match[3].':'.$match[4] !== $modified3.':'.$modified4) {

+							if (($match[2] == '') || (trim($match[2],"'") == $sheetName)) {

+								$toString = ($match[2] > '') ? $match[2].'!' : '';

+								$toString .= $modified3.':'.$modified4;

+								//	Max worksheet size is 1,048,576 rows by 16,384 columns in Excel 2007, so our adjustments need to be at least one digit more

+								$column = PHPExcel_Cell::columnIndexFromString(trim($match[3],'$')) + 100000;

+								$row = 10000000;

+								$cellIndex = $column.$row;

+

+								$newCellTokens[$cellIndex] = preg_quote($toString);

+								$cellTokens[$cellIndex] = '/(?<![A-Z])'.preg_quote($fromString).'(?![A-Z])/i';

+								++$adjustCount;

+							}

+						}

+					}

+				}

+				//	Search for cell ranges (e.g. 'Sheet1'!A3:C5 or A3:C5) with or without $ absolutes (e.g. $A1:C$5)

+				$matchCount = preg_match_all('/'.self::REFHELPER_REGEXP_CELLRANGE.'/i', ' '.$formulaBlock.' ', $matches, PREG_SET_ORDER);

+				if ($matchCount > 0) {

+					foreach($matches as $match) {

+						$fromString = ($match[2] > '') ? $match[2].'!' : '';

+						$fromString .= $match[3].':'.$match[4];

+						$modified3 = $this->updateCellReference($match[3],$pBefore,$pNumCols,$pNumRows);

+						$modified4 = $this->updateCellReference($match[4],$pBefore,$pNumCols,$pNumRows);

+

+						if ($match[3].$match[4] !== $modified3.$modified4) {

+							if (($match[2] == '') || (trim($match[2],"'") == $sheetName)) {

+								$toString = ($match[2] > '') ? $match[2].'!' : '';

+								$toString .= $modified3.':'.$modified4;

+								list($column,$row) = PHPExcel_Cell::coordinateFromString($match[3]);

+								//	Max worksheet size is 1,048,576 rows by 16,384 columns in Excel 2007, so our adjustments need to be at least one digit more

+								$column = PHPExcel_Cell::columnIndexFromString(trim($column,'$')) + 100000;

+								$row = trim($row,'$') + 10000000;

+								$cellIndex = $column.$row;

+

+								$newCellTokens[$cellIndex] = preg_quote($toString);

+								$cellTokens[$cellIndex] = '/(?<![A-Z])'.preg_quote($fromString).'(?!\d)/i';

+								++$adjustCount;

+							}

+						}

+					}

+				}

+				//	Search for cell references (e.g. 'Sheet1'!A3 or C5) with or without $ absolutes (e.g. $A1 or C$5)

+				$matchCount = preg_match_all('/'.self::REFHELPER_REGEXP_CELLREF.'/i', ' '.$formulaBlock.' ', $matches, PREG_SET_ORDER);

+				if ($matchCount > 0) {

+					foreach($matches as $match) {

+						$fromString = ($match[2] > '') ? $match[2].'!' : '';

+						$fromString .= $match[3];

+						$modified3 = $this->updateCellReference($match[3],$pBefore,$pNumCols,$pNumRows);

+

+						if ($match[3] !== $modified3) {

+							if (($match[2] == '') || (trim($match[2],"'") == $sheetName)) {

+								$toString = ($match[2] > '') ? $match[2].'!' : '';

+								$toString .= $modified3;

+								list($column,$row) = PHPExcel_Cell::coordinateFromString($match[3]);

+								//	Max worksheet size is 1,048,576 rows by 16,384 columns in Excel 2007, so our adjustments need to be at least one digit more

+								$column = PHPExcel_Cell::columnIndexFromString(trim($column,'$')) + 100000;

+								$row = trim($row,'$') + 10000000;

+								$cellIndex = $column.$row;

+

+								$newCellTokens[$cellIndex] = preg_quote($toString);

+								$cellTokens[$cellIndex] = '/(?<![A-Z])'.preg_quote($fromString).'(?!\d)/i';

+								++$adjustCount;

+							}

+						}

+					}

+				}

+				if ($adjustCount > 0) {

+					krsort($cellTokens);

+					krsort($newCellTokens);

+					//	Update cell references in the formula

+					$formulaBlock = str_replace('\\','',preg_replace($cellTokens,$newCellTokens,$formulaBlock));

+				}

+			}

+		}

+		unset($formulaBlock);

+

+		//	Then rebuild the formula string

+		return implode('"',$formulaBlocks);

+	}

+

+	/**

+	 * Update cell reference

+	 *

+	 * @param	string	$pCellRange			Cell range

+	 * @param	int		$pBefore			Insert before this one

+	 * @param	int		$pNumCols			Number of columns to increment

+	 * @param	int		$pNumRows			Number of rows to increment

+	 * @return	string	Updated cell range

+	 * @throws	Exception

+	 */

+	public function updateCellReference($pCellRange = 'A1', $pBefore = 'A1', $pNumCols = 0, $pNumRows = 0) {

+		// Is it in another worksheet? Will not have to update anything.

+		if (strpos($pCellRange, "!") !== false) {

+			return $pCellRange;

+		// Is it a range or a single cell?

+		} elseif (strpos($pCellRange, ':') === false && strpos($pCellRange, ',') === false) {

+			// Single cell

+			return $this->_updateSingleCellReference($pCellRange, $pBefore, $pNumCols, $pNumRows);

+		} elseif (strpos($pCellRange, ':') !== false || strpos($pCellRange, ',') !== false) {

+			// Range

+			return $this->_updateCellRange($pCellRange, $pBefore, $pNumCols, $pNumRows);

+		} else {

+			// Return original

+			return $pCellRange;

+		}

+	}

+

+	/**

+	 * Update named formulas (i.e. containing worksheet references / named ranges)

+	 *

+	 * @param PHPExcel $pPhpExcel	Object to update

+	 * @param string $oldName		Old name (name to replace)

+	 * @param string $newName		New name

+	 */

+	public function updateNamedFormulas(PHPExcel $pPhpExcel, $oldName = '', $newName = '') {

+		if ($oldName == '') {

+			return;

+		}

+

+		foreach ($pPhpExcel->getWorksheetIterator() as $sheet) {

+			foreach ($sheet->getCellCollection(false) as $cellID) {

+				$cell = $sheet->getCell($cellID);

+				if (($cell !== NULL) && ($cell->getDataType() == PHPExcel_Cell_DataType::TYPE_FORMULA)) {

+					$formula = $cell->getValue();

+					if (strpos($formula, $oldName) !== false) {

+						$formula = str_replace("'" . $oldName . "'!", "'" . $newName . "'!", $formula);

+						$formula = str_replace($oldName . "!", $newName . "!", $formula);

+						$cell->setValueExplicit($formula, PHPExcel_Cell_DataType::TYPE_FORMULA);

+					}

+				}

+			}

+		}

+	}

+

+	/**

+	 * Update cell range

+	 *

+	 * @param	string	$pCellRange			Cell range	(e.g. 'B2:D4', 'B:C' or '2:3')

+	 * @param	int		$pBefore			Insert before this one

+	 * @param	int		$pNumCols			Number of columns to increment

+	 * @param	int		$pNumRows			Number of rows to increment

+	 * @return	string	Updated cell range

+	 * @throws	Exception

+	 */

+	private function _updateCellRange($pCellRange = 'A1:A1', $pBefore = 'A1', $pNumCols = 0, $pNumRows = 0) {

+		if (strpos($pCellRange,':') !== false || strpos($pCellRange, ',') !== false) {

+			// Update range

+			$range = PHPExcel_Cell::splitRange($pCellRange);

+			$ic = count($range);

+			for ($i = 0; $i < $ic; ++$i) {

+				$jc = count($range[$i]);

+				for ($j = 0; $j < $jc; ++$j) {

+					if (ctype_alpha($range[$i][$j])) {

+						$r = PHPExcel_Cell::coordinateFromString($this->_updateSingleCellReference($range[$i][$j].'1', $pBefore, $pNumCols, $pNumRows));

+						$range[$i][$j] = $r[0];

+					} elseif(ctype_digit($range[$i][$j])) {

+						$r = PHPExcel_Cell::coordinateFromString($this->_updateSingleCellReference('A'.$range[$i][$j], $pBefore, $pNumCols, $pNumRows));

+						$range[$i][$j] = $r[1];

+					} else {

+						$range[$i][$j] = $this->_updateSingleCellReference($range[$i][$j], $pBefore, $pNumCols, $pNumRows);

+					}

+				}

+			}

+

+			// Recreate range string

+			return PHPExcel_Cell::buildRange($range);

+		} else {

+			throw new Exception("Only cell ranges may be passed to this method.");

+		}

+	}

+

+	/**

+	 * Update single cell reference

+	 *

+	 * @param	string	$pCellReference		Single cell reference

+	 * @param	int		$pBefore			Insert before this one

+	 * @param	int		$pNumCols			Number of columns to increment

+	 * @param	int		$pNumRows			Number of rows to increment

+	 * @return	string	Updated cell reference

+	 * @throws	Exception

+	 */

+	private function _updateSingleCellReference($pCellReference = 'A1', $pBefore = 'A1', $pNumCols = 0, $pNumRows = 0) {

+		if (strpos($pCellReference, ':') === false && strpos($pCellReference, ',') === false) {

+			// Get coordinates of $pBefore

+			list($beforeColumn, $beforeRow) = PHPExcel_Cell::coordinateFromString( $pBefore );

+

+			// Get coordinates of $pCellReference

+			list($newColumn, $newRow) = PHPExcel_Cell::coordinateFromString( $pCellReference );

+

+			// Verify which parts should be updated

+			$updateColumn = (($newColumn{0} != '$') && ($beforeColumn{0} != '$') &&

+							 PHPExcel_Cell::columnIndexFromString($newColumn) >= PHPExcel_Cell::columnIndexFromString($beforeColumn));

+

+			$updateRow = (($newRow{0} != '$') && ($beforeRow{0} != '$') &&

+						  $newRow >= $beforeRow);

+

+			// Create new column reference

+			if ($updateColumn) {

+				$newColumn	= PHPExcel_Cell::stringFromColumnIndex( PHPExcel_Cell::columnIndexFromString($newColumn) - 1 + $pNumCols );

+			}

+

+			// Create new row reference

+			if ($updateRow) {

+				$newRow	= $newRow + $pNumRows;

+			}

+

+			// Return new reference

+			return $newColumn . $newRow;

+		} else {

+			throw new Exception("Only single cell references may be passed to this method.");

+		}

+	}

+

+	/**

+	 * __clone implementation. Cloning should not be allowed in a Singleton!

+	 *

+	 * @throws	Exception

+	 */

+	public final function __clone() {

+		throw new Exception("Cloning a Singleton is not allowed!");

+	}

+}