B
britchouleloup
Guest
Bonjour foruuum
J'ai saisi ce code qui est censé me trouver la première colonne dont la date est supérieure ou égale à la date figurant dans la cellule a1, il faut savoir que cette cellule est saisi par un userform (je pense que cela joue)
Sheets("Tresorerie").Select
Range("a1") = CDate(txtdatedebut)
Range("b1") = 500
Range("debutper").Select
While ActiveCell < Range("a1")
ActiveCell.Offset(0, 1).Select
Wend
premiermoisechX = ActiveCell.Column
Range("e3") = premiermoisechX
il s'avère que la procédure reste bloquée au niveau du while, c'est à dire en fait elle selectione bien début période, mais reste dessus, sans tester les autres même si elle est inférieure.
Pourriez vous m'aider, j'ai beaucoup de mal avec les dates en plus
Merci par avance
Aplus
J'ai saisi ce code qui est censé me trouver la première colonne dont la date est supérieure ou égale à la date figurant dans la cellule a1, il faut savoir que cette cellule est saisi par un userform (je pense que cela joue)
Sheets("Tresorerie").Select
Range("a1") = CDate(txtdatedebut)
Range("b1") = 500
Range("debutper").Select
While ActiveCell < Range("a1")
ActiveCell.Offset(0, 1).Select
Wend
premiermoisechX = ActiveCell.Column
Range("e3") = premiermoisechX
il s'avère que la procédure reste bloquée au niveau du while, c'est à dire en fait elle selectione bien début période, mais reste dessus, sans tester les autres même si elle est inférieure.
Pourriez vous m'aider, j'ai beaucoup de mal avec les dates en plus
Merci par avance
Aplus