Coordonnées d'une cellule

Cubitus80 Messages postés 10 Statut Membre -  
Cubitus80 Messages postés 10 Statut Membre -
Bonjour,
j'ai un tableau avec abscisses et ordonnées, j'aimerai avoir les coordonnées de chaque cellule pleine (X = ? et Y= ?), que je mettrai ensuite dans un tableau à deux colonnes.
je peux le faire manuellement sauf que j'ai plus de 100 tableaux avec plus de 30 coordonnées à déterminer donc ça prend un temps fou.
j'avais trouvé quelque chose comme:

+SI(SOMME(B19:AM19)=0;"";A19)

pour me donner sur chaque ligne, la valeur du Y, mais j'aurais besoin d'avoir la valeur du X en même temps.

j'espère que c'est assez clair!
sinon, je peux envoyer un exemple sur un fichier.
merci d'avance

8 réponses

  1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour Cubitus

    Oui un exemple sera plus parlant, tu le post sur cjoint.com et tu indiques ensuite ici le lien fourni

    Cdlmnt
    0
    1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Ok, je dois m'absenter, je regarde cela cet après-midi
      0
    2. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Gyrus a pris le relais je le laisse poursuivre
      0
    3. Gyrus Messages postés 3360 Statut Membre 526
       
      Salut via55,

      Surtout, n'hésites pas à reprendre le manche si tu as une amélioration à apporter :D.

      A+
      0
    4. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Salut Gyrus

      Oui !
      Je recherchais une solution sans VBA mais trop complexe

      A+
      0
  2. Gyrus Messages postés 3360 Statut Membre 526
     
    Bonjour,

    Une solution
    https://www.cjoint.com/c/CKmnfXABzem

    A+
    0
    1. Morgothal Messages postés 1350 Statut Membre 184
       
      Hello,
      Je rajouterais juste cette ligne avant le "i=1", histoire de réinitialiser le tableau en cas de suppressions dans la matrice :
      Range("W7:X" & Range("X65000").End(xlUp).Row).ClearContents
      A+
      0
  3. Cubitus80 Messages postés 10 Statut Membre
     
    bonsoir,
    merci pour vos réponses. Mais je n'arrive pas à transposer ni l'une ni l'autre solution à mes données... désolée :s
    du coup, je vous envoie un fichier avec un exemple de tableau qui correspond vraiment à ce sur quoi je travaille, si jamais vous avez 5 minutes de plus devant vous ..
    le tableau comprend 32 lignes et 38 colonnes.
    les zeros ne servent à rien.

    merci merci!

    https://www.cjoint.com/?3KnadvGUk45
    0
    1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Bon, après modification voilà un tableau qui fonctionne
      https://www.cjoint.com/?0KncFYJEKxV

      j'ai du passer par un tableau intermédiaire en dessous du premier qui code les coordonnées de chaque valeur car les valeurs identiques sur une m^me ligne du tableau d'origine posaient problème

      En espérant que c'est bien ce qu tu recherchais

      Cdlmnt
      0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. Cubitus80 Messages postés 10 Statut Membre
     
    MERCI à tous les deux !!
    0
  6. Cubitus80 Messages postés 10 Statut Membre
     
    Bonjour,
    je reviens sur le même sujet.
    le fichier de Gyrus m'a bien servi.
    J'aurais besoin de faire la même manip mais à l'envers, c'est à dire placer des points dans le tableau à partir des coordonnées.
    si quelqu'un à une solution... merci d'avance!
    0
    1. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Bonjour Cubitus

      Une possibilité :
      https://www.cjoint.com/?0FpptVpRZk6

      Cdlmnt
      0
    2. Cubitus80 Messages postés 10 Statut Membre
       
      merci beaucoup!
      comment peux-t-on faire si j'ai plusieurs cellules avec les mêmes coordonnées afin d'additionner directement le total?
      merci/
      0
    3. Cubitus80 Messages postés 10 Statut Membre
       
      Est ce que c'est possible d'avoir le fichier sous cette forme?
      avec 38 colonnes et 32 lignes

      https://www.cjoint.com/?DFql4TerMCF
      0
    4. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
       
      Bonjour

      Tu adaptes la macro comme tu veux en fonction , par exemple :
      Private Sub CopierC_Click()
      For n = 4 To 100 'boucle sur lignes 4 à 100 du tableau de valeurs à adapter
      x = Range("AN" & n).Value
      y = Range("AO" & n).Value
      a = Range("NP" & n).Value
      Cells(x, y) = a
      Next
      End Sub

      Par contre je ne comprends pas "plusieurs cellules avec les mêmes coordonnées", chaque cellule est particulière et a des coordonnées propres !

      Cdlmnt
      0
    5. Cubitus80 Messages postés 10 Statut Membre
       
      Bonjour,
      ça fonctionne bien.
      Les coordonnées sont renvoyés à des "1" dans le tableau et quand j'ai plusieurs fois les mêmes coordonnées aurais besoin que le résultat dans les cellules soient automatiquement additionné.
      ex: j'ai 3 fois x=3; y=6; donc dans le tableau, le point placé doit être un "3".
      0
  7. Cubitus80 Messages postés 10 Statut Membre
     
    parfait, merci !!
    0
  8. Cubitus80 Messages postés 10 Statut Membre
     
    Bonjour,
    je vous sollicite à nouveau pour une demande un peu similaire.
    à partir du fichier (ci-dessous) et de la matrice déjà créée, qui permet de copier les coordonnées dans un tableau, est-il possible d'obtenir des coordonnées répétées lorsqu'une cellule a une la valeur supérieure à 1?

    exemple: cellule x=26; y=8, la valeur est 3, donc il faudrait que les coordonnées 26;8 soit notées 3 fois dans le tableau.

    merci d'avance!

    https://www.cjoint.com/?3BBqj55RkfL
    0