Page 1 sur 1
[R] Récupérer la dernière colonne utilisée d'un array
Posté : jeu. 10 déc. 2015 12:44
par Hugues
Bonjour,
J'ai un tableau qui est dimensionné $aArray[$x][80], soit 80 colonnes.
Je voudrais récupérer la dernière colonne utilisée et ce quelque soit la ligne, pour pouvoir supprimer les colonnes vides.
Exemple si la dernière colonne utilisée est la 30ème, alors je supprime les colonnes de 31 à 80...
J'ai cherché mais pas trouver de fonction...
Merci par avance.
Re: [..] Récupérer la dernière colonne utilisée d'un array
Posté : jeu. 10 déc. 2015 14:40
par mikell
Un truc comme ça pourrait marcher (pas testé)
Code : Tout sélectionner
Local $n = UBound($array, 2)
For $j = $n - 1 to 0 step -1
For $i = 0 to UBound($array)-1
If $array[$i][$j] <> "" Then Exitloop 2
Next
$n -= 1
Next
Redim $array[$i][$n]
Re: [..] Récupérer la dernière colonne utilisée d'un array
Posté : jeu. 10 déc. 2015 15:40
par orax
S'il y a un zéro dans une case du tableau elle sera considérée comme "vide".
Re: [..] Récupérer la dernière colonne utilisée d'un array
Posté : jeu. 10 déc. 2015 17:51
par mikell
Absolument.
Quand il arrive que je n'aie que 50 secondes pour répondre, c'est pour me prémunir contre la crypto-perfidie de certains commentaires (même justifiés) que je prends bien soin de mentionner "pourrait marcher" et "pas testé"
Re: [..] Récupérer la dernière colonne utilisée d'un array
Posté : jeu. 10 déc. 2015 20:28
par Hugues
Bon c'est bon ^^,
J'ai modifié le code pour mon script et c'est tout good !!!
Code : Tout sélectionner
Local $n = UBound($array, 2)
For $j = $n - 1 to 0 step -1
For $i = 0 to UBound($array)-1
If Not ($array[$i][$j] == "") Then Exitloop 2
Next
$n -= 1
Next
Redim $array[Ubound($array)][$n]
Sujet résolu ^^ Merki