Erreur de compilation
Résolu
Nicobx
-
Nicobx -
Nicobx -
Bonjour,
je début sur VBA et j'ai une erreur de compilation sur la ligne de code:
If Workbooks("Registros.xls").Sheets("Titulares_terceros").Cells(j, 5) Like "*Sheets("Italy").Cells(i, 5).Value*" Then
Au passage je tentes de faire une macro qui recherche si dans le contenu d'une cellule, Cells(j, 5), se trouve la valeur d'une autre cellule,Cells(i, 5). Pensez vous que ma méthode est bone sinon comment je peux mis prendre?
Merci de votre aide.
je début sur VBA et j'ai une erreur de compilation sur la ligne de code:
If Workbooks("Registros.xls").Sheets("Titulares_terceros").Cells(j, 5) Like "*Sheets("Italy").Cells(i, 5).Value*" Then
Au passage je tentes de faire une macro qui recherche si dans le contenu d'une cellule, Cells(j, 5), se trouve la valeur d'une autre cellule,Cells(i, 5). Pensez vous que ma méthode est bone sinon comment je peux mis prendre?
Merci de votre aide.
A voir également:
- Erreur de compilation
- Erreur 0x80070643 - Accueil - Windows
- Erreur 4201 france tv ✓ - Forum Réseaux sociaux
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
- J'aime par erreur facebook notification - Forum Facebook
- Erreur de lecture reconnecté en 3s - Forum TV & Vidéo
2 réponses
Bonjour
Remplacez
Like "*Sheets("Italy").Cells(i, 5).Value*" Then
par
Like Sheets("Italy").Cells(i, 5).Value Then
Cdlt
Remplacez
Like "*Sheets("Italy").Cells(i, 5).Value*" Then
par
Like Sheets("Italy").Cells(i, 5).Value Then
Cdlt
Bonjour à tous
Pour ma part ,j'aurais plutôt écris
si tu veux comparer sans souci de la casse (différence entre majuscule et minuscule)
écrit avant la macro
Pour ma part ,j'aurais plutôt écris
modele=Sheets("Italy").Cells(i, 5)
If Workbooks("Registros.xls").Sheets("Titulares_terceros").Cells(j, 5) Like "*" & modele & "*" then...
si tu veux comparer sans souci de la casse (différence entre majuscule et minuscule)
écrit avant la macro
option.compare text
sub mamacro()
