Aprovisionner les cellules via list box et text box

C

CHALET53

XLDnaute Barbatruc

• 19 Février 2013

• #2

Re : Aprovisionner les cellules via list box et text box

bonjour,

J'ai commencé
Il reste l'ajout et le retrait pour la listview2
A toi de jouer

 

Pièces jointes

• MAN A.xlsm

  27.6 KB · Affichages: 47
• MAN A.xlsm

  27.6 KB · Affichages: 53
• MAN A.xlsm

  27.6 KB · Affichages: 43

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 20 Février 2013

• #3

Re : Aprovisionner les cellules via list box et text box

Merci baucoup CHALET53 merci baucoup le forum
encore un soucis pourquoi l'usf est si instable. comment ferais je poir que les dimensions et les positions des list box soient absolues afin qu'ils ne se baladent pas n'importe comment dans l'usf au point de masquer meme certains parametres.
voici le fichier relooké.

 

Pièces jointes

• MAN rec.xlsm

  28.1 KB · Affichages: 30

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 20 Février 2013

• #4

Re : Aprovisionner les cellules via list box et text box

Bonjour,

Pour l'instant, je ne vois pas la cause de ce problème. J'ai pourtant des userforms multipage et je n'ai aucun problème.

Peut-être, soumets ce problème dans une nouvelle demande (s'agissant d'un autre problème)

a+

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 20 Février 2013

• #5

Re : Aprovisionner les cellules via list box et text box

BONSOIR LE FORUM BONSOIR A TOUS
J'AI RESOLU LE PROBLEME en divisant cet userform en 2
j'ai portant créé un autre la supression de l'intitulé supprime plutot la cellule innitiale. voici le bout de code que je n'ai pas pu convertir
Private Sub CommandButton2_Click()
a = Range("L" & 1 + Rng)
Range("L" & 1 + Rng).Delete
End Sub
Voici aussi le fichier avec un seul USF que je pourrai multiplier.

 

Pièces jointes

• DIFFICULTES.xlsm

  27.5 KB · Affichages: 37

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 20 Février 2013

• #6

Re : Aprovisionner les cellules via list box et text box

Re,

rajoute devant la première procédure :
Dim rng as integer (la variable ainsi définie est reconnue par toutes les procédures parce que placée en tête)

Dans CommandButton2_Click
rajoute devant End Sub : userform_initialize (pour actualiser la listview)
a+

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 20 Février 2013

• #7

Re : Aprovisionner les cellules via list box et text box

tres grand merci ça marche a merveille ou lala
meeerciii

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 20 Février 2013

• #8

Re : Aprovisionner les cellules via list box et text box

encore un soucis. il ne faut mas les doublons

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 20 Février 2013

• #9

Re : Aprovisionner les cellules via list box et text box

Plus précisément :
Tu ne veux pas les doublons affichés dans la listview ?
Si oui : que fais-tu pour supprimer un enregistrement qui serait sur deux lignes (lequel prendre?)

tu veux aussi interdire l'enregistrement s'il existe déjà ?

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 21 Février 2013

• #10

Re : Aprovisionner les cellules via list box et text box

Bonjour le forum bonjour a tous.
je veux simplement interdire un nouvel enregistrement si celui ci existe dejà. si possible avec un msg box
remerci pour tout

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 21 Février 2013

• #11

Re : Aprovisionner les cellules via list box et text box

Bonjour,

Modifie comme suit Commandbutton1_Click

Private Sub CommandButton1_Click()
derligne = Sheets("Feuil1").Range("L65536").End(xlUp).Row
For i = 1 To derligne
If TextBox1 = Cells(i, 12) Then
MsgBox ("Personne déjà présente")
TextBox1 = ""
Exit Sub
End If
Next i
derligne = Sheets("Feuil1").Range("L65536").End(xlUp).Row + 1
Range("L" & derligne) = TextBox1
TextBox1 = ""
userform_initialize
End Sub

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 21 Février 2013

• #12

Re : Aprovisionner les cellules via list box et text box

Merci baucoup ça marche comme sur des roulettes
GRAND MERCI CHALET53

 

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 21 Février 2013

• #13

Re : Aprovisionner les cellules via list box et text box

BONSOIR LE FORUM
j'éprouve encore une difficulté suplémentaire dans mon usf
je l'ai intégré dans un Usf plus grand et plus complexe mais, seul la listview fonctionne les doutons sont inactifs. je vous propose un bout de fichier allégé.
VOIR FEUIL b DU FICHIER
contrairement a ce qui s'applique, je voudrai que quelque soit l'endroit ou se trouve l'usf 1, que l'usf 2 n'ait pour source que la feuil 1. tout ce qu'on peut faire sur cet usf n'est appliqué que sur la feuil1

 

Pièces jointes

• MAN TEMP.xlsm

  24.6 KB · Affichages: 28

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 21 Février 2013

• #14

Re : Aprovisionner les cellules via list box et text box

salut

Si... tu tiens au contrôle ListView, un exemple (après nettyoage)

 

Pièces jointes

• Usf_ListView.xls

  40 KB · Affichages: 32

Vote positif 0 Vote négatif

M

MAN

XLDnaute Occasionnel

• 21 Février 2013

• #15

Re : Aprovisionner les cellules via list box et text box

MERCI LE FORUM
MERCI CHALET53 MERCI SI...
au fait comment faire comprendre au forum que le probleme est résolu

 

Vote positif 0 Vote négatif