Récupérer coordonnées cellules

Résolu/Fermé
reno421 Messages postés 41 Date d'inscription vendredi 30 janvier 2015 Statut Membre Dernière intervention 16 septembre 2015 - 30 janv. 2015 à 16:14
reno421 Messages postés 41 Date d'inscription vendredi 30 janvier 2015 Statut Membre Dernière intervention 16 septembre 2015 - 5 févr. 2015 à 14:35
Je dispose d'une extraction de base de donnée un peu particulière au format excel.

Dans une macro, je dois récupérer les coorcdonées d'une cellule trouvée par rechercher/remplacer (ctrl/f) (Impossible de faire la recherche par rechecheV)

J'ai bien tenté activé la celluler et d'utiliser la fonction :

ligne = activecell.row

Mon but est de détermmiener l'emplacement de cette ligne pour copier les x lignes suivantes.

En fait, chaque paquets de données reprends 3 lignes de titres, x lignes de données et est séparé du suivant et est séparé par une ligne vide. Le hic c'est qu'avant il y a une espèce de table récapitulative qui n'est pas formatée de la même manière (différence de fusion de cellule, ...)

Je tiens a préciser que je suis débutant en programation vba mais que j'ai des notions de programations en C.

D'avance merci pour votre aide.

4 réponses

Whismeril Messages postés 19021 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 16 avril 2024 928
30 janv. 2015 à 18:32
Bonjour ça aurait été bien au début du message
1
reno421 Messages postés 41 Date d'inscription vendredi 30 janvier 2015 Statut Membre Dernière intervention 16 septembre 2015
3 févr. 2015 à 11:10
Bonjour,

Ca a faonctionné, un tout grand merci
0
eriiic Messages postés 24569 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 28 décembre 2023 7 209
3 févr. 2015 à 18:47
0
Patty5083 Messages postés 34 Date d'inscription lundi 14 avril 2014 Statut Membre Dernière intervention 10 novembre 2019
3 févr. 2015 à 19:36
Bonsoir
Si le problème est complètement résolu, peux-tu marquer cette question comme étant résolue?
Bonne soirée
0
reno421 Messages postés 41 Date d'inscription vendredi 30 janvier 2015 Statut Membre Dernière intervention 16 septembre 2015
5 févr. 2015 à 14:34
D'accord patty, mais comment on fait ?
0
reno421 Messages postés 41 Date d'inscription vendredi 30 janvier 2015 Statut Membre Dernière intervention 16 septembre 2015 > reno421 Messages postés 41 Date d'inscription vendredi 30 janvier 2015 Statut Membre Dernière intervention 16 septembre 2015
5 févr. 2015 à 14:35
j'ai trouvé, sorry
0
Patty5083 Messages postés 34 Date d'inscription lundi 14 avril 2014 Statut Membre Dernière intervention 10 novembre 2019
Modifié par Whismeril le 30/01/2015 à 19:09
Bonsoir
Pour récupérer le numéro de ligne :

Cells.Find(What:="Toto", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
'récupère la ligne
    NumLig = ActiveCell.Row


si j'ai bien compris...
-1
Whismeril Messages postés 19021 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 16 avril 2024 928
30 janv. 2015 à 19:09
J'ai modifié ton message pour forcer basic en coloration, voir ici la bonne utilisation la coloration syntaxique.
0