Valeur UserForm à transcrir en Variable

[Boby71C]

Re bonsoir à tous
J'ai un projet assez complexe à mettre en oeuvre.
J'ai créé un Userform ou il faud mettre un N° de Mois.
Ce N° de Mois, servira ensuite à extraire des lignes de données qui y correspondent.

He oui Chris c'est la suite de ma précédente question.

Pouvez-vous m'indiquer le code à utiliser pour que le chiffre saisi dans l'UseForm devienne une variable.

Je suis désolé de ne pouvoir vous donner un petit fichier, mais même réduit à son minimum pour le comprendre, il fait encore 1.5 MO

Merci à tous
@+

 

[JYLL]

Re : Valeur UserForm à transcrir en Variable

Bonsoir Boby71 et le Forum,

Voici une idée en rentrant tout siimplement le numéro compris entre 1 et 12 dans une textbox. Je reconstitue une date pour pouvoir avoir un mois et tu fais ce traitement pour ici mettre dans la cellule ("A1") :

Cells(1, 1) = Format("1/" & TextBox1 & "/2000", "mmmm")

Les 4m "mmmm" te donnent comme résultat le mois entier en lettres
Si 3m "mmm" le mois en abrégé;
Si 2m "mm" le mois en chiffre toujours 2 exemple pour Janvier "01"
si 1m "m" le mois en chiffre toujours 1 exemple pour Janvier "1" et deux pour les mois au dessus de 9.

Bon test.

 

[Boby71C]

Re : Valeur UserForm à transcrir en Variable

Bonjour Jyll et le forum.
Merci pour l'aide.
C'est impécable.

@+