Encodage via USF

[jorisphi]

Bonjour à tous

J’aimerais charger mes données dans différentes plages et ce, via le même Userform
(Soit par un bouton de commande, soit par une zone texte)
Est-ce possible ?....

Grand MERCI d’avance
Cordialement
Jorisphi

 

[sousou]

Re : Encodage via USF

bonjour
Voici ton fichier avec ma version.
Je te proposes d'utiliser une cellule ("test") qui génére l'évènement.
elle te pert de définir le formulaire en cours, et de là, remplir tes cellules

 

[sousou]

Re : Encodage via USF

avec le fichier c'est mieux

 

[jorisphi]

Re : Encodage via USF

Cher sousou
Extraordinaire Ta solution !....Je ne connaissais pas cette méthode (Je suis débutant)
Je me demandais comment j'allais m'en sortir
Grand MERCI pour ton aide précieuse

Juste encore une chose, comment imposer l'encodage des zones sinon MSGBox "A remplir"?

Merci à toi
Cordialement
Jorisphi

 

[sousou]

Re : Encodage via USF

RE
Désolé, mais je ne comprend pas ta question?
encoder? zone?
Merci de préciser

 

[jorisphi]

Re : Encodage via USF

Cher sousou

Ma question prête à confusion, je le reconnais (Mea Culpa)

J'aimerais que les TextBox et Listbox de mon USF soient obligatoirement remplies, sinon MSGBOX : "A compléter"

Merci d'avance
Très cordialment
Jorisphi

 

[Macpoy]

Re : Encodage via USF

bonjour le forum, jorisphi , sousou

avec if textbox1 = "" then msgbox

à mettre dans l'action commandée par le bouton

etc ...
pour les autres
@plus jacques

 

[jorisphi]

Re : Encodage via USF

Cher Macpoy

Grand merci pour ton aide
Cordialement
Jorisphi

 

[jorisphi]

Re : Encodage via USF

Bonjor Macpoy
J'ai essayé et cela fonctionne
J'aimerais aussi ce textbox1 soit rempli obligatoirement,
et qu'il me refuse de valider mes encodages, cad qu'il m'enpêche de quitter mon USF sans avoir rempli ce textbox1
Merci
Jorisphi

bonjour le forum, jorisphi , sousou

avec if textbox1 = "" then msgbox

à mettre dans l'action commandée par le bouton

etc ...
pour les autres
@plus jacques

 

[sousou]

Re : Encodage via USF

Re bonjour

Une solution de controle facilement modifiable si tu veux changer des choses

 

[jorisphi]

Re : Encodage via USF

Cher sousou
Oh Là Là, Que c'est SUPER !........
Décidemment, j'en apprends avec Toi

Un TOUT TOUT GRAND MERCI !.......

Très Très cordialement
Jorisphi

 

[jorisphi]

Re : Encodage via USF

Bonjour Sousou
Je viens de constater qu'il m'accepte ma Listbox1 , alors qu'il devrait me donner le msgbox "manquant"
De plus , il ne me charge pas le contenu de ma listbox1
Est-ce normal ?...

Peux-tu jeter un coup d'oeil?
Merci d'avance
Jorisphi

Re bonjour

Une solution de controle facilement modifiable si tu veux changer des choses

 

[sousou]

Re : Encodage via USF

Bonjour Jorisphi
He oui! un peu rapide...
Une listbox n'ayant reçu aucune sélection ne peut renvoyer une valeur string comme""
il faut alors tester si elle est sélectionnée.
Pour cela la propriété listindex renvoi -1 quant rien n'est sélectionner ou un numéro d'index de 0 à x pour donner l'indice de sélection.
Remplace donc commo ci-dessous.
Cordialement
If ListBox1.ListIndex = -1 Then Valid = Valid & Chr$(13) & "Box 5"

 

[jorisphi]

Re : Encodage via USF

Cher Sousou Bonjour

Voilà une explication comme je les aime
C’est comme cela que j’apprends et que je progresse
GRAND MERCI !

Excuse-moi de t’ennuyer encore une fois, mais j’ai « séché » hier toute la soirée, mais je ne suis pas parvenu à modifier que (partiellement) l’emplacement du chargement de mon userform
Peux- tu me mettre sur la voie ?....
J’aimerais qu’il se charge via mes cellules Q19 et Q30

Je te joins mon fichier

Encore grand MERCI pour ton aide
Très cordialement
Jorisphi

 

[Macpoy]

Re : Encodage via USF

bonjour le forum,

c'est cette ligne qu'il placer :

If Target.Row Mod 11 = 8 And Target.Column = 17 Then

bonne journée
@plus jacques