Code VBA alerte dans une autre feuille

Salut tout le monde

je vous explique ce que je veux faire.

j'ai une base de données (archive RDA)je cherche un code vba qui me permet d'afficher tout les les lignes qui contient "livraison partielle" (colonne L dans la feuille ( alerte livraison partielle).

Je vous remercie

Cordialement

18rda.xlsm (66.62 Ko)

Bonsoir lili1990, le forum,

Un essai:

Sub transfert()

    Dim derCellColL As Long  'derniere cellule feuille de départ col L
    Dim derCellColA As Long
    Dim i As Long

    derCellColL = Sheets("ARCHIVE RDA").Range("e65535").End(xlUp).Row + 1

    For i = derCellColL To 2 Step -1

        With Sheets("ARCHIVE RDA")
            If .Cells(i, 12).Text = "LIVRAISON PARTIELLE" Then
                .Cells(i, 12).EntireRow.Copy _
                  Destination:=Sheets("ALERTE LIVRAISON PARTIELLE").Range("a65535").End(xlUp).Offset(1, 0)

            End If
        End With
    Next i

End Sub

Source:

https://forum.excel-pratique.com/excel/copier-lignes-dans-autre-feuille-a-la-prmiere-ligne-vide-t19271.html

Cordialement,

11copie-de-rda-1.xlsm (70.41 Ko)

Salut

je veux le faire automatique sans créer bouton .merci

cordialement.

Bonjour lili1990, le forum,

A coller dans le module de la feuille ARCHIVE RDA :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

j = 3
For i = 2 To 65536
If Worksheets("ARCHIVE RDA").Range("L" & i).Value = "LIVRAISON PARTIELLE" Then
Worksheets("ALERTE LIVRAISON PARTIELLE").Range("A" & j & ":L" & j).Value = Worksheets("ARCHIVE RDA").Range("A" & i & ":L" & i).Value
j = j + 1
End If
Next i

End Sub

Cordialement,

18rda-3.xlsm (71.97 Ko)

SALUT

je l'ai testé et j'ai constaté ce problème.

lorsque une livraison partielle dans la feuille "ARCHIVE RDA" devient LIVRE se changera pas dans la feuille alerte livraison partielle .

je vous remercie

bye

Re,

lorsque une livraison partielle dans la feuille "ARCHIVE RDA" devient LIVRE se changera pas dans la feuille alerte livraison partielle

Un nouvel essai : je vide la feuille ALERTE LIVRAISON PARTIELLE avant le transfert des données.

Module2 :

Sub EffaceTablo2()
Sheets("ALERTE LIVRAISON PARTIELLE").Range("Tableau2").ClearContents
End Sub

J'ai mis tes données sous forme de tableaux (Tableau1 pour ARCHIVE RDA, Tableau2 pour ALERTE LIVRAISON PARTIELLE).

Crdlt,

18rda-4.xlsm (75.42 Ko)

Bonsoir le fil, bonsoir le forum,

Ce qu'il y a d'extrêmement pénible avec Lili, c'est qu'elle expose toujours très mal son problème et qu'elle le modifie au fur et à mesures des solutions apportées !...

En pièce jointe une proposition qui devrait correspondre (si elle ne change pas encore d'avis). Mais je crois bien que c'est le dernière fois que je lui vient en aide. D'abord parce que je n'aime pas être harcelé par mail perso mais surtouit pour les raison que j'ai expliquées plus haut.

Le fichier :

24lili-v01.xlsm (76.83 Ko)

SALUT

parfait il marche très bien .

je vous remercie beaucoup

bye

Rechercher des sujets similaires à "code vba alerte feuille"