Problème Variable Integer Excel VBA Excel

Bonjour à tous !

J'ai un problème avec une variable Integer.

Mon code déclaration de variable:

Code:

---

1 2 3

'Stock réel Dim stk_reel As Integer stk_reel = TextBox_stk_reel.Value

---

Le problème est quand je remplie pas le textbox le code erreur 13 "Incompatibilité de type) apparait.

Quand j'utilise la variable dans un msgbox avec le champ remplie la ligne du msgbox se met en erreur.

J'ai tester les Fonction NZ(textbox_stk_reel, 0) ou le SIERREUR ou IFERROR mais rien a faire.

Mais mes variables en String fonctionne parfaitement marche bien.

La valeur de la variable est rentrée dans une cellules excel et cette partie marche bien la valeur est bien rentrée si je remplie le champ si je laisse le champ l'erreur apparait.

Donc si toute fois vous avez des idées pour m'aider je suis chaud

Merci d'avance !

Bonjour,

Essayez ceci

Code:

---

stk_reel = TextBox_stk_reel.Value * 1

---

Cdlt

Merci pour ta réponse mais sa ne marche pas :/ Toujours le même message d'erreur

bonjour,
une possibilité :

Code:

---

stk_reel = iif(TextBox_stk_reel <> "", Val(TextBox_stk_reel), 0)

---

A+

Merci pour ta réponse !

On avance maintenant quand le champ est vide il n'y a plus de message d'erreur !

Mais bon sa aurais trop simple si c'était déjà fini !

Maintenant le message d'erreur ce met dans l'affichage de mon MsgBox qui utilise les variables.

Code:

---

reponse = MsgBox("Voulez vous créer la référence suivante :" & Chr(13) & Chr(10) & "Référence diapason : " + ref_diap & Chr(13) & Chr(10) & "Référence fournisseur : " + ref_four & Chr(13) & Chr(10) & "Stock minimum : " + stk_mini & Chr(13) & Chr(10) & "Stock réel : " + stk_reel & Chr(13) & Chr(10) & "Prix : " + prix & Chr(13) & Chr(10) & "Catégorie : " + categorie & Chr(13) & Chr(10) & "Emplacement : " + emp & Chr(13) & Chr(10) & "Fournisseur : " + fourni, vbYesNo + vbQuestion + vbApplicationModal, "Création de référence ")

---

Voila le code du message les variables utiliser sont en rouge.
Mais quand a la place des variables j'utilise la valeur du textbox genre Textbox_stk_reel.Value le message ne bug.
Alors dans le pires des cas je vais faire sa mais bon relou quand meme ... Donc si vous avez des solutions sinon je ferais comme ca.

Bonjour,

Remplacez le signe + par &

Cdlt

Bonjour !

Merci pour ta raponse ! Et au final c'était bien sa. Ce qui est plutot logique au final mtn qu'on y pense !

Encore merci