XL 2016 Saisie par Userform

[halecs93]

Bonjour à toutes et à tous,

Grâce aux conseils qui me sont donnés ici et là, je poursuis ma progression.

Du coup, je voulais savoir si il était possible d'utiliser un userform pour "remplacer" la zone D34-E132 ? En fait je souhaiterais que les utilisateurs saisissent les données avec un userform... en espérant être clair.

Merci à vous (fichier joint)

 

[Jacky67]

Bonjour à toutes et à tous,

Grâce aux conseils qui me sont donnés ici et là, je poursuis ma progression.

Du coup, je voulais savoir si il était possible d'utiliser un userform pour "remplacer" la zone D34-E132 ? En fait je souhaiterais que les utilisateurs saisissent les données avec un userform... en espérant être clair.

Merci à vous (fichier joint)

Bonjour,
Perso, je ferais une feuille "BaseDonnées" avec tous les données comme dans la PJ( ce n'est qu'un exemple)
Pour la saisie des manif, un userform (comme tu l'as déjà fait)
Pour le matériel un autre userform pour la saisie du matériel avec les textboxs numerotés de 20 à nombre max pour facilité la lecture et l'inscription sur la feuille "BaseDonnées"
Le tout stocké dans une seule feuille.
Ensuite il sera facile d'équipé l'userform "matériel" d'un combobox pour retrouver ses petits.
Puis une feuille comme déjà fait avec toutes les rubrique(entêtes de la feuille"BaseDonnées" pour visualiser et imprimer, contenant un combobox avec le nom des manif..
Une feuille simple avec bouton 'Nouvelle Manif." un bouton "Attribution Matériel" et éventuellement un bouton "ajout de matériel" qui permet l'accès au différent userform
Eventuellement une feuille ou une colonne contient le matériel disponible
Tout cela n'est qu'une suggestion, il t'appartient de le faire ou non, selon ce schéma

PS: dans la pj, les textboxs ont été renumérotés de 1 à 19

 

[halecs93]

Bonjour,
Perso, je ferais une feuille "BaseDonnées" avec tous les données comme dans la PJ( ce n'est qu'un exemple)
Pour la saisie des manif, un userform (comme tu l'as déjà fait)
Pour le matériel un autre userform pour la saisie du matériel avec les textboxs numerotés de 20 à nombre max pour facilité la lecture et l'inscription sur la feuille "BaseDonnées"
Le tout stocké dans une seule feuille.
Ensuite il sera facile d'équipé l'userform "matériel" d'un combobox pour retrouver ses petits.
Puis une feuille comme déjà fait avec toutes les rubrique(entêtes de la feuille"BaseDonnées" pour visualiser et imprimer, contenant un combobox avec le nom des manif..
Une feuille simple avec bouton 'Nouvelle Manif." un bouton "Attribution Matériel" et éventuellement un bouton "ajout de matériel" qui permet l'accès au différent userform
Eventuellement une feuille ou une colonne contient le matériel disponible
Tout cela n'est qu'une suggestion, il t'appartient de le faire ou non, selon ce schéma

PS: dans la pj, les textboxs ont été renumérotés de 1 à 19

Merci...

Je me demandais si on pouvais afficher dans un userform le même tableau que j'ai défini D34-E132....

 

[JM27]

bonsoir
Pourquoi faire plusieurs posts pour le même sujet ?
voir ma réponse sur l'autre post
https://excel-downloads.com/threads/ordre-de-saisi-textbox.20070221/#post-20531635

 

[Jacky67]

Merci...

Je me demandais si on pouvais afficher dans un userform le même tableau que j'ai défini D34-E132....

La réponse à cette question est OUI
Mais il faudra mettre les mains et les neurones dans le cambouis.

 

[halecs93]

bonsoir
Pourquoi faire plusieurs posts pour le même sujet ?
voir ma réponse sur l'autre post
https://excel-downloads.com/threads/ordre-de-saisi-textbox.20070221/#post-20531635

Bonjour ...et navré... je ne pensais pas qu'il s'agissait du même sujet.

 

[halecs93]

La réponse à cette question est OUI
Mais il faudra mettre les mains et les neurones dans le cambouis.

Merci pour cet avis éclairé

 

[Eric C]

Re le fil

@Jacky67 : J'aime la simplicité de la répartition des données (J'engrange) - Tite question : dans cette ligne

If IsNumeric(Controls("TextBox" & i))......

Il me semblait que "IsNumerique" concernait uniquement que les données numériques et pas alphabétiques ??
Bonne soirée à toutes & à tous
@+ Eric c

 

[Jacky67]

Re le fil

@Jacky67 : J'aime la simplicité de la répartition des données (J'engrange) - Tite question : dans cette ligne

Il me semblait que "IsNumerique" concernait uniquement que les données numériques et pas alphabétiques ??
Bonne soirée à toutes & à tous
@+ Eric c

Bonsoir,
Dans l'exemple que j'ai donné
Il y a d'abord inscription de toutes les données en texte (un textbox ne contient que des données en texte)
.Cells(Derlg, i) = Controls("TextBox" & i)
Si celle-ci est uniquement numérique, elle est inscrite en nombre (Clng ou Cdbl)
If IsNumeric(Controls("TextBox" & i)) Then .Cells(Derlg, i) = CLng(Controls("TextBox" & i))
Si celle-ci est une date reconnue comme telle par excel, elle est inscrite en date
If IsDate(Controls("TextBox" & i)) Then .Cells(Derlg, i) = CDate(Controls("TextBox" & i
Les colonnes de destination doivent être au format nombre et au format date de ton choix.
Il est évident que l'organisation doit correspondre, colonne i=textbox i

 

[Eric C]

Re le fil

D'accord, il y a du "string", du numérique et du date. C'est plus clair pour moi. Chapeau bas l'artiste.
Je vais (demain) étudier le code de notre ami Jean-Marcel avec la propriété "Tag".
Bonne soirée
Eric

 

[Eric C]

Re le fil

@Jacky67 : Je suis toujours sur le code que tu as mis en ligne et me posais une question. Peut on reprendre le principe de la distribution dans les cellules avec l'ajout et le "mix" de 1 ou 2 ComboBox dans l'Usf ? J'ai tenté de modifier le code sans y parvenir d'où ma requête. Je joints un fichier où j'ai "neutralisé" la partie Initialise des ComboBox.
Remerciant par avance celui ou celle qui va bien vouloir se pencher sur mon problème.
@+ Eric c

 

[Jacky67]

Re le fil

@Jacky67 : Je suis toujours sur le code que tu as mis en ligne et me posais une question. Peut on reprendre le principe de la distribution dans les cellules avec l'ajout et le "mix" de 1 ou 2 ComboBox dans l'Usf ? J'ai tenté de modifier le code sans y parvenir d'où ma requête. Je joints un fichier où j'ai "neutralisé" la partie Initialise des ComboBox.
Remerciant par avance celui ou celle qui va bien vouloir se pencher sur mon problème.
@+ Eric c

RE
Comme précisé dans le message précédent l'organisation doit correspondre, colonne i=textbox i et ici en plus combobox i
Dans cet exemple les combobox sont numérotés 5 et 6
NB:
J'adopte ce principe généralement quand il y a beaucoup de contrôle, ici, pour 4 textbox et 2 combobox, la question qui se pose est :
Est-ce que cela vaut le coup ?
A toi de voir

 

[Eric C]

Re

Cela je l'avais compris mais peut on faire un "mix" en alternant entre les TextBox attitrés aux nom et prénom un ComboBox et envoyer les valeurs dans les cellules??
Je te remercie d'avance
@+ Eric c

 

[Jacky67]

Re

Cela je l'avais compris mais peut on faire un "mix" en alternant entre les TextBox attitrés aux nom et prénom un ComboBox et envoyer les valeurs dans les cellules??
Je te remercie d'avance
@+ Eric c

Re..
Ben... la pj ne fait pas ?????

 

[Eric C]

Re,

Je comprends la logique, on traite les TextBoxs puis les ComboBox. Ok. Je pensais que l'on pouvait mixer (1 TxtB puis 1 Cbx - 3 TxtB et enfin 1 Cbx). Ce n'est pas dans le protocole des choses. Encore grand MERCI à toi et bonne journée.
@+ Eric c