erreur dexécution 380

Cousinhub

XLDnaute Barbatruc

• 3 Juin 2009

• #2

Re : erreur dexécution 380

Bonsoir,

euh, à quel moment, le message d'erreur?

J'ai essayé (rajouter, supprimer, modifier), cela semble fonctionner...

A te relire...

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 3 Juin 2009

• #3

Re : erreur dexécution 380

Re-,

vu...

quand tu rajoutes un usager, tu définis mal la façon d'écrire dans l'onglet Database...

Remplace par :

Code:

        .Cells(i, 2).Value = Usagers.ComboBoxTitre
        .Cells(i, 3).Value = Usagers.TextBoxNom
        .Cells(i, 4).Value = Usagers.TextBoxjeunefille
        .Cells(i, 5).Value = Usagers.TextBoxPrenom
        .Cells(i, 6).Value = Usagers.TextBoxDN
        .Cells(i, 7).Value = TextBoxnumerovoie
        .Cells(i, 8).Value = TextBox1
        .Cells(i, 9).Value = TextBoxtypedevoie

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 3 Juin 2009

• #4

Re : erreur dexécution 380

Re-,

et de plus, lors du tri, tu définis mal la zone à trier...

remplace par :

Code:

    Set rng = Worksheets("DATABASE").Range("B3:S" & Worksheets("DATABASE").Range("c" & Cells.Rows.Count).End(xlUp).Row)

 

Vote positif 0 Vote négatif

C

chilo

XLDnaute Occasionnel

• 4 Juin 2009

• #5

Re : erreur dexécution 380

bonjour le forum

encore une fois merci à toi bhbh sans oublié hulk qui m'avez mis la voie

je vais essayé

peut on envoyé un mail depuis un répertoire ?
bonne journée à tous

 

Vote positif 0 Vote négatif

C

chilo

XLDnaute Occasionnel

• 6 Juin 2009

• #6

Re : erreur dexécution 380

bonsoir le forum

bhbh j'ai essayé mais les données d'effacent une fois affichée
peut regarder pour moi
merci


a bientot

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 6 Juin 2009

• #7

Re : erreur dexécution 380

Bonjour,

pour ton épine, j'avais joué au devin...

Mais là, il va falloir en dire un peu plus...

A quel moment, pour quelle action, bref explique un peu mieux...

 

Vote positif 0 Vote négatif

C

chilo

XLDnaute Occasionnel

• 7 Juin 2009

• #8

Re : erreur dexécution 380

bonjour le forum
bonjour bhbh

j'ai aujouté ta proposition et enregistrer
et fermer
j'ai rappellé le rep et la dans la listebox plus rien

 

Pièces jointes

• Membres3_v2.zip

  26.8 KB · Affichages: 17
• Membres3_v2.zip

  26.8 KB · Affichages: 18
• Membres3_v2.zip

  26.8 KB · Affichages: 15

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 7 Juin 2009

• #9

Re : erreur dexécution 380

Bonjour,

la modif que je t'ai donné n'est pas à placer dans l'évènement :

Code:

Private Sub lstbPersonnes_Click()

mais dans l'évènement du bouton de commande :

Code:

Private Sub cmdValider_Click()

regarde le fichier joint

 

Pièces jointes

• Membres3_v3.zip

  22.2 KB · Affichages: 28

Vote positif 0 Vote négatif

C

chilo

XLDnaute Occasionnel

• 7 Juin 2009

• #10

Re : erreur dexécution 380

reboujour le forum

merci bhbh
effectivement cela fonctionne désolé de ne pas l'avoir compris
cependant jee ne vais te lacher aussi facilement
peux tu regarder le fichier joint
un petit soucis d'incompatibilité
'myscp=.combobox1.?

 

Pièces jointes

• N_repversion02.zip

  23.6 KB · Affichages: 21

Vote positif 0 Vote négatif