Copier cellules non vides

Bonjour,

Selon mon fichier ci-joint, je souhaiterais copier les cellules de l'onglet "Database" dans l'onglet "FINAL" selon cette logique:

- Attribuer le bon groupe en face des "Names" (ex: Groupe 1 pour A1, Groupe 2 pour A2, A3...)
- Supprimer les cellules vides de la colonne B

Ce qui donnerait en version finale l'onglet "Résultat".

J'ai rentré un code pour copier le nom des groupes en dessous quand cellule vide, mais je bloque pour la suite...
Merci beaucoup par avance.

N'hésitez pas si vous avez des questions :)

Belle journée!

10test.xlsx (11.90 Ko)

Bonjour,

Un test via POWER QUERY qui ira bien plus vite qu'une macro :

let
    Source = Excel.CurrentWorkbook(){[Name="BDD"]}[Content],
    #"Type modifié" = Table.TransformColumnTypes(Source,{{"Groupe", type text}, {"Names", type text}}),
    #"Rempli vers le bas" = Table.FillDown(#"Type modifié",{"Groupe"}),
    #"Lignes filtrées" = Table.SelectRows(#"Rempli vers le bas", each ([Names] <> null))
in
    #"Lignes filtrées"

Cdlt,

6test.xlsx (19.89 Ko)

Edit : Pour l'actualiser il suffit de charger les donnes dans le tableau d'origine, d'aller sur une des cellules du tableau de la feuille FINA, clic droit et actualiser.

Merci énormément, je ne connaissais pas du tout ce format !
Je vais essayer de le comprendre, encore merci :)

Bonjour,

Pour explorer un peu POWER QUERY qui n'est pas du langage VBA mais du langage M sous Excel : Données > Afficher les requêtes > Clic droit sur la requête > Modifier. Vous avez alors les opérations réalisées dans l'éditeur POWER QUERY sur le panneau de droite.

Cdlt,

Rechercher des sujets similaires à "copier vides"