Discussion :

[Invité]

Bonjour,

Je suis complètement débutante dans ce domaine, j'ai surtout regardé beaucoup de vidéos pour faire ce que j'ai fais jusqu'à présent. Néanmoins, me voilà bloquée sur un point et impossible de trouver où se situe le problème :

J'ai réalisé un formulaire personnalisé userform, j'aimerais que en cliquant sur enregistrer, les données qui sont inscrites dans le formulaire se positionnent sur une nouvelle ligne dans mon tableau. Or, comme c'est un tableau encore entièrement vide, la première ligne colorée est considéré par mon code comme étant remplie, et du coup, mon code crée une nouvelle ligne en dessous et laisse vide la première du dessus.

Pour illustrer mon propos, voici une capture d'écran :


Et voilà un bout de mon code, là où je suppose qu'il manque une petite information permettant de résoudre mon problème.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub GO_Click()
 
        Feuil1.Range("a1048576").End(xlUp).Offset(1, 0).Select
 
       ActiveCell = ActiveCell.Offset(-1, 0) + 1
 
       ActiveCell.Offset(0, 1) = Me.A
       ActiveCell.Offset(0, 2) = Me.B
 
 
End Sub

En résumé : Mon code ne me permet pas de remplir mon tableau dès sa première ligne. Et en plus il ne "prolonge" pas mon tableau quand des nouvelles données s'ajoutent. Peut-être faut-il que j'ajoute le nom de mon tableau ?

Par avance merci et bon après-midi.

[Trystan441]

Bonjour,

J'ai eu la même réflexion dans le passé !

J'ai corrigé cela en réduisant d'une ligne mon tableau. Ce qui fait que ta procédure dès la réelle première ligne vide et agrandira ton tableau en même temps.

[Invité]

Bonjour,

J'ai eu la même réflexion dans le passé !

J'ai corrigé cela en réduisant d'une ligne mon tableau. Ce qui fait que ta procédure dès la réelle première ligne vide et agrandira ton tableau en même temps.

C'est ce que je pensais, "malheureusement" quand on crée un tableau ("Mettre sous forme de tableau"), une première ligne vide colorée (ou non cela dépend du modèle choisi) se met automatiquement après les en-têtes et n'est visiblement pas retirable ...

[Menhir]

Je ne sais pas si ta méthode fonctionne mais, personnellement, lorsque j'ajoute une ligne à un tableau structuré, je passe toujours par la méthode Resize.
A lire : https://docs.microsoft.com/fr-fr/off...tobject.resize

[Invité]

Je ne sais pas si ta méthode fonctionne mais, personnellement, lorsque j'ajoute une ligne à un tableau structuré, je passe toujours par la méthode Resize.
A lire : https://docs.microsoft.com/fr-fr/off...tobject.resize

Je n'arrive pas à appliquer cette méthode.

[Menhir]

Je n'arrive pas à appliquer cette méthode.

Si tu ne montres pas ce que tu as fait, difficile de savoir où tu as commis une erreur.

[galopin01]

Bonjour,
C'est le principal inconvénient avec ces tableaux structurés : Il faut s'approprier un nouveau vocabulaire, oublier les plages déclarées en DECALER, les End(XlUp)...
Sous ce lien un petit classeur qui te décortique la méthode pour ajouter un enregistrement.
A+

[laurent_ott]

Bonjour.
J'ai écrit une documentation sur les manipulations des tableaux structurés, avec des fonctions prêtes à l'emploi et qui répondent à vos besoins je pense (et je vous le souhaite).
Voir dans ma signature le tome 5.

[Invité]

Bonjour,

Si tu ne montres pas ce que tu as fait, difficile de savoir où tu as commis une erreur.

Je ne peux rien vous montrer car je n'ai pas vraiment compris où je devais l'appliquer, comment bien l'appliquer.

Bonjour,
C'est le principal inconvénient avec ces tableaux structurés : Il faut s'approprier un nouveau vocabulaire, oublier les plages déclarées en DECALER, les End(XlUp)...
Sous ce lien un petit classeur qui te décortique la méthode pour ajouter un enregistrement.
A+

Je prends bien note de cette information, merci.

