Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Saisie par Userform

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

halecs93

XLDnaute Impliqué
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)
 

Pièces jointes

Trier par date Trier par votes
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
 

Pièces jointes

Vote positif 0 Vote négatif
Merci...

Je me demandais si on pouvais afficher dans un userform le même tableau que j'ai défini D34-E132....
 
Vote positif 0 Vote négatif
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
 
Dernière édition:
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
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
 

Pièces jointes

Vote positif 0 Vote négatif
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
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
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
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 Saisie par userform ne fonctionne pas
Réponses
10
Affichages
194
jcf6464
M
  • Résolu(e)
XL 2019 saisie sur la première ligne vide depuis un formulaire
Réponses
8
Affichages
330
Mimi1952
M
S
  • Résolu(e)
Microsoft 365 Choisircols et ajout de colonne
Réponses
14
Affichages
305
AtTheOne
P
  • Question Question
Microsoft 365 Vérification formule à la fermeture du classeur
Réponses
4
Affichages
194
pierrof
P
  • Résolu(e)
XL 2016 Bug liste déroulante dans UserForm
2
Réponses
20
Affichages
974
yannick64
  • Question Question
XL 2021 Saisies multiples
Réponses
4
Affichages
178
job75
R
  • Résolu(e)
XL 2016 Validation des données avec condition
Réponses
14
Affichages
515
Rads
R
J
  • Question Question
XL 2019 Image dans UserForm
Réponses
14
Affichages
896
patricktoulon
  • Question Question
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
609
Lu76Fer
  • Question Question
XL 2019 Saisie de Résultats avec UserForm
2
Réponses
21
Affichages
1 K
Caninge
P
  • Question Question
XL 2019 Bloquer la saisie dans une colonne sous condition
Réponses
1
Affichages
610
sylvanu
  • Question Question
Microsoft 365 Remplacement d'une zone de texte Activex
Réponses
7
Affichages
584
wDog66
  • Résolu(e)
Microsoft 365 Userform - Transfert de données
Réponses
6
Affichages
602
Simbaa
  • Question Question
Microsoft 365 Création d'un fichier entier par rapport à des entrées via UserForm
Réponses
1
Affichages
700
job75
  • Question Question
Microsoft 365 [Résolu] VBA | Interdire la saisie de certains caractères dans un TextBox
Réponses
5
Affichages
2 K
ralph45
A
  • Question Question
Microsoft 365 Afficher / Masquer des frames à partir d'un tableau d'applicabilité
2
Réponses
16
Affichages
1 K
Ay-Ricko
A
E
  • Question Question
Microsoft 365 utilisation de la fonction rechercher/remplacer pour ajouter un caractère d'annihilation par ' en amont de chaque contenu de la cellule
Réponses
2
Affichages
510
elgringo123456
E
A
  • Question Question
Microsoft 365 Afficher la valeur d'une cellule en fonction de 3 conditions via VBA
Réponses
2
Affichages
728
Ay-Ricko
A
A
  • Résolu(e)
Microsoft 365 PowerPivot-comparer 2 périodes
Réponses
12
Affichages
862
Antho1234
A
M
  • Question Question
XL 2010 Comment renommer les colonnes A,B, C par un titre de colonne ?
Réponses
8
Affichages
1 K
TooFatBoy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…