Creation Userform

Bonjour a tous

je suis un novice dans la programmation et c'est pour cela que je sollicite l'aide de votre forum

pour qui j'ai un profond respect au vu de votre travail

je cherche a créer un user form pour alimenter une feuillle de saisie

vous pourrez voir dans le fichier joint la maquette

je sais que cela représente un gros travail

je vous en remercie par avance


oups le fichier !!

9test-form.zip (40.64 Ko)

Pourquoi avoir fait une copie écran de l'userform mais ne pas avoir laissé celui-ci dans ce fichier ?

On est obligé de le recréer au lieu de juste écrire le code ^^

De plus, il y a une flèche bleue qui sort de la case "Contrôle index de l'annee", surement pour expliquer ce qu'elle doit contenir, mais rien d'écrit au bout ?

Oups je suis totalement desole voici le fichier avec le user

merci d'apporter un interet a ma demande

9test-form.zip (46.61 Ko)

A tester :

14test-form.zip (38.03 Ko)

WOUAHHHH

super merci melch

dans ton extreme gentillesse pourrais tu voir pour verifier "controle index de l'année"

il faudrait l'afficher si possible lors de saisie de l'annee de production

(c 'est a dire prendre l'année et verifier avec la colonne G de la feuille "champ de nom" )

SUPER merci

En entrant une date dans "Date de parution" ça met automatiquement l'index :

14test-form.zip (38.37 Ko)

Merci Pour ce tres gros travail

bonne soirée

Rebonjour a tous

j aurais aimé avoir une sortie de la textbox 2 au format europeen jj/mm/aaaa car pour l'instant il me donne mm/jj/aaaa

comment dois faire s'il vous plait

merci d'avance pour votre collaboration

Effectivement je n'avais pas fait attention voilà un nouveau fichier joint :

18test-form.zip (36.85 Ko)

Merci

melch

tu nas fait quoi pour que cela fonctionne

jlou a écrit :

Merci

melch

tu nas fait quoi pour que cela fonctionne

Dans le code au clic du bouton Valider, j'ai remplacé la ligne :

Cells(derLig, 7) = Me.TextBox8.Value

Par la ligne :

Cells(derLig, 7) = CDate(Me.TextBox8.Value)

La fonction CDate() permet de convertir en date.

SUPER Jai vu

c'est au niveau du code

Cells(derLig, 7) = CDate(Me.TextBox8.Value)

Merci a la team et tout particulierement a melch

Rechercher des sujets similaires à "creation userform"