Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/09/2011, 18h04   #1
Membre régulier
 
Inscription : janvier 2003
Messages : 254
Détails du profil
Informations forums :
Inscription : janvier 2003
Messages : 254
Points : 76
Points : 76
Par défaut Pb pour comparer des chaines dans une fonction

Bonjour,
Je suis sur un probleme bizarrre, je voulais faire marcher un recherchev sur un tableau entre deux feuilles, mais ca marche pas.
Du coup je décide de coder la fonction suivante :
Code :
1
2
3
4
5
6
7
8
9
10
11
12
Function RV(TA As String, Matrice As Range, colonne As Integer) As String
Application.Volatile True
Dim TA1 As String
TA1 = "Alcatel,  " & TA
For i = Matrice.Row To Matrice.Row + Matrice.Rows.Count
    If TA1 = Matrice(i, 1).Text Then
        RV = Matrice(i, colonne).Text
        Exit Function
    End If
Next i
RV = 0
End Function
Bien que je vois les deux chaines identiques se comparer dans le debug, je n'obtients pas le résultat escompté. Est ce que le fait de prendre ma chaine Matrice dans une autre feuille a une influence ?
Je vous donne la chaine à comparer. "Alcatel, 47 + 1 ports 10/100 non PoE"
Merci d'avance de vos idées, parce que je seche.
comme de bien entendu est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/09/2011, 18h57   #2
Membre Expert
 
Homme
Retraité
Inscription : avril 2011
Messages : 692
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Activité : Retraité

Informations forums :
Inscription : avril 2011
Messages : 692
Points : 1 443
Points : 1 443
Bonjour,

Dans la chaine
tu as 2 espaces, ce qui ne correspond pas à la chaine à comparer.
Citation:
"Alcatel, 47 + 1 ports 10/100 non PoE"
Cordialement.
gFZT82 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/09/2011, 19h53   #3
Membre régulier
 
Inscription : janvier 2003
Messages : 254
Détails du profil
Informations forums :
Inscription : janvier 2003
Messages : 254
Points : 76
Points : 76
Bien vu mais j'ai du loupé le copié collé.
Non j'avais vraiment bien les mêmes chaines, de même taille, et j'ai pu les comparer l'une en dessous de l'autre en mode debug.
Le fait qu'une soit en Variant/String et l'autre en String a peut être une influence.
Lors de ma dernière tentative en relançant Excel je n'avais plus de données dans le Range : Matrice, alors qu'elles avaient bien été séléctionné via la souris.
N.B Je fais le lancement lorsque je valide la fonction que j'ai mis dans une cellule.
Merci de vos idées.
comme de bien entendu est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 20h18.


 
 
 
 
Partenaires

Hébergement Web