Discussion :

[stefficab]

Bonjour à tous,

Je suis nouvelle sur le forum et n'y connait rien en programmation (!), et j'ai un souci avec mon document excel.
Je me retrouve avec un document (importé d'un logiciel de documentation) où il y a quelques anomalies : le contenu d'une case se retrouvant parfois décalé sur la ligne suivante.
Il me faudrait donc automatiser le traitement suivant : faire un couper-coller d'une case dont le contenu est uniquement BREN+6chiffres s'il est sur la colonne 2 et la ligne N, le coller à N-1 colonne 4, puis supprimer la ligne N.
Cela vous semble-t-il clair et possible à effectuer ?

Merci d'avance

[Daniel.C]

Bonjour,

(je n'y) connait rien en programmation

Oui, mais il faut t'y mettre. Le but du forum est de faire progresser chacun, pas de fournir une réponse à un besoin ponctuel qui risque d'évoluer. Enfin, puisque tu viens pour la première fois sur le forum :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub test()
    For i = Cells(Rows.Count, 2).End(xlUp).Row To 2 Step -1
        If Left(Cells(i, 2).Value, 4) = "BREN" And _
            IsNumeric(Right(Cells(i, 2).Value, 6)) Then
            Cells(i, 2).Copy Cells(i - 1, 4)
            Rows(i).Delete
        End If
    Next i
End Sub

Pour mettre en place et exécuter la macro :

1.appuie sur Alt+F11. La fenêtre VBE s'ouvre.
2.Repère dans la partie gauche le projet qui porte le nom de ton classeur. Clique dessus.
3. clique sur "Insertion" et "Module". Dans la partie droite, colle la macro.

Pour l 'exécuter, clique sur le menu "Outils", puis sur "Macro", "Macros". La fenêtre des macros s'ouvre. Clique sur le nom de ta macro et sur le bouton "Exécuter".

[stefficab]

Ca fonctionne ! Merci bien Daniel. Quand j'imagine le temps que j'aurais mis pour faire ça ligne par ligne... Effectivement ça vaut le coup de s'y mettre !