Script

hcarr01

Bonjour à tous,

 

Voici ma base de données :

 

 

 

J’aimerais pouvoir supprimer toutes les colonnes (de la 4ème à la dernière colonne).

J’utilise le script suivant mais cela ne fonctionne pas correctement.

 

<SPAN>dt22 = current data table();</SPAN><BR /><BR />max = N cols(dt22);<BR />
For (i=4 , i <= max , i++,
	dt22 << delete columns(i);
);

Merci pour vos réponses !

jthi

Easiest is most likely to use list of columns to remove with Delete Columns

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Semiconductor Capability.jmp");

col_names = dt << Get Column Names("String");
Remove From(col_names, 1, 4);
wait(2); // for demo purposes
dt << Delete Columns(col_names);

If you want to use For loop, loop from the end to avoid issues with indices changing.