Set Editiable rows with formula column

ComplexNerd

Hello guys,

 

 i am trying to create a datatble with user restricted  rows and columns. I have a default value column ( its default value for all column values in that row) i have coded this as formula in other columns ... but i am not able to have user input if i have formula ... i need flexibility for user to enter data 

n = 10;
rownList = {};
For(i=1, i<=n, i++,
	Insert Into(rownList, "Row " || Char(i));
);
dt =  New Table("Restricted Row Value Table",
	Add Rows(n),
	New Column( "Row Number",Character,"Nominal",Set Values(rownList),Color Cells( {77, {0}} ))
);
dt << New Column("Default Row State","Nominal",Color Cells( {-14803425, {0}} ));
For(i=1, i<=n, i++,
	dt << New Column("Column " || Char(i),"Nominal",
		Formula( If( Is Empty( :Default Row State ), Empty(), :Default Row State ) )
	);
);
dt << Set Edit Lock( "Add Rows", "Add Columns", "Delete Columns" );

how do i rewite formula such that it allows user input but takes default value if specified ... kindly guide... Thanks in advance

txnelson

This method for you might work.  Use a hidden column that has a formula that sets the value in a different column.  The column that has the value set remains editable, since it does not contain a column formula.

New Table( "Examplel",
	Add Rows( 10 ),
	New Column( "Default Row State",
		Numeric,
		"Continuous",
		Format( "Best", 12 ),
		Set Values( [., 3, ., ., 44, ., 8, ., ., .] )
	),
	New Column( "formula column",
		Numeric,
		"Continuous",
		Format( "Best", 12 ),
		Formula(
			If( Is Empty( :Default Row State ) & :Default Row State != :Formula Column,
				:Output Column[Row()] = .,
				:Output Column[Row()] = :Default Row State
			);
			:Formula Column = :Default Row State;
		),
		Hide
	),
	New Column( "Output Column",
		Numeric,
		"Continuous",
		Format( "Best", 12 ),
		Set Values( [., 3, ., ., 888, ., 8, ., ., .] )
	)
)