Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Teste sur textbox en cascade

  • Initiateur de la discussion Initiateur de la discussion GClaire
  • Date de début Date de début

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 !

GClaire

XLDnaute Impliqué
Bonjour le forum.

Je me prend la tête sur un truc qui je pense est tout bête.

Je voudrais faire un test sur plusieur TextBox pour envoyer une valeur a une cellule.

Pour le moment j'ai bidouillé cela qui fonctionne, mais je pense qu'il y'a a une solution plus appropriée.


VB:
    If Me.TextBox20.Value + Me.TextBox21.Value + Me.TextBox22.Value + Me.TextBox23.Value + Me.TextBox24.Value + Me.TextBox25.Value + Me.TextBox26.Value + Me.TextBox27.Value >= "1" Then
    Feuille.Range("B" & Maligne).Value = "1"
    Else
    Feuille.Range("B" & Maligne).Value = ""
    End If

Si vous avez une idée.

Merci.

Bonne soirée, G'Claire
 

Pièces jointes

Dernière édition:
Re
un exemple de ce que j'ai adapté de ton Code
jean marie


Hello.

Oui se sera cela pour les intitulés, tous les texbox ne seront pas pris en compte car certains ne sont pas obligatoire.

Et pour les Produit, il faut juste que cela test qu'au moins 1 sur les XXX est rempli, pour valider le 1 dans la feuille.

Ce que j'avais fais en faisant un calcul de la somme des TexBox quelle soit <> "", mais pas trés orthodox, lol.

Merci.

G'Claire
 
Re-Hello à tous,

Pour les mélanges G'Claire, si si, c'est souvent comme ça qu'on améliore les codes (du moment qu'on continue à les comprendre !!!)

Pour de mes nouvelles Jean Marie, oui tout va bien mon ami, et c'est vrai que je me fais rare, mais bon assez à donf en temps normal avec Microsoft Dynamics NAV qui se migre en Business Central et où tout ce que l'on a appris pendant largement plus d'une décennie repart pratiquement à 100% à la poubelle ! (ce n'est pas une blague !)

Donc c'est vrai que ce confinement nous laisse un peu de répit, mais aussi on prend du retard...

Je suis content de vois que vous êtes toujours là en tout cas et en bonne forme.

PS Jean Marie tu utilises quoi pour tes tutos GIF animés ?

Bien à vous
@+Thierry
 
Ah oui c'est le post des retrouvailles, Salut à toi Eric C et bon confinement aussi mon ami. (Je t'avais répondu aun email en Octobre 2019)

Désolé G'Claire pour l'apparté dans ton fil !
Bien à toi Eric C et bon confinement aussi !
@+Thierry
 
Re
Eric eh Oui il veille toujours !
pour faire suite une vidéo
je ne sais pas comment dois fonctionner ton fichier !
j'ai mis un peu de couleur si vide ,
On incrémente les Quantités (TextBox) par un DoubleClick (2 premiers pour l'instant) !
voir module de Classe
à savoir donc lol
jean marie
 

Pièces jointes

  • Test_3_ID.gif
    282 KB · Affichages: 11
Hello.

Ok, merci.

Heu tu as mis un fichier joins ou non?

Merci, G'Claire

No soucis Thierry, va me fais trés plaisir.

G'Claire
 


Donc pour comprendre un peu

1) Pour ajouter on garde le UserForm comme ils est.
On rempli les infos coordonnées et en valide (Avec l'obligation de mettre un NOM et un Prénom).

2) Pour Faire "Une commande" Je bloque la frame Des infos coordonnées, met la Frame pour la commande.

Je valide

3) Pour modifier un client, on double clique sur le client et on modifie.

Voili.

Merci, G'Claire
 
- 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

H
Réponses
19
Affichages
7 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…