OVH Cloud OVH Cloud

RemoveItem avec MSFlexgrid

3 réponses
Avatar
RENAUD Eric
Bonjour,

Après avoir affiché le résultat d'une requête dans un MSFlexgrid, je
souhaite effacer les lignes présentes puis réafficher tout.
Le potgramme ne veut pas effacer la dernière ligne de données. Comment faire
?

Je peux utiliser la méthode Clear mais elle efface également les titres ce
qui prend du temps au ré-affichage.
Quelqu'un a t'il une solution ?

D'avance merci

3 réponses

Avatar
Driss HANIB
Tu peux faire de la sorte
Sub VideGrille()
Dim I as long
With Flexgrid
.rows=2 ' ligne de titre + première ligne
for i = 0 to .cols-1
.textmatrix(0,i) = vbnullstring
next
end with
end sub

Driss


"RENAUD Eric" a écrit dans le message de
news:
Bonjour,

Après avoir affiché le résultat d'une requête dans un MSFlexgrid, je
souhaite effacer les lignes présentes puis réafficher tout.
Le potgramme ne veut pas effacer la dernière ligne de données. Comment


faire
?

Je peux utiliser la méthode Clear mais elle efface également les titres ce
qui prend du temps au ré-affichage.
Quelqu'un a t'il une solution ?

D'avance merci




Avatar
RENAUD Eric
Ton code est bien mais il efface le contenu mais pas physiquement les
lignes.
Je ne crois pas que tu as compris mon probléme.
Exemple :
J'affiche trois lignes suivant une requête.
Si je réaffiche tout, mais 3 lignes restent et s'ajoutent à celles que je
viens de recharger.
Je veux donc supprimer toutes les lignes du MSFlexgrid avant de tout
recharger.
La méthode RemoveItem paraissait pratique sauf qu'elle ne veut pas effacer
la dernière ligne.

"Driss HANIB" a écrit dans le message de news:

Tu peux faire de la sorte
Sub VideGrille()
Dim I as long
With Flexgrid
.rows=2 ' ligne de titre + première ligne
for i = 0 to .cols-1
.textmatrix(0,i) = vbnullstring
next
end with
end sub

Driss


"RENAUD Eric" a écrit dans le message de
news:
Bonjour,

Après avoir affiché le résultat d'une requête dans un MSFlexgrid, je
souhaite effacer les lignes présentes puis réafficher tout.
Le potgramme ne veut pas effacer la dernière ligne de données. Comment


faire
?

Je peux utiliser la méthode Clear mais elle efface également les titres
ce
qui prend du temps au ré-affichage.
Quelqu'un a t'il une solution ?

D'avance merci








Avatar
Driss HANIB
re..

as tu essayé mon code, car tu verrais que :

MsFlexgrid.rows = 2

efface toutes les lignes (physiquement) si on considère que la première
lignes et fixée (titre)

cela marche très bien chez moi
effectivement, la deuxième ligne (notée 1) dans msflexgrid est alors vidée
manuellement..

tu obtiens donc un tableau à 2 lignes dont la première contient les titres
et la deuxième est une ligne vide !

Driss
"RENAUD Eric" a écrit dans le message de
news:
Ton code est bien mais il efface le contenu mais pas physiquement les
lignes.
Je ne crois pas que tu as compris mon probléme.
Exemple :
J'affiche trois lignes suivant une requête.
Si je réaffiche tout, mais 3 lignes restent et s'ajoutent à celles que je
viens de recharger.
Je veux donc supprimer toutes les lignes du MSFlexgrid avant de tout
recharger.
La méthode RemoveItem paraissait pratique sauf qu'elle ne veut pas effacer
la dernière ligne.

"Driss HANIB" a écrit dans le message de news:

> Tu peux faire de la sorte
> Sub VideGrille()
> Dim I as long
> With Flexgrid
> .rows=2 ' ligne de titre + première ligne
> for i = 0 to .cols-1
> .textmatrix(0,i) = vbnullstring
> next
> end with
> end sub
>
> Driss
>
>
> "RENAUD Eric" a écrit dans le message de
> news:
>> Bonjour,
>>
>> Après avoir affiché le résultat d'une requête dans un MSFlexgrid, je
>> souhaite effacer les lignes présentes puis réafficher tout.
>> Le potgramme ne veut pas effacer la dernière ligne de données. Comment
> faire
>> ?
>>
>> Je peux utiliser la méthode Clear mais elle efface également les titres
>> ce
>> qui prend du temps au ré-affichage.
>> Quelqu'un a t'il une solution ?
>>
>> D'avance merci
>>
>>
>
>