Problème d'incompatibilité de forme

Question

Salut j'ai fais le programme qui suit mais à chaque fois il m'affiche erreur incompatibilité de forme.

Private Sub CommandButton3_Click()
Dim d As Integer
Dim j As TextBox
Dim k As Integer
'Call CommandButton1_Click
j = TextBox26
If j <> 0 Then
For d = 1 To n
s.Offset(d - 1, 3 + j.Value).Value = Controls("Textbox" & (d + 1)).Value
Next d
Else: MsgBox "Veuillez indiquer le mois"
End If
End Sub

ucfoutu · Answer

Bonjour,
déjà (et avant d'analyser le reste) ===>>> B.A.BA ===>>
1) On ne peut affecter un objet à une variable par simple = . Il faut un Set 
2) if j (alors que j est une textbox) <> 0 ne peut strictement rien dire
Réfléchis et reviens.



____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

NHenry · Answer

Bonjour, 

"erreur incompatibilité de forme"
Quel est lme message exacte ?

Dim j As TextBox 
j = TextBox26 
If j <> 0 Then 

D'après toi, est-ce logique ?

Quand tu postes un code, regardes le point 2 de ma signature.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, ce lien ou encore celui-ci[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Mon site

eltigre85 · Answer

Ok c'est bon j'ai vu mon erreur. C'était tout bête.
Merci à tous

Problème d'incompatibilité de forme

3 réponses

Votre réponse

Discussions similaires