Valeur par defaut = derniere valeur rentree dans un text Box ou une List Box danRésolu

Question

Bonjour,

Comme le titre l'indique, j'ai un formulaire avec des textbox et listbox. Les donnees du formulaire sont enregistrees apres validation dans une feuille excel. Je souhaiterai avoir comme valeur par defaut dans ces textbox et listbox les dernieres valeurs rentrees, autrement dit les valeurs de la derniere ligne excel. 


Je vous remercie de votre aide. Je ne pense pas que ce soit complique mais je bloque...


Aymeric

Mayzz · Accepted Answer

MonTextBox.Text = Valeur, tout simplement

                                                                              
Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer. <

hellangel777 · Answer

Bonjour
tu n'as qu'a lire ton fichier excel...
La dernière valeur enregistrée dans celui-ci.

HellAngel777
<hr />
Les machines ne font pas d'erreurs
Heureusement nous sommes humains

Mayzz · Answer

Bonjour,

Crée des paramètres d'application, enregistre tes données dans ces dernier lors de la validation ou de la fermeture de ton application, puis au démarrage du programme récupère ceux-ci et insère-les dans tes contrôles.

voici un lien vers les explication sur ces paramètres 

Mayzz.
                                                                                                                                         
Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer.

moussfus · Answer

Bjr,
Une fois qu'on a cree une variable qui recupere la dernier valeur voulue, comment on la met par defaut dans value de propriete de la listbox. Il doit y avoir une ligne de commande toute bete, non?
Merci...

moussfus · Answer

Merci pour ton message Mayz, mais je pense que ca doit etre beaucoup plus simple que ca. 


Une fois qu'on a recupere la valeur de la derniere ligne d'une colonne, comment l'affecte t-on  en valeur par defaut a la textbox? 
Je vous remercie pour votre aide...
Aymeric

moussfus · Answer

Bonjour Mayzz,
Je n'avais pas vu ta reponse (Bizare que je n'ai pas ete averti par mail!)
Alors du coup, apres maintes recherches, j'ai trouve:

Private Sub UserForm_initialize()


Dim Nbligne As Integer


Worksheets(2).Select


Range("A1").Select
Selection.CurrentRegion.Select
Nbligne = Selection.Rows.Count


Me.TextBox1.Value = Cells(Nbligne, 1).Value
....

Mais merci quand meme!

J'ai une autre question: 
J'ai plusieurs listes deroulantes dans mon formulaire: 
exemple:
1ere liste de pays et 2eme liste de villes.
Quand je choisis d'abord un pays dans la premiere liste deroulante, je souhaiterai dans la 2eme liste deroulante uniquement les villes qui appartiennent a ce pays. 
Est-ce que tu sais comment faire ? 

Je te remercie.

Aymeric

ps: c'est pour la bonne cause, puisque c'est pour une association qui s'occupe d'enfants des rues en Egypte

moussfus · Answer

Bjr, 
Alors encore une fois, j'ai trouve tout seul. Ce n'etait pas dur en fait:

En definissant des listes sur Excel  (Insert/Name/Define):

Private Sub ComboBox2_Change()


If ComboBox2.Value = "Bidule" Then


ComboBox5.RowSource = ("Projet1")
Else
ComboBox5.RowSource = ("Projet")


End If

Bien a vous...

Aymeric

Valeur par defaut = derniere valeur rentree dans un text Box ou une List Box dan

7 réponses

Votre réponse

Discussions similaires