Microsoft 365 recherche colonne a partir d'une variable VBA

PETIT YANNICK

XLDnaute Occasionnel
Bonjour à tous,

Je cherche à trouver et sélectionner la colonne contenant la semaine du jour dans la ligne 1
j'ai créé mes variables suivantes

datedujour = Date
semaine = "S" & Format(datedujour, "ww", vbMonday, vbFirstFourDays)

Je voudrais faire une recherche de la colonne comportant la valeur de la variable ''semaine ''
Je voulais travailler avec la fonction .find mais j'ai le message d’erreur d’exécution 91 qui s'affiche

2020_09_07_10_55_02_Window.png





je vous joint le bout de code que j'ai écrit


Je ne vois pas trop comment procéder?

Merci d'avance de votre aide

Yannick
 

Pièces jointes

  • test.xlsx
    8.9 KB · Affichages: 10

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Petit Yannick,
Vous auriez pu inclure votre code dans le fichier, juste pour éviter de le recréer. :)
Avec cette macro, vous sélectionnez la colonne de la semaine en cours :
VB:
Sub essai()
    datedujour = Date
    semaine = "S" & Format(datedujour, "ww", vbMonday, vbFirstFourDays)
    NoColonne = Application.Match("*" & semaine, [1:1], 0)
    Range(Cells(1, NoColonne), Cells(65000, NoColonne)).Select
End Sub
( j'ai limité la sélection à 65000 juste pour l'exemple )
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
En XL cela correspond à : =Equiv("*" & semaine;1:1;0)
Je recherche la chaîne où il y a "semaine" ( c'est le role de *) dans la ligne 1.
"Application" car Match n'existe pas en VBA, donc on lui dit d'utiliser la formule XL.
( c'est le cas de quelques formules qui existent en XL mais pas en VBA )
 

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 940
Membres
101 845
dernier inscrit
annesof