Problème d'interaction avec le VBA

[blancolie]

Bonjour,

Dans ce fichier et onglet projet d'équipe, le tableau suivant d'insère une nouvelle ligne grâce au VBA mais le soucis c'est que dans la deuxième colonne (plante), j'ai crée une saisie saisie-automatique. A cause du code VBA, cette saisie ne fonctionne pas a cause que je dois appuyer sur entré pour que la saisie semi-automatique fonctionne. Le fait d'appuyer sur entré rajoute une ligne à mon tableau mais cela désactive ma saisie.

J'aimerais que la ligne se rajoute seulement si je clique sur la cellule vide de la colonne Secteur/massif. j'espère que faire cela, ma saisie semie-automatique fonctionnera.

Avez vous une solution ?

Merci d'avance

 

[job75]

Bonjour blancolie,

Avec cette macro :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With [Tableau11]
    With .Rows(.Rows.Count + 1)
        If Not Intersect(ActiveCell, .Cells(1)) Is Nothing And .Cells(0, 1) <> "" Then
            .Rows(0).Copy .Cells(1)
            .SpecialCells(xlCellTypeConstants).ClearContents
        End If
    End With
End With
End Sub

Le tableau s'agrandit uniquement quand on sélectionne la cellule suivante en colonne B.

A+