Discussion :

[noob_vba]

Bonjour,

Je voudrais faire un compteur qui m'affiche le nombre de ligne restante lors du traitement de mon programme par exemple grace a une message box mais je ne voudrait pas avoir a cliquer sur le boutton ok.

j'ai essayer plusieur méthodes comme :

msgbox ("mon message") vbInformation
msgbox ("mon message") vb

puis plusieur constante présent dans l'aide de VB mais j'ai pas réussie a enlever le boutton ok si quelqu'un sais comment faire merci de me faire signe je continue a chercher de mon coter et vous tient au courrant

Merci

[jmfmarques]

Je ne sais pas si tu mérites vraiment ma réponse, noob

Bon...
On n'utilise pas pour celà un msgbox (modal et dont la vocation est précisément d'attendre l'intervention de l'utilisateur), mais un simple Label avec la propriété visible duquel on joue au besoin.

[noob_vba]

Puis-je en mériter une deuxiemes ? s'il te plait

Oui un label serrais la bonne solution si on avais un formulaire mais on n'en a pas malheuresement je sa m'ennuie d'en crée un jsute pour sa.

Existe t'il un autre moyen ?

Merci encore grand chef

Merci beaucoup.

[noob_vba]

Je ne m'érite pas une deuxieme réponse

Comment me rattrapper ?

Non sérieusement comment faire si quelqu'un d'autre peut m'aidez qu'il me le fasse parvenir

Merci

[Catbull]

Personnellement j'utilise la solution de jmf : un label placé sur une form dédiée. La form est sans bordure et le label au dimension de la form. Je place un timer sur la form afin de définir le temps au bout duquel la form disparait.

Pour appeler la form, une fonction dans laquelle je passe l'intervalle de temps associé au timer.

Ps : créer le tout prend moins de 10 minutes. Je ne vois donc pas la raison de ta réticence à faire une form de plus

[noob_vba]

Bon si vous le dite c'est que vous avez raison je vais donc essayer cela sujet clos Merci

Et encore Merci a tous ceux qui mon aidez

[zazaraignée]

Salut

Tu as plusieurs solutions... Un Label de la Boîte à outils Contrôles, une zone de texte de la barre d'outils Dessins...

Avec un Label:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Feuil1.Label1.Caption = "Hello World!"

Avec un objet Shape (c'est comme ça que s'appelle une zone quelconque en vba) que j'ai nommé (via la zone Nom de Excel) zoneAffichable pour les besoins de l'exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Feuil1.Shapes("zoneAffichable").TextFrame.Characters.Text = "Bonjour la planète!"

[Edit] J'avais oublié la plus simple: un cellule de ta feuille de calcul...

[noob_vba]

Oui merci mais le soucis c'est que j'ai oublier de vous dire que je travail dans access et non dans EXcel veuillez M'excuser.