// Assuming data book is active...
// Point to worksheet and column 1 of data sheet
range rsheet = !; // active sheet
range rcol=1;
// Create new book to hold parameter info
newbook;

// Loop over user paramter rows of in data sheet column
// Just have a large number for loop and then break out 
for(int ipar=1; ipar<=100; ipar++)
{
	string strParName$, strParValue$;
	strParName$ = rsheet.userparam$(ipar)$;
	strParValue$ = rcol[D$(ipar)]$;
	// If parameter name is empty, break
	if(0 == strParName.GetLength()) break;
	// Add to next column of new book/sheet which is active
	range rout = $(ipar);
	rout[L]$ = strParName$; // set long name using parameter name
	rout[1]$ = strParValue$; // set 1st row of col with value string of parameter
}

string str$,strParName$;
int idx;

// Range of my Worksheet I am looking at ...
range p=[Scans1]52190w01!;
// Index of UserParameter
idx=7;

// Access UserParameterName and Value Version 1 
type Version 1 works fine;
type p.userparam$(idx)$ + " = " + [Scans1]52190w01!col(4)[D$(idx)]$;

// Access UserParameterName and Value Version 2, which I need to update the Legend of my Graph.
// During Script execution the diagram is open in which the first Layer graphs Data:[Scans1]52190w01!col(4)
type Version 2 shows UserParamater1 or Worksheetname instead of UserParamater7;
strParName$ = p.userparam$(idx)$;
str$ ="%(strParName$) = %(1,@LD$(idx))";
type str$;