<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />J'ai un script dans lequel je dois déterminer la couleur spécifique des cellules d'un tableau de données.Je peux trouver des messages qui peuvent être envoyés à des cellules spécifiques pour les colorer, mais mes recherches n'ont de toute façon pas réussi à récupérer la couleur de cellules spécifiques.Quelqu'un a-t-il une solution?
Merci pour la réponse rapide. La fonction fonctionne bien. J'ai dû le modifier un peu pour gérer le cas où toutes les cellules d'une colonne ont été définies sur la même couleur.
Jim Nelson,
Envoyé de Windows Mail
Les couleurs des cellules semblent être stockées dans une liste hiérarchique mais moi aussi, je ne trouve pas de moyen simple d'y accéder.
Essayez quelque chose comme ceci :
//Exemple de tableau
dt = Nouveau tableau ( "test" ,
Ajouter des lignes ( 5 ) ,
Nouvelle colonne ( "X" ,
Numérique ,
Continu ,
Format ( "Meilleur" , 12 ) ,
Cellules de couleur ( {{ 38 , { 1 }} , { 9 , { 2 }} , { 74 , { 3 , 4 }}} ) ,
Définir la sélection ,
Définir les valeurs ( [ 1 , 2 , 3 , 4 , 5 ] )
)
) ;
// Définir la fonction
get_cell_color = Fonction ( { col , r } ,
s = col << obtenir le script ;
//Localiser l'argument "Color Cells" dans le script de colonne
Pour ( je = 1 , je <= N Arg ( s ) , je ++,
Si ( Nom du chef ( Arg ( s , je ) ) == "Cellules de couleur" ,
p = je ;
Casser () ;
)
) ;
//Identifie la sous-liste qui contient la couleur de la ligne r
L = Arg ( Arg ( s , p ) , 1 ) ;
Pour ( je = 1 , N articles ( L ) , je ++,
Si ( N rangée ( Lieu ( L [ je ][ 2 ] , r ) ) == 1 ,
couleur = L [ je ][ 1 ] ;
Casser () ;
)
) ;
couleur ;
) ;
// Exécute la fonction pour trouver la couleur de la quatrième ligne de la première colonne
couleur de cellule = get_cell_color ( Colonne ( 1 ) , 4 ) ;
// Confirmer..
Nouvelle fenetre ( "couleur" ,
Boîte d'espacement ( taille ( 200 , 100 ) , couleur ( couleur de cellule ) )
) ;
