Discussion :

[Miistik]

Bonjour,

A la demande de bbil, j'ouvre un nouveau topic pour mon deuxième problème.

Je cherche à récupérer le numéro de colonne où est situé une heure qui est contenu dans un TextBox.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
With WBHoraire.Sheets(Feuille).Cells
 Colonne = Application.Match(Heure, Rows(1), 0)
End With

J'ai déjà essayé beaucoup de choses avec Find et Match et sur le type de variable de Heure.

Actuellement,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Heure = CDate(Me.TtBxHeure.Value)

Heure as Date.

Merci de me donner un coup de main, je vois vraiment pas comment résoudre.

[Philippe Tulliez]

Bonjour,
Tu peux utiliser FIND
Dans cet exemple Heure est le nom de la TextBox contenant l'heure, sht est l'objet feuille

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 colonne = sht.Rows(1).Find(What:=Me.Heure).Column

[Miistik]

Bonjour,

Merci corona mais ma variable Colonne est toujours égale à 0, encore une fois .

Pour info, Colonne est un Long.

[Philippe Tulliez]

Bonjour,
J'ai mis 10:00 dans le TextBox et de B1 à J1, j'ai placé les données de 09:00 à 17:00
J'avais effectué les tests avec 10:00, 11:00, 16:00 et cela fonctionnait.
Je viens de refaire un test avec des heures en dessous de 10:00 et là il y a un effectivement un problème.
Je n'ai pas beaucoup de temps pour l'instant pour chercher plus loin mais je ne doute pas qu'un autre intervenant t'apportera une réponse.

[Philippe Tulliez]

Bonjour,
J'avais omis un argument. Essaye avec ceci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

colonne = sht.Rows(1).Find(What:=Me.Heure, LookIn:=xlValues).Column

[Miistik]

Bonjour,

Déjà merci pour ta réponse mais elle ne fonctionne pas pour tous les horaires.

Je crois que c'est le cas que tu évoquais : avant 10:00.

Mais merci, c'est déjà sa.