Formule si...atteindre ligne

[danou]

Bonjour le forum,
je suis un visiteur assez assidu de votre forum et j'ai déjà eu l'occasion de poster quelques problèmes qui ont étés aussitôt résolus.
Je me permets de joindre mon classeur avec les explications de ce je souhaitérais obtenir.(20ko)
Merci d'avance à tous(toutes)

 

[tonio59]

salut...

Mais où est le fichier ! ! ! ! ! ! ! ça arrive même au meilleur, mais rien qu'au titre ton problème à l'air intéressant ! ! !

En espérant en savoir rapidement plus.

Ciao à pluche.

 

[danou]

desolé pour cet oubli [file name=suivicli.zip size=3089]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/suivicli.zip[/file]

 

[andré]

Salut danou, Tonio59 et les autres,

Solution peut-être un peu simpliste :

Ctrl+h / taper le no du client sous Rechercher / Suivant / Fermer.

Petite précaution à prendre :
Dans la boîte de dialogue, cliquer sur Options et choisir 'par colonne' sous l'onglet 'sens', puis cliquer sur Options pour revenir dans la première boîte.
Ceci afin d'éviter que si une autre cellule de la feuille comporte le même nombre que le no du client, la recherche ne s'arrête sur celui-là.

Cette procédure est moins rapide qu'une macro, mais elle ne mange pas de pain (lol).
Et pourquoi réinventer ce à quoi Bill Gates a pensé avant nous ?

Ândré.

 

[Moa]

Salut André, Salut Danou !

Bien vu André, simple et éfficace.

Sinon, une macro évènementielle :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Cell As Range
Dim i As Integer
i = Range('A65000').End(xlUp).Row
If Not Application.Intersect(Target, Range('C14')) Is Nothing Then
For Each Cell In Range('A4:A' & i)
If Cell = Range('C14') Then Cell.Select
Next Cell
End If
End Sub

Pour la première question !

Mais il est vrai que si tu veux sélectionner aussi le mois, il faut rajouter une boucle pour les feuilles

Pièce jointe pour tester 1ère macro.

@ +++

Moa [file name=suivicli_20050616101335.zip size=9049]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/suivicli_20050616101335.zip[/file]

Message édité par: Moa, à: 16/06/2005 10:13

 

[sigma]

bonjour à tous,

bien vu andré, je cherchais de mon coté une solution plus alambiquée et certainement moins efficace, pourquoi faire compliqué quand on peut faire simple. bravo.

A+

 

[2passage]

Bonjour à tous,

Moi j'aime bien réinventer ce qu'a dejà fait Bilou, donc le petit formulaire de recherche, j'aime bien (j'ai un coté chienchien / pipi réverbère pour marquer mon passage )

Donc version Usf inside, avec remplissage automatique de noms des onglets à l'init.. enfin gadget, quoi...

edit : gni.. le fichier... ! [file name=suivicli2.zip size=13866]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/suivicli2.zip[/file]

Message édité par: 2passage, à: 16/06/2005 10:48

 

[andré]

Salut Moa, resalut les autres,

Je ne m'étais pas non plus préoccupé du choix de la feuille.

Si cela pourrait s'avérer utile avec un userform, dans les autres cas il est plus rapide de cliquer sur un onglet que d'encoder le nom de la feuille.

Il y a néanmoins une demi-solution :

Cliquer du bouton droit de la souris dans la barre d'onglet, puis sur sélectionner toutes les feuilles.
Dès lors la recherche se fait sur toutes les feuilles, et à chaque clic sur Suivant de la boîte de dialogue Rechercher, on change de feuille, à commencer par la première, sauf si la sélection des feuilles se fait manuellement (en tenant la touche Ctrl enfoncée), alors c'est à partir de la première feuille qui a été sélectionnée.

Il y a encore le problème de nombres qui pourraient être identiques au no de clients.
Là je ne puis conseiller rien d'autre que d'attribuer des codes alhanumérques au no de clients, style A170 ou 170x, ...

Ândré.

 

[danouu]

Salut à tous,

et un grand merci à chacun d'entre vous. Je vais....calmement analyser le fruit de chaque travail et vous remercie encore une fois de votre rapidité et compétence.
Danouu