Exporter ligne en état fini

cbea

XLDnaute Impliqué

• 13 Avril 2008

• #2

Re : Exporter ligne en état fini

Bonjour ascal44,

Voici une solution.
Sur la feuille Signalements, j'ai rajouté un bouton "Exporter".

 

Pièces jointes

• TABLEAU_v1.zip

  42.1 KB · Affichages: 29
• TABLEAU_v1.zip

  42.1 KB · Affichages: 33
• TABLEAU_v1.zip

  42.1 KB · Affichages: 26

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 13 Avril 2008

• #3

Re : Exporter ligne en état fini

Bonjour Ascal

essaye le code ci dessous :

Code:

Sub test()
Dim i As Integer
With Sheets("Signalements")
    For i = .Range("E65536").End(xlUp).Row To 15 Step -1
        If .Range("E" & i).Value = "F" Then
            .Range("A" & i & ":N" & i).Copy Sheets("FINI").Range("A65536").End(xlUp).Offset(1, 0)
            .Rows(i).Delete
        End If
    Next i
End With
End Sub

bon dimanche
@+

Edition : arff, bonjour cbea, trop rapide, désolé pour la collision...
2ème édition : code à placer dans un module standard.

 

Dernière édition: 13 Avril 2008

Vote positif 0 Vote négatif

A

ascal44

XLDnaute Occasionnel

• 13 Avril 2008

• #4

Re : Exporter ligne en état fini

Merci je pense que je vais réussir à me débrouiller grâce à vous

 

Vote positif 0 Vote négatif

A

ascal44

XLDnaute Occasionnel

• 14 Avril 2008

• #5

Re : Exporter ligne en état fini

Bonsoir, en fait il faudrait modifier le code de cbea que je n'arrive pas à faire.
Je voudrais qu'à chaque clic du bouton exporter s'archive à la suite les travaux finis sans écraser ceux qui figuraient avant dans la feuille "Fini"

Ma lecture du code VBA est encore limitée.
Merci à vous

 

Vote positif 0 Vote négatif

cbea

XLDnaute Impliqué

• 14 Avril 2008

• #6

Re : Exporter ligne en état fini

Bonsoir ascal44,

Voici une nouvelle version.
J'ai mis une ligne de code en commentaire (voir Modif 14/04/2008).

 

Pièces jointes

• TABLEAU_v2.zip

  41 KB · Affichages: 21
• TABLEAU_v2.zip

  41 KB · Affichages: 20
• TABLEAU_v2.zip

  41 KB · Affichages: 21

Vote positif 0 Vote négatif

A

ascal44

XLDnaute Occasionnel

• 14 Avril 2008

• #7

Re : Exporter ligne en état fini

Le problème c'est que dans la ligne 15 de la feuille " Fini " les données se suppriment à chaque action sur le bouton exporter !??

 

Vote positif 0 Vote négatif

cbea

XLDnaute Impliqué

• 14 Avril 2008

• #8

Re : Exporter ligne en état fini

Je n'avais pas vu l'anomalie. C'est corrigé.

 

Pièces jointes

• TABLEAU_v2.zip

  41.1 KB · Affichages: 29
• TABLEAU_v2.zip

  41.1 KB · Affichages: 24
• TABLEAU_v2.zip

  41.1 KB · Affichages: 24

Vote positif 0 Vote négatif

A

ascal44

XLDnaute Occasionnel

• 15 Avril 2008

• #9

Re : Exporter ligne en état fini

Merci à vous , maintenant je pense pouvoir l'appliquer

 

Vote positif 0 Vote négatif