forked from sheetjs/sheetjs
SheetJS
0a57229d3b
- CFB prevent infinite loop (h/t @rossj) - pass updated eslint checks (fixes #1726 h/t @BjoernRave) - defined name proper encoding (fixes #1785 h/t @laohe98) - correct theme color order (fixes #389 h/t @foreverpw) - ODS / XLML more aggressive flagging of stub cells - cellStyles implies sheetStubs - updated SSF to 0.10.3
61 lines
2.2 KiB
JavaScript
61 lines
2.2 KiB
JavaScript
/* TODO: it will be useful to parse the function str */
|
|
var rc_to_a1 = (function(){
|
|
var rcregex = /(^|[^A-Za-z_])R(\[?-?\d+\]|[1-9]\d*|)C(\[?-?\d+\]|[1-9]\d*|)(?![A-Za-z0-9_])/g;
|
|
var rcbase/*:Cell*/ = ({r:0,c:0}/*:any*/);
|
|
function rcfunc($$,$1,$2,$3) {
|
|
var cRel = false, rRel = false;
|
|
|
|
if($2.length == 0) rRel = true;
|
|
else if($2.charAt(0) == "[") { rRel = true; $2 = $2.slice(1, -1); }
|
|
|
|
if($3.length == 0) cRel = true;
|
|
else if($3.charAt(0) == "[") { cRel = true; $3 = $3.slice(1, -1); }
|
|
|
|
var R = $2.length>0?parseInt($2,10)|0:0, C = $3.length>0?parseInt($3,10)|0:0;
|
|
|
|
if(cRel) C += rcbase.c; else --C;
|
|
if(rRel) R += rcbase.r; else --R;
|
|
return $1 + (cRel ? "" : "$") + encode_col(C) + (rRel ? "" : "$") + encode_row(R);
|
|
}
|
|
return function rc_to_a1(fstr/*:string*/, base/*:Cell*/)/*:string*/ {
|
|
rcbase = base;
|
|
return fstr.replace(rcregex, rcfunc);
|
|
};
|
|
})();
|
|
|
|
var crefregex = /(^|[^._A-Z0-9])([$]?)([A-Z]{1,2}|[A-W][A-Z]{2}|X[A-E][A-Z]|XF[A-D])([$]?)(10[0-3]\d{4}|104[0-7]\d{3}|1048[0-4]\d{2}|10485[0-6]\d|104857[0-6]|[1-9]\d{0,5})(?![_.\(A-Za-z0-9])/g;
|
|
var a1_to_rc =(function(){
|
|
return function a1_to_rc(fstr/*:string*/, base/*:CellAddress*/) {
|
|
return fstr.replace(crefregex, function($0, $1, $2, $3, $4, $5) {
|
|
var c = decode_col($3) - ($2 ? 0 : base.c);
|
|
var r = decode_row($5) - ($4 ? 0 : base.r);
|
|
var R = (r == 0 ? "" : !$4 ? "[" + r + "]" : (r+1));
|
|
var C = (c == 0 ? "" : !$2 ? "[" + c + "]" : (c+1));
|
|
return $1 + "R" + R + "C" + C;
|
|
});
|
|
};
|
|
})();
|
|
|
|
/* no defined name can collide with a valid cell address A1:XFD1048576 ... except LOG10! */
|
|
function shift_formula_str(f/*:string*/, delta/*:Cell*/)/*:string*/ {
|
|
return f.replace(crefregex, function($0, $1, $2, $3, $4, $5) {
|
|
return $1+($2=="$" ? $2+$3 : encode_col(decode_col($3)+delta.c))+($4=="$" ? $4+$5 : encode_row(decode_row($5) + delta.r));
|
|
});
|
|
}
|
|
|
|
function shift_formula_xlsx(f/*:string*/, range/*:string*/, cell/*:string*/)/*:string*/ {
|
|
var r = decode_range(range), s = r.s, c = decode_cell(cell);
|
|
var delta = {r:c.r - s.r, c:c.c - s.c};
|
|
return shift_formula_str(f, delta);
|
|
}
|
|
|
|
/* TODO: parse formula */
|
|
function fuzzyfmla(f/*:string*/)/*:boolean*/ {
|
|
if(f.length == 1) return false;
|
|
return true;
|
|
}
|
|
|
|
function _xlfn(f/*:string*/)/*:string*/ {
|
|
return f.replace(/_xlfn\./g,"");
|
|
}
|