Mettre "*" & "*" dans une variable vba
siamens_duj
Messages postés
192
Date d'inscription
Statut
Membre
Dernière intervention
-
Zoul67 Messages postés 1959 Date d'inscription Statut Membre Dernière intervention -
Zoul67 Messages postés 1959 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Tout est dans le titre.
Je sollicite votre aide afin de mettre "*" & "*" dans une variable.
Je vous met des extraits de mon code afin que ce soit plus facile à comprendre.
NomDuFichier = Range("I1").value
Name = left (NomDuFichier, 10) 'Récupère les 10 premiers caractères
Chemin = "D:\users\lala\Documents\doc\"
Chemin = Chemin & Name & "*" & "*" & ".docx"
J'aimerais mettre les deux "*" dans une variable afin de les comparer par la suite à OLast
Last = Right (NomDuFichier, 2)
OLast = left (Last, 1)
Merci par avance pour votre aide.
Tout est dans le titre.
Je sollicite votre aide afin de mettre "*" & "*" dans une variable.
Je vous met des extraits de mon code afin que ce soit plus facile à comprendre.
NomDuFichier = Range("I1").value
Name = left (NomDuFichier, 10) 'Récupère les 10 premiers caractères
Chemin = "D:\users\lala\Documents\doc\"
Chemin = Chemin & Name & "*" & "*" & ".docx"
J'aimerais mettre les deux "*" dans une variable afin de les comparer par la suite à OLast
Last = Right (NomDuFichier, 2)
OLast = left (Last, 1)
Merci par avance pour votre aide.
A voir également:
- Mettre "*" & "*" dans une variable vba
- Incompatibilité de type vba ✓ - Forum Programmation
- Impossible de créer le fichier de travail. vérifiez la variable d'environnement temp ✓ - Forum Word
- Excel compter cellule couleur sans vba - Guide
- Msgbox vba variable ✓ - Forum VB / VBA
- Vba attendre 1 seconde ✓ - Forum VB / VBA
Ce serait une variable de type String.
"*" & "*" sont les deux derniers caractères du nom de mon fichier (qui se trouve dans Doc) et Olast à l'un des dernier caractère qui correspond à ce que j'ai entré.
J'ai besoin de les comparer car la première partie trouve les fichiers correspondant (car il peut y en avoir plusieurs) et les deux dernier caractères représentent la version.
Le premier 1A, le deuxième 2A ...
Je pense qu'on prend le problème par le petit bout de la lorgnette...
Que veux-tu faire sur l'ensemble de la macro ?
Dans le code que tu as fourni, rien ne "trouve les fichiers correspondants". Pour ce faire, on utilise généralement Dir.
"**" me rappelle la syntaxe pour deux caractères, qui est en fait "??" car :
- * chaîne de caractères
- ? un seul caractère
Par exemple, si tu veux trouver la dernière version (afin de créer une nouvelle dernière version) tu peux combiner While et Dir.
https://www.exceltrick.com/formulas_macros/vba-dir-function/
A+