Column switchers are extremely useful.
But they occupy a lot of space in a Dashboard, especially if there is a long column name:
![hogi_0-1683882600823.png hogi_0-1683882600823.png](https://community.jmp.com/t5/image/serverpage/image-id/52760i15A1BC806B010DC2/image-size/medium?v=v2&px=400)
Fortunately, the user can adjust the width by resizing the list box:
![hogi_1-1683882658641.png hogi_1-1683882658641.png](https://community.jmp.com/t5/image/serverpage/image-id/52761i18CD0B78EF382492/image-size/medium?v=v2&px=400)
Unfortunately, this change is not saved when saving the script.
Adjusting the width via set width doesn't seem to work:
Current Report()["Column Switcher",ListBox(4)] << get width() //works
Current Report()["Column Switcher",ListBox(4)] << set width(100) //doesn't have an effect
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt << New Column( "a nasty very long column name");
dt << Graph Builder(
Variables( X( :height ), Y( :weight ), Color( :sex ) ),
Elements( Points( X, Y, Legend( 11 ) ), Smoother( X, Y, Legend( 12 ) ) ),
Column Switcher(:sex,
{:sex,:a nasty very long column name}
)
);