Copie de ligne d'un tableau vers un autre

6test.xlsm (18.41 Ko)

Bonjour les Pros d’Excel.

J’ai un petit conseil à vous demander.

Dans le fichier Test qui est joint à ce message, je voudrais avec une formule macro, que dans la même feuille, quand je sélectionne une ligne dans le tableau 2 et que je la copie dans la ligne supérieure du Tableau 1, la ligne sélectionnée dans le tableau 1 disparaisse automatiquement.

Dans la macro qui l’accompagne cette formule fonctionne très bien dans 2 feuilles différentes mais pas dans une même feuille.

Est-ce possible ???

D’avance merci pour une réponse positive.

Eugène

Bonjour,

Si quand tu parles de 'disparition' ... tu veux dire supprimer la ligne ... je te conseille d'avoir un Tableau par Feuille ... tu te faciliteras grandement la vie ...

Oui je sais, mais c'est pour avoir moins de feuilles dans le classeur car mon classeur officiel contient beaucoup de feuilles.

Merci quand même mais cela ne m'aide pas.

Eugène

Bonjour,

Une proposition à étudier.

Cdlt.

Public Sub DEMO()
Dim lo As ListObject, lo2 As ListObject
Dim N As Long
    Application.ScreenUpdating = False
    With ActiveSheet
        Set lo = .ListObjects("Tableau1")
        Set lo2 = .ListObjects("Tableau2")
    End With
    If Not ActiveCell.ListObject Is Nothing Then
        If ActiveCell.ListObject.Name <> lo2.Name Then
            MsgBox "Veuillez sélectionner une cellule dans " & lo2.Name & "!"
        Else
            N = ActiveCell.Row - lo2.HeaderRowRange.Row
            With lo
                .ListRows.Add Position:=1
                lo.ListRows(1).Range.Value = lo2.ListRows(N).Range.Value
            End With
            lo2.ListRows(N).Delete
        End If
    End If
End Sub

Je te remercie Jean Eric, cela fonctionne très bien mais la ligne vide du tableau2 reste vide et quand tu a un tableau avec beaucoup de ligne à copier, cela fait beaucoup de lignes vides. Y a t'il une solution à cela???

Encore grand merci

Eugène

Re,

Je ne comprends ta question.

Un tableau vide comporte toujours une ligne vide et elle ne peut pas être supprimée.

As-tu un exemple concret à proposer ?

Cdlt.

Salut Jean Eric

Tu as raison, j'ai placé ta macro dans mon fichier définitif et cela fonctionne très bien.

Mille fois merci

Eugène

Re,

Merci pour tes remerciements.

Pense à clore le sujet.

Cdlt.

Rechercher des sujets similaires à "copie ligne tableau"