693151_it-IT

liliconcom

Celle di colore

CIAO,

 

Come posso oscurare le celle vuote o con punti?

Ho la versione 16.1.

Grazie

Accesso ai datiRi: Celle di colore

Se per oscuramento intendi cambiare il colore della cella, le opzioni più semplici sono molto probabilmente basate su script. Un'opzione è usare << Ottieni righe Dove ottenere le righe che vuoi colorare e poi usare << Colore celle per impostare il colore su quelle righe

Names Default To Here(1);

dt = Current Data Table();

For Each({colname}, dt << Get Column Names("String"),
 rows_to_color = dt << Get Rows Where(Is Missing(Column(dt, colname)[]));
 Column(dt, colname) << Color Cells("Gray", rows_to_color);
 dt << Clear Select;
);

 

Ri: Celle di colore

Se vuoi che venga fatto su ogni colonna, puoi usare questo script.

For Each( {col}, dt << Get Column Names( "String" ),
 Eval(
  Eval Expr(
   dt << Select Where( Is Missing( As Column( Expr( col ) ) ) );
   Expr( Column( col ) ) << Color Cells( "gray" );
   dt << Clear Select;
  )
 )
);

*modificare

Expr() e tutto ciò che è completamente inutile.@jthi lo ha sottolineato con il suo esempio.

For Each( {col}, dt << Get Column Names( "String" ),
 dt << Select Where( Is Missing( As Column( col ) ) );
 Column( col ) << Color Cells( "gray" );
 dt << Clear Select;
);

 

Ri: Celle di colore

@mmarchandTSI potresti anche voler aggiungere il controllo che alcune righe siano selezionate (<< Color Cells altrimenti colorerà tutte le celle).

Names Default To Here(1);

dt = New Table("Untitled",
 Add Rows(3),
 Compress File When Saved(1),
 New Column("Column 1", Numeric, "Continuous", Format("Best", 12), Set Values([., ., 1])),
 New Column("Column 2", Numeric, "Continuous", Format("Best", 12), Set Values([., ., .])),
 New Column("Column 3", Numeric, "Continuous", Format("Best", 12), Set Values([2, 3, 4]))
);

For Each({col}, dt << Get Column Names("String"),
 dt << Select Where(Is Missing(As Column(col)));
 Column(col) << Color Cells("gray");
 dt << Clear Select;
);
/*
For Each({col}, dt << Get Column Names("String"),
 dt << Select Where(Is Missing(As Column(col)));
 If(N Items(dt << Get Selected Rows) > 0,
  Column(col) << Color Cells("gray");
 );
 dt << Clear Select;
);
*/

Ri: Celle di colore

Dovrebbe andare bene, perché <

dt << Select Where( Is Missing( As Column( col ) ), current selection( "clear" ) )

Ri: Celle di colore

Ciao Jarmo,

 

Dove posso aggiungere questa opzione? scusate, sono nuovo nell'uso del software JMP.

Ri: Celle di colore

Quello che intendevo è che se non ci sono righe selezionate, tutte le celle in quella colonna saranno colorate.

 

In questo caso tutte le celle in Età verranno colorate perché non ci sono righe selezionate

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
wait(1);

:Age << Color Cells("Red");
wait(1);

dt << Select Rows([2,4,6,20]);
:Name << Color Cells("Blue");
dt << Clear Select;

 

Ri: Celle di colore

Sì, buon punto.

Ri: Celle di colore

A seconda di come verrà utilizzato, ci sono alcune opzioni. L'opzione più semplice e ciò che ti farà andare avanti è aprire un nuovo file di script dal menu File

Quindi copia e incolla lo script nella finestra che si aprirà

Controlla di avere la tabella corretta dalla "barra degli strumenti" in alto (dovrebbe essere se era attiva l'ultima volta quando hai aperto il nuovo file di script).

Quindi premere Esegui script dalla barra degli strumenti

 

Se è necessario eseguire questa operazione ripetutamente, è possibile trasformare lo script in un elemento della barra degli strumenti, in un componente aggiuntivo, in uno script di tabella, in un file di script... a seconda dell'uso

 

Ri: Celle di colore

Perfetto! Grazie per l'aiuto. Lo apprezzo molto.