Discussion :

[Vesta]

Le DoEvents n'est pas une solution miracle non plus hein :p ca regle souvent pas mal de prob mais la ca ne sert a rien...

[ouskel'n'or]

Je réponds à ça

j'ai ecri ce que ma dit vesta mais ca marche pas. je comprend pas ce qu'est l'instanciation de la feuille ou le fait que je doive déclarer ca dans un module.

Laisse tomber, c'est ta façon d'utiliser BDD1 qui m'a trompé. Rien à déclarer, tu peux passer la frontière tranquille

A+

[Vesta]

Le prob c'est sa facon de nommer les choses...

peu etre la

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

formname.REC27.Text

*

Ou alors elle a pas vu que j'ai mis des points devant tt ses lignes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  .Cells(1, 9).Formula = REC8.Text

[ouskel'n'or]

Le DoEvents n'est pas une solution miracle non plus hein :p ca regle souvent pas mal de prob mais la ca ne sert a rien...

Ah non ? Et qu'en est-il si la form est rendue invisible alors qu'on cherche à lire ce qu'il y a dedans ? Comme je ne le sais pas (jamais testé) le doevents peut, peut-être, arranger les choses... Et comme je ne vois pas d'autre pb... attendons la réponse de jamelie

A+

[Vesta]

ca marche... Mais bon la on la rend invisible apres avoir lu les données...

attendons...

[ouskel'n'or]

Mais bon la on la rend invisible apres avoir lu les données...

Non, c'est là le pb. Le programme se poursuit même si les cellules ne sont pas encore mises à jour. Et comme je ne sais pas ce qu'il se passe dès lors que l'on fait un Hide... tc'estesrats

A+

[jamelie]

ca me met toujours un message d'erreur objet requis et ca me selectionne la ligne

.Cells(1,0).formula = RECAnnée.text

ca me la surligne en jaune ca bloque des le début

[ouskel'n'or]

.Cells(1,0).formula = RECAnnée.text

effectivement, si tu mets 0 comme N° de colonne, ça ne pourra jamais fonctionner. Revoie ce que tu fais et donne un N° de colonne existant !

Un bêêêêtise grosse comme ÇA et je ne l'avais même pas vue...

[jamelie]

ca me met toujours la même erreur et à la même ligne

[ouskel'n'or]

Mets-nous ton "nouveau" code

A+

[jamelie]

c'est le mêm avec juste le 0 qui est devenu un1 et donc tous les autres chiffres sont décalés de 1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Public sub CdBSave1_click()
With worksheets("BDD1")
  .Cells(1, 1).Formula = RECAnnée.List
  .Cells(1, 2).Formula = RECMois.Text
  .Cells(1, 3).Formula = REC1.Text
...

Mais le problème vien peut etre du fait que RECAnnée et RECMois proviennent d'une autre userform que celle utilisée pour REC,2,3..
Mais je sais pas du tout c'est juste une idée comme ca

[Vesta]

Mais le problème vien peut etre du fait que RECAnnée et RECMois proviennent d'une autre userform que celle utilisée pour REC,2,3..
Mais je sais pas du tout c'est juste une idée comme ca

Ca peu surement venir de la...

formname.nomducontrole.propriétévoulue

FORMNAME.RECAnnée.text

[jamelie]

ça marche toujours pas : erreur au même endroit...

[ouskel'n'or]

La form en question, elle est invisible ou fermée (Hide ou unload) ?

A+

[Vesta]

Si elle est fermée c'est mort...

[jamelie]

c'est bon les gars vous inquiètez pas j'ai réussi à le faire fonctionner. il fallait juste que je rajoute userform4 devant RECAnnée et devant RECmois parce que ces données sont selectionnées dans la userform4 alors que les suivantes sont selctionnées dans la userform1.
Merci beaucoup de votre aide ca ma permi de bien avancer.
Bonne soirée à tous.
Jamelie