Type mismatch...

Résolu
2pax.cruz -  
 2pax.cruz -
Bonjour,

j'ai un soucis en VBA-Excel... Il me sort "TypeMismatch".


J'ai tout essayé. Excel m'énerve!


'on va trouver la colonne qui correspond à l'usine
Dim Colonne As Integer
Colonne = 0
Dim Cellule As String

For n = 1 To 50
For i = 1 To 200
Cellule = Cells(i, n).Value
If Cells(i, n).Value = Usine Then
Colonne = n
Exit For
Exit For
End If
Next i
Next n
If Colonne = 0 Then
Exit Sub
End If




Je vous remercie d'avance =D
A voir également:

2 réponses

pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Salut,
Le debugage bloque sur qu'elle ligne?
0
2pax.cruz
 
J'aurais du préciser, pardon.


Sur la ligne : Cellule = Cells(i, n).Value


Sachez que la cellule Cells(i, n) est de type général
0
2pax.cruz
 
Maintenant il bute sur la ligne :

If Cells(i, n).Value = Usine Then
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Cellule = Cells(i, n).Value
Cells(i, n) est de type général
Donc pas de souci?
Essaie ceci :
If Cells(i, n).Value = "Usine" Then
0
2pax.cruz
 
Oui mais usine est une variable.
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
usine est une variable? Déclarée ou? Comment?
0
2pax.cruz
 
Ca fonctionne.

Mais je sais plus comment j'ai fais XD


Merci d'avance.
0