XL 2019 Modifier données déjà saisies via userform

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

AIXELS

XLDnaute Occasionnel
Bonjour à tous les Amis du Forum. 🙂
Je reviens vers vous une fois de plus.
J'ai réussi à créer un userform de saisie de données.
J'ai fait des recherches et j'ai adapté les codes que j'ai trouvés.
Le résultat est satisfaisant, mais peut-être pas académique pour les initiés.
J'aurais aimé en gardant le même masque pouvoir modifier
les données déjà saisies.
Pourriez-vous me mettre sur la piste.
Par avance merci pour votre aide.
Bien cordialement.
 

Pièces jointes

@Dranreb,
Sur votre PJ sur un clic sur Ajouter, j'obtiens une erreur. A quoi cela peut être dû ?

1665842144959.png
 
Oui il y a quelques erreurs. Ce n'est qu'une ébauche. Enlever le D en fin de TVLD, c'est TVL.
Il y a aussi un format qui ne sert à rien après CAs.Add Me.TBxVille, "VILLE" (parce que j'avais dupliqué le CAs.Add de la ligne précédente).
 
bonjour
Une petite modif : nom en Majuscule
Re @JM27
Après plusieurs tests, il s'avère que si l'on ajoute ou supprime
un nom et que l'on reste sur le masque de saisie, ce n'est pas
pris en compte au niveau de l'affichage dans la ComboBoX

bien que la création ou la suppression se soient bien déroulés dans la base.
Peut-être un problème de rafraichissement de l'écran ou s'il
existe dans vba une commande qui mette à jour le rafraichissement.
 
Dernière édition:
Bonjour.
Je joins quand même la dernière version qui a un peu changé.
J'attendais des demandes d'améliorations pour le faire …
Bonjour @Dranreb
J'ai testé ta dernière mise à jour.
La saisie est un intuitive et la désactivation des boutons
en fonction de l'action sont d'une grande aide.
Je continue les tests et je te fais un retour.
Une question, j'ai cherché une fonction pour mettre
en majuscule la première lettre d'une saisie et le reste en minuscule.
Tu n'aurais pas ça dans tes tiroirs ?
VB:
Sub ConvertirPlagePremiereEnMaj()
    For Each Cellule In Selection
        Cellule.Value = Proper(Cellule)
    Next
End Sub

J'ai trouvé ça, mais je recherche une "function" pour
mettre une sélection de plusieurs lignes.

Merci pour ton aide.
Bien cordialement.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
1 K
Retour