Script

[#1]

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.

dt22 = current data table();

max = N cols(dt22);

For (i=4 , i <= max , i++,
	dt22 << delete columns(i);
);

Merci pour vos réponses !

[#2 · Accepted solution]

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.