Eviter message d'erreur si textbox vide

Eviter message d'erreur si textbox vide Sujet résolu

Ajouter un message à la discussion

Lui

Posté le 01/11/2014 @ 14:31

Bonjour,

Mes textbox contiennent des nombres
Mais quand ils sont copiés dans les cellules de la feuille, il sont au format texte, même en formatant les cellules
J'ai donc ajouté Clng ---> Range("A" & L).Value = CLng(TextBox1)

Et là ça marche, les valeurs sont bien au format nombre.

Mais cela m'a créé un nouveau problème, si la textbox est vide, j'ai un message d'erreur
et je ne sait pas comment faire pour l'éviter

Merci pour votre aide

Je joins le fichier
http://www.cjoint.com/14nv/DKboJTSt0jN.htm

gilbert_rgi

Posté le 01/11/2014 à 16:45

Bonsoir,

Private Sub CommandButton1_Click()
On Error Resume Next
etc.....

doit faire la demande

ou faites un contrôle des textbox au moment du click

Modifié par gilbert_rgi le 01/11/2014 16:49

Lui

Posté le 01/11/2014 à 19:57

gilbert_rgi a écrit :

Bonsoir,

Private Sub CommandButton1_Click()
On Error Resume Next
etc.....

doit faire la demande

ou faites un contrôle des textbox au moment du click

Merci beaucoup !

Ça marche avec on error resume next !

Mytå

Posté le 02/11/2014 à 16:28

Salut le Forum

Il est préférable de contrôler la saisie que d'utiliser le On Error Resume Next

If IsNumeric(TextBox1.Value) Then Range("A" & L).Value = CLng(TextBox1)

If IsNumeric(TextBox2.Value) Then Range("B" & L).Value = CLng(TextBox2)

Mytå

Lui

Posté le 03/11/2014 à 12:48

Mytå a écrit :

Salut le Forum

Il est préférable de contrôler la saisie que d'utiliser le On Error Resume Next

If IsNumeric(TextBox1.Value) Then Range("A" & L).Value = CLng(TextBox1)

If IsNumeric(TextBox2.Value) Then Range("B" & L).Value = CLng(TextBox2)

Mytå

Hello,

ça marche bien aussi, bonne journée !

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !

Les bons plans du moment PC Astuces

Tous les Bons Plans

219,67 €

Lego 76218 Marvel Super Heroes Le Saint des Saints à 219,67 €
~~249,99 €~~ -12%

Amazon fait une promotion sur le set Lego 76218 Marvel Super Heroes Le Saint des Saints qui passe à 219,67 € au lieu de 249,99 €. Cette maquette LEGO Marvel Avengers de la résidence emblématique du Docteur Strange comprend un bâtiment modulaire de 3 étages avec 4 façades, de nombreux détails du film et 9 minifigurines familières de l'univers cinématographique Marvel. 2708 pièces.

Voir l'offre

32,29 €

Mini scie circulaire TECCPO 580W à 32,29 €
~~59,99 €~~ -46%

Amazon fait une promotion sur la mini scie circulaire TECCPO 580W (profondeur de coupe réglable, max 27 mm) à 32,29 € au lieu de 59,99 €. La scie est livrée avec un adaptateur pour aspirateur, trois lames 85 mm (24 dents pour le bois, 44 dents pour métal et plastique et diamant pour couper du carrelage), un guide parallèle et une clé allen.

Voir l'offre

48,63 €

Lego Star wars Casque Luke Skywalker (Red Five) 75327 à 48,63 € livré
~~54,99 €~~ -12%

Amazon Allemagne fait une promotion sur le Casque Luke Skywalker (Red Five) 75327 qui passe à 42,98 €. Comptez 5,65 € pour la livraison en France soit un total de 48,63 € livré. On le trouve ailleurs à partir de 54,99 €. Cette reproduction du célèbre casque de pilote de Luke est le tout premier casque ouvert de la collection LEGO® Star Wars. Faites appel au Jedi en vous pour recréer ses détails authentiques, dont un micro et un rembourrage en briques, ainsi que sa visière rouge translucide. Le support intégré et la plaque ajoutent la touche finale à cette superbe pièce d’exposition.

Voir l'offre

10,55 €

Calculatrice Casio FX92+ spéciale Collège à 10,55 € (via ODR et tickets Leclerc)
~~16,90 €~~ -38%

Leclerc fait une promotion sur la calculatrice Casio FX92+ spéciale Collège qui passe à 16,55 €. Or le marchant reverse 3 € en tickets Leclerc et Casio rembourse 3 € pour l'achat de cette calculatrice qui vous reviendra au final à 10,55 €. Imbattable !

Voir l'offre