Code VBA dur pour moi, mais surement simple pour vous :)

[Pygouv]

Bonjour,
Je souhaiterai un code appliqué à un bouton qui me permetterait de supprimer les lignes SI les cellules de la colonne A comporte un "N" ET que les cellules de la colonne "E" comporte "Inventory Total Gross"

J'ai en effet des doublons que je souhaiterai supprimer. Il faut que les lignes comportant ces 2 notions dans ces 2 colonnes disparaissent pour régler mon problème... si vous avez un code je suis preneur 🙂

Merci de votre aide 🙂

 

[Softmama]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Re,

un exemple ainsi :

Sub à_tester2()
Dim c As Range, cc As Range, d As Range, Y As Integer
'c usine de de départ
'cc Mois en cours pour cette usine
'd cellule d'arrivée
'Y année en cours de traitement

  Set c = Feuil1.Range("C2")
  Y = Feuil1.Cells(1, "F")
  Set d = Feuil2.Range("A2")
  Feuil2.Range("A2:G65000").ClearContents
  
 Do While c <> ""
  Set cc = c.Offset(, 4)
  Do While Feuil1.Cells(1, cc.Column) <> ""
    If IsNumeric(Feuil1.Cells(1, cc.Column)) Then Y = Feuil1.Cells(1, cc.Column): Set cc = cc.Offset(, 1)
    c.Resize(, 3).Copy d
    If cc <> "-" Then
      d.Offset(, 3) = Feuil1.Cells(1, cc.Column)
      d.Offset(, 4) = Y
      d.Offset(, 5) = cc
      Set d = d.Offset(1)
    End If
    Set cc = cc.Offset(, 1)
  Loop
  Set c = c.Offset(1)
 Loop
End Sub

Vois le fichier joint.

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

merci tu as testé le bouton chez toi? Cela fonctionne car moi cela ne fonctionne pas sur ton exemple enregistre le peut-être en .xlms 🙂

 

[Softmama]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

J'ai pas associé la macro au bouton, faut lancer la macro manuellement alt+f8

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Genial je te remercie! et donc même si mon onglet DB s'élargit et s'allonge cela fonctionnera

 

[Softmama]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Oui, tant que la structure globale du fichier reste identique.

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

je te remercie c'est super sympas, je vais aller me renseigner sur cette fonction offset qui m'a l'ai assez interessante 🙂

J'essairai d'appliquer ton code à mon cas demain 🙂

Bonne soirée à toi et encore merci!

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Bonjour Softmama,

Je n'arrive pas à appliquer ton code à mon cas (surement car je suis novice)

Je te joins donc mon doc réel (avec valeurs modifiées), j'aimerai la mise en forme qui est sur l'onglet 2.

les colonnes (sur l'onglet 1) A (KPI usage), B (Area) ne seront pas dans la nouvelle mise en forme, tout comme les colonnes "Total", "Bud" et "ACT". (col. T, U, V) et ceci pour chaque année futures...

J'ai déjà un bouton supprimant les "total gross inventory" en doublons

J'aimerai qu'en cliquant sur ce bouton, opn tombe sur l'onglet avec la nouvelle organisation des données...

Penses tu cela possible? Cela me debloquerai totalement dans ma création de l'outil...

Je te remercie

Pierre

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

As tu un email? le fichier est trop gros... merci

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Voila j'ai mis mon exemple sous la forme exacte de mon outil , si tu peux appliquer ton code a ce fichier ce serait super... J'ai mis () les colonnes en excès ne servant pas pour la nouvelle mise en forme...


Merci beaucoup

 

[Softmama]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Bonjour,

Vois si le fichier joint correspond à tes besoins.
Cordialement.

 

[Si...]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

salut

autre macro (copies de plages : gain de temps).

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Bonjour merci à vous!
J'ai essayé d'appliquer vos codes à mon outil!

@ Si... : tout fonctionne mais au niveau des données j'ai des soucis elles ne reviennent pas dans la colonne destinée
@ Softmama : Cela fonctionne bien mais s'arrete après un certains nombre de lignes, et apres le premier indicateur

Je vous mets en copie mon outil en ayant changé les données confidentielles... Comme cela je n'aurai plus qu'a l'appliquer...

Merci beaucou en tout cas à vous


Bonne soirée

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

j'ai plus de 1400 lignes de données et certaines s'ajouteront encore, ainsi que des colonnes avec les mois. et j'aimerai que ce bouton me fasse terminé sur la nouvelle mise en forme des données à la fin de la boucle... Auriez vous une ligne de code pour cela

 

[Pygouv]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

Merci à tous c'est bon j'ai réussi! je vous remercie 🙂

 

[Si...]

Re : Code VBA dur pour moi, mais surement simple pour vous 🙂

salut

je ne sais pas quelle solution tu as adoptée mais j'avais préparé une petite adaptation avec des explications.
Puisque c'est fait ...