XL 2019 récupération valeur cellule

[Gsanchez]

Bonjour,

Je m'appelle Guillaume je suis nouveau sur le forum.
J'ai un gros soucis du à mon incompétence, il faut l'avouer.
Je cherche à récupérer la valeur d'une cellule sur une feuille et répéter l'opération pour les feuilles suivantes sans devoir le faire à la "main".
Petite précision les feuilles n'ont pas le même nom mais la cellule est toujours au même endroit ( O83 )
Je dois faire la même chose pour récupérer la valeur dans la cellule O88.
Si quelqu'un peut me sauver...

 

[soan]

Bonjour Guillaume,

bienvenue sur le site XLD !

tu devrais joindre un fichier exemple,
sans données confidentielles.

soan

 

[Gsanchez]

Bonjour Saon,

Merci

C'est un exemple en pj.

 

[Gsanchez]

Soan, désolé erreur de frappe.

 

[soan]

@Gsanchez

je pense avoir mieux compris ta demande ;
voici un essai ; sur "Feuil1", fais Ctrl e

soan

 

[Gsanchez]

@Gsanchez

bon, je crois avoir mieux compris ta demande ;
alors voici un essai ; sur "Feuil1", fais Ctrl e

s'il faut adapter, donne plus de précisions,
en indiquant noms de feuilles et cellules.

soan

Bonjour Soan,

Je souhaite compiler un tableau sur la feuille 1 en recupérant une voire deux cellules toujours placées au même endroit sur plusieurs feuilles

 

[Exl-Noob]

Oui c'est sans doute un des pire exemple de communication de besoin que j'ai pu lire
Il aurait été plus pratique de donner un fichier Excel qui soit exploitable, et qui précise dans quelle case intégrer quelle information.
je vais donc faire une réponse un peu générique.
La solution est en deux étapes.

1. Récupérer le nom des différents onglets. Il y a une possibilité avec une macro et une possibilité sans macro.
2. Retourner la valeur souhaitée à l'aide de la fonctionINDIRECT().

Par exemple pour retourner le contenu de la cellule A4 sur la feuille listée en A5 :
INDIRECT(A5&"!A4")

Bonne journée,

 

[soan]

Bonjour @Gsanchez, le fil,

* sur la feuille "exs", il y a maintenant 4 nombres en A1:A4
* sur la feuille "cdc" : idem, 4 nombres aussi, en A1:A4
* sur la feuille "abc" : idem, toujours en A1:A4

* va sur "Feuil1" ; tu peux voir que C4:E7 est vide

* fais Ctrl e ➯ les données des 3 autres feuilles sont copiées en C4:E7

voici le code VBA correspondant :

Option Explicit

Sub CpyData()
  If ActiveSheet.Name <> "Feuil1" Then Exit Sub
  Dim i As Byte: Application.ScreenUpdating = 0
  [C4:E7].ClearContents
  For i = 2 To 4
    Worksheets(i).[A1].Resize(4).Copy Cells(4, i + 1)
  Next i
End Sub

soan

 

[Gsanchez]

Bonjour a vous et merci pour votre aide.
Je suis désole de ne pas avoir pu répondre.

Je suis vraiment nuuuuuuul

en gros, j'ai un fichier excel où il y a 81 feuilles.
Je souhaite sur la feuille 1 faire un tableau avec 3 colonnes, Valeur / point M / point E
Dans ce tableau, je souhaite récupérer des valeurs qui se trouve dans les 80 autres feuilles
Toujours au même endroit dans les différentes feuilles.
Colonne 1 rechercher M83 dans les feuilles
Colonne 2 rechercher M88 dans les feuilles
Colonne 3 rechercher M91 dans les feuilles

J'ai tester une fonction recherche mais en la tirant vers le bas cela ne me change pas de feuille :/

J'en ai marre d'être aussi nuuuuuuul

 

[soan]

Bonjour Guillaume,

voici un exemple pour "Feuil1" + 4 autres feuilles.

fais Ctrl e ➯ travail effectué !

à toi d'adapter pour ton vrai fichier.

soan