Bonjour.
J'ai écrit une documentation sur les manipulations des tableaux structurés, avec des fonctions prêtes à l'emploi et qui répondent à vos besoins je pense (et je vous le souhaite).
Voir dans ma signature le tome 5.

Je vais feuilleter cela, merci. Si jamais je résous mon problème, je fermerai le sujet avec en edit mon code.

[Menhir]

Je ne peux rien vous montrer car je n'ai pas vraiment compris où je devais l'appliquer, comment bien l'appliquer.

Tu ne fais absolument aucun effort pour participer à la résolution de ton problème.
Désolé mais tu as dépassé les limites de ma patience. Perso, j'arrête là.
Bonne chance pour la suite.

[Invité]

Tu ne fais absolument aucun effort pour participer à la résolution de ton problème.
Désolé mais tu as dépassé les limites de ma patience. Perso, j'arrête là.
Bonne chance pour la suite.

Veuillez m'excuser mais comme cité au tout début de ma conversation, je suis complètement débutante dans le domaine. Votre lien possède des explications sûrement très instructives pour quelqu'un qui s'y connaît. Malheureusement pour moi, c'est un peu du chinois et ce malgré toute ma bonne volonté. Je ne veux pas que l'on me prémâche le travail, je veux que l'on prenne un peu de temps pour m'expliquer plus en détails, pas à pas peut-être même, si vous m'accordez un peu de votre temps. Sachez que nous n'avons pas tous votre niveau de compréhension.

Je vous remercie et vous souhaite une agréable journée.

[Trystan441]

Bonjour,

Etant donné que tu es débutante, il y a un moyen très simple de résoudre le souci !

Tu rentres les données de ta première ligne à la main.
-> La première ligne de ton tableau sera considérée comme rempli (pour le tableau structuré)

Puis tu utilises ensuite ta macro.
-> Les données se mettront à la suite et ton tableau se redimensionnera

[Invité]

Bonjour,

Etant donné que tu es débutante, il y a un moyen très simple de résoudre le souci !

Tu rentres les données de ta première ligne à la main.
-> La première ligne de ton tableau sera considérée comme rempli (pour le tableau structuré)

Puis tu utilises ensuite ta macro.
-> Les données se mettront à la suite et ton tableau se redimensionnera

Bonjour,
C'est une bonne idée, mais ça ne sera pas très pratique car une fois terminé, j'aimerais bien bloquer la feuille pour que personne ne puisse faire de modification à l'intérieur et que la seule manière de remplir le tableau soit le formulaire.

Mais je suis en train de regarder une autre manière simple également de contourner mon problème :
J'ai transformé mon tableau en simple plage de données : de cette façon la première ligne après les en-têtes est considérée comme vide automatiquement.
Malheureusement je rencontre de nouveau un problème, je n'arrive pas à appliquer un code qui permettrait de "Si la ligne sélectionnée est déjà remplie, passage à la ligne en dessous pour écrire ce qu'il y a dans le formulaire" en gros. Car avec mon code actuel, ce que je veux enregistrer dans mon fichier remplace une ligne déjà remplie.

Voilà mon code :

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
17
18
19
20
21
22
23
24
Private Sub Enregistrer_Click()
 
'Enregistrer la saisie fait dans le formulaire
   'On cherche la prochaine ligne vide du tableau
        Feuil1.Activate
        Feuil1.Range("a1048576").End(xlUp).Offset(1, 0).Select
 
       ActiveCell.Offset(0, 0) = Me.txt1
       ActiveCell.Offset(0, 1) = Me.txt2
       ActiveCell.Offset(0, 2) = Me.txt3
       ActiveCell.Offset(0, 3) = Me.txt4
       ActiveCell.Offset(0, 4) = Me.txt5
       ActiveCell.Offset(0, 5) = Me.txt5
       ActiveCell.Offset(0, 6) = Me.txt6
       ActiveCell.Offset(0, 7) = Me.txt7
       ActiveCell.Offset(0, 8) = CDate(Me.txt8)
       ActiveCell.Offset(0, 9) = Me.txt9
 
       If MsgBox("Voulez vous entrer une nouvelle donnée?", vbYesNo) = vbNo Then
       Unload Me
 
    End If
 
End Sub