Microsoft 365 Création planning dans Excel via Macro

[Paulo27]

Bonjour à tous et à toutes,

Débutant en Excel, j'ai besoin de votre aide pour compléter une macro.
Je vous explique la problématique.

J'ai en première feuille (ARTICLES-COMMANDES) la colonne B avec mon nom d'article puis les colonnes suivantes avec plusieurs quantités et semaines de livraison.

J'ai en 2ème feuille le planning avec en colonne B le nom d'article repris via la fonction UNIQUE afin de supprimer les doublons puis la somme en colonne C.

Le but du jeu serait de venir inscrire la quantité de chaque ligne de la première feuille dans la ligne et colonne correspondante de la 2ème feuille.

Exemple :

Ligne 2 de la première feuille, colonne E (24/2022), le montant viendrait s'inscrire en ligne 4 de la colonne AD de la 2ème feuille.

Difficulté supplémentaire, j'ai des doublons donc il faudrait inscrire dans la macro une fonction qui permettrait de faire la somme directement en cas de doublon de ligne sur un même mois.

En espérant avoir été clair...

Merci pour votre aide.

Voici ma macro :


Sub Planning()
Dim dercellCom As Long
dercellCom = Sheets("ARTICLES-COMMANDES").Cells(Rows.Count, 1).End(xlUp).Row
Dim dercellBDD As Long
dercellBDD = Sheets("PLANNING").Cells(Rows.Count, 1).End(xlUp).Row
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Sheets("ARTICLES-COMMANDES").Range("O5:O10000") = ""
For i = 2 To dercellArt
For j = 4 To dercellPlanning

If (Sheets("ARTICLES-COMMANDES").Cells(i, 2) = Sheets("PLANNING").Cells(j, 2)) Then
Sheets("PLANNING").Cells(i, 5) = Sheets("TABLEAU DES COMMANDES").Cells(i, 6)
End If
Next j
Next i
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub

 

[sousou]

Bonjour
Ton fichier fait appel à des reférences extérieure,. pas pratique!

 

[Paulo27]

Hello Sousou,

Qu'entends-tu par références extérieures ?
Merci pour ton aide.

 

[sousou]

Désolé, mais c'est une erreur de ma part, c'est simplement la fonction que je n'ai pas sur ma version

 

[Paulo27]

Dis-moi si je peux t'aider à m'aider du coup

 

[sousou]

Re
Tu peux t'inspirer de ceci,
J'ai simplement changer des formule pour qu'elle soient compatible avce ma cversion 2010

 

[Efgé]

Bonjour à tous.
L'utilisation de VBA est obligatoire ?
En formule ça se fait bien.
Mise sous forme de tableau structuré les données
j'ai modifié les formules de la ligne 3 de l'onglet Planning pour supprimer les formules de la ligne 2 du même onglet.
Cordialement

 

[Paulo27]

Merci pour vos réponses, Efgé, sur le tableau de planning il me manque pas mal de données (certaines lignes sont vides alors qu'une somme devrait apparaître).

Peux-tu m'aider ?

 

[Efgé]

Re
Peux tu me donner un exemple de "manque" ?

 

[Paulo27]

Re
Peux tu me donner un exemple de "manque"

Par exemple, les lignes 55 à 59 sont vides en termes de planning

 

[Efgé]

Re
J'ai vu.
Je n'avais pas bloqué les colonnes du tableau structuré. C'est un piège qui me joue souvent des tours
Comme ça je remonte les mêmes valeurs que @sousou
Cordialement

 

[Paulo27]

Re
J'ai vu.
Je n'avais pas bloqué les colonnes du tableau structuré. C'est un piège qui me joue souvent des tours
Comme ça je remonte les mêmes valeurs que @sousou
Cordialement

C'est parfait merci à vous et sans macro encore mieux.

Je vous confirme d'ici 2-3 jours ci cela fonctionne quand je changerais les données

 

[ChTi160]

Bonjour le fil
Juste une question
La colonne "Material" ne sert à rien dans le Planning ?
Bonne journée
Jean marie

 

[Paulo27]

Bonjour le fil
Juste une question
La colonne "Material" ne sert à rien dans le Planning ?
Bonne journée
Jean marie

Hello,

Pas ici mais elle me servira à l'avenir.

Bonne journée.

 

[ChTi160]