Microsoft 365 Ouvrir un classeur déjà ouvert commençant par

[chris6999]

Bonjour le FORUM

Je suis à la recherche d'un code me permettant d'aller récupérer des éléments sur un classeur déjà ouvert depuis un autre fichier.
Le problème c'est que le nom du classeur en question est indexé avec un code date que je ne connais pas à l'avance.
Seul le début du nom reste identique (Dans mon exemple commence par Requête).

J'avais trouvé sur un vieux fil un code qui paraissait correspondre mais ce dernier ne fonctionne pas.
Sub test()
Dim wb As Workbook
For Each wb In Workbooks
If UCase(wb.Name) Like "Requête*" Then wb.Activate: Exit For
Next wb
End Sub

Quelqu'un saurait-il comment on peu s'y prendre
Merci par avance

 

[Staple1600]

Bonjour

Logiquelment ca devrait être

Sub test()
Dim wb As Workbook
For Each wb In Workbooks
If UCase(wb.Name) Like "REQUÊTE*" Then wb.Activate: Exit For
Next wb
End Sub

 

[chris6999]

Bonjour

Logiquelment ca devrait être

Sub test()
Dim wb As Workbook
For Each wb In Workbooks
If UCase(wb.Name) Like "REQUÊTE*" Then wb.Activate: Exit For
Next wb
End Sub

Ben oui ça marche merci.
Il faut donc mettre le texte recherchée en majuscule?
Bizarre quand même !

Merci beaucoup en tous cas

 

[chris6999]

Bonjour

Logiquelment ca devrait être

Sub test()
Dim wb As Workbook
For Each wb In Workbooks
If UCase(wb.Name) Like "REQUÊTE*" Then wb.Activate: Exit For
Next wb
End Sub

Je continue sur mon code qui fonctionne avec le texte en majuscule
Si ce n'est pas trop demander pour compléter ma demande initiale
Comment faire pour tester au préalable la présence d'un classeur actif commençant par XXX avant de poursuivre ..
Ex
Si non trouvé MSGBOX
Si trouvé poursuivre la procédure

J'ai du mal car je ne maitrise pas UCASE

Merci par avance