Tom's Guide > Forum > Programmation > Probleme de types avec VBA (sous excel)

Probleme de types avec VBA (sous excel)

Forum Programmation : Probleme de types avec VBA (sous excel)

TomsGuide.com : 800 000 inscrits répondent à toutes vos questions high-tech et informatique. Pour obtenir de l'aide, inscrivez-vous gratuitement !
Créer un nouveau sujet Répondre
Mot :    Pseudo :           
 
jean_calude   19-04-2005 à 12:00:36

salut j'ai une erreur de type avec ce code:

----------------------------------------------------------

Public Function Recup_textbox(Tbox As TextBox)

Dim text_saisi As String

text_saisi = Tbox.Text
Recup_textbox = text_saisi


End Function

----------------------------------------------------

Private Sub CmdbutOk_Click()

Dim text_saisi As String

UF_Identifiate.Hide 'ferme la boite de dialogue
text_saisi = Recup_textbox(TextBox1)
MsgBox text_saisi
End Sub

J'ai testé et j'ai un probleme de type au niveau de Tbox, je trouve pas l'erreur.
help

Répondre
Liens sponsorisés
Inscrivez-vous ou connectez-vous pour masquer ceci.
jean_calude   19-04-2005 à 13:20:45
- 0 +

En fait que j'explique, j'ai créé une boite de dialogue avec plusieurs champs à remplir (des TextBox).

Je cherche à récupérer les infos saisies. C'est donc pour ca que je crée une fonction générale de recupération de text saisie pour pouvoir l'appliquer a toutes mes textbox. Mais le hic c'est que j'ai l'erreur suivante : "erreur d'execution 13 , incompatibilité de types"

Apres plusieurs test j'ai vu que ca avait un rapport avec le fait que je fais passer textbox1 en parametre et avec la declaration Tbox as Textbox dans la declaration de la fonction

Répondre à jean_calude
Ziaaa   19-04-2005 à 15:16:10
- 0 +

et dasn ta fonction il manquerait pas un

Code :
  1. return Recup_textbox

ou un truc du genre ? comment ta fonction sait ce qu'elle doit retourner ?

Répondre à Ziaaa
scuny   19-04-2005 à 21:09:45
- 0 +

si j'ai bien suivi tes textbox sont dans un userform,

si oui

MaVariable = NomUserForm.NomTextBox.value

il est indispensable de déclarer MaVariable dans
un module pour pouvoir l'utiliser dans le userform

du genre

option explicit
public MaVariable as (au choix suivant ce que tu récupères)

variant==> "fourre tout"
string==> permet de faire beucoup de chose mais peux poser des pb sur des calculs entre variables
integer ==> déclenche une erreur si vide ou si contient du texte

erreur du genre "incompatibilité de type" (tout comme une variable non déclaré)

bonne chance

Répondre à scuny
jean_calude   20-04-2005 à 08:57:02
- 0 +

ah super je vais tester. je te di apres

en ce qui concerne le "RETURN" y en a pas en VBA. pour retourner une valeur tu affecte celle ci au nom de ta fonction.

D'où le Recup_textbox = text_saisi
(je sais c'est lol)

Répondre à jean_calude
Ziaaa   20-04-2005 à 11:00:35
- 0 +

je vois pas trop alors, si j'ai excel, je vais tester.

Répondre à Ziaaa
Ziaaa   20-04-2005 à 11:11:28
- 0 +

ok, j'ai trouvé. dasn la déclaration de ta fonction, ton argument doit être déclaré en tant que controle et non en tant que textbox. :

Code :
  1. Public Function Recup_Textbox(Tbox As Control) As String



je sais pas si le As String est nécessaire, je l'avais mis quan dje cherchais ce qui allait pas, j'ai pas essayé de l'enlever. voilà, bonne continuation :)

Répondre à Ziaaa
Créer un nouveau sujet Répondre
Tom's Guide > Forum > Programmation > Probleme de types avec VBA (sous excel)
Aller à :

Il y a 311 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici.

Plan du forum
Forum Bestofmedia ©
2000-2009 Bestofmedia Group
Page générée en 0,306 secondes
Attention

Vous allez répondre sur un sujet resté inactif pendant plus de 6 mois.
Assurez-vous d'apporter des éléments nouveaux à la discussion avant de poursuivre.

Répondre Annuler
Liens