Discussion :

[frunch]

Bonjour à tous,
C'est encore moi
Seul le champ en combobox passe pas en ajout de ligne,
savez vous pkoi ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
'Nouvel enregistrement
Private Sub btnEnregClt_Click()
    Dim i%, lig As ListRow, ws1 As Worksheet
    Set ws1 = Sheets("Clients")
   With [Clts].ListObject
        Set lig = .ListRows.Add  'ajout ligne vierge à la fin du tableau structuré
        i = lig.Index 'indice ligne ajoutée
        .ListColumns("Code client").DataBodyRange(i) = Me.codClt.Value
        .ListColumns("Nom").DataBodyRange(i) = Me.nomClt.Value 'LD
        .ListColumns("Adresse").DataBodyRange(i) = Me.adrClt.Value
        .ListColumns("Code postal").DataBodyRange(i) = Me.CPclt.Value
        .ListColumns("Ville").DataBodyRange(i) = Me.villClt.Value
        .ListColumns("Email").DataBodyRange(i) = Me.mailClt.Value
        .ListColumns("Tel").DataBodyRange(i) = Me.telClt.Value
    End With

forum.xlsm

Merci

[E KERGRESSE]

Vous avez un retour chariot dans le titre du champ Nom de la table Client.

Nb : Pour l'enregistrement d'un nouveau client, utiliser une Combobox n'a pas de sens.

[78chris]

Bonjour

Utiliser Validation et non des combobox qui alourdissent la classeur...

[frunch]

Bonjour,
Merci pour vos réponses, mais çà marche plus.
çà n'enregistre pas la LD, ou alors çà met le code au lieu du nom.
Et s'il y a une liste déroulante c'est pour le bouton modifier.

forum.xlsm
Bonne journée

[E KERGRESSE]

Le bouton Enregistrer crée une ligne. Il faut dans ce cas saisir le nom dans un TextBox. Le code au lieu du nom du client vient du BoundColumn actuellement 1

[frunch]

Bonjour,
Ouf çà passe avec le boundcolumnd à 2.
Mais si je dois créer un formulaire ou un onglet de formulaire pour avoir une combobox qui permet d'alimenter les champs avant une modification,
et donc doubler les formulaires pour mes clients, fournisseurs, commandes clts et fournisseurs, çà risque de faire beaucoup.
Et si c'est pas possible, pour moi les tableaux structurés perdent leur avantage avec un manque de souplesse.

Merci