Autres excel 2007

[chilo27]

Bonjour le forum

je rencontre un petit problème

Je n'arrive plus à enregistrer depuis ma combo une valeur dans textbox4
alors que cela à fonctionner j'ai bien essayé avec une combobox cela n'a pas fonctionné
non plus
quand je fais la saisie manuelle dans la colonne z la valeur saisie apparait dans l'userform

je vous remercie par avance pour votre aide
j'ai du réduire pour le volume pour compresser

 

[chilo27]

Rebonjour le forum
le fichier était trop volumineux

 

[sylvanu]

Bonjour Chilo,
J'ai essayé de cerner le problème par essais successifs, sans trop chercher à comprendre.
Il semblerait qu'en remplaçant :

    ''CODE POSTAL
    Set Fe = Worksheets("Feuil3")
    Set f3 = Worksheets("Feuil3")
    With Fe: Set Plage = .Range(.Cells(1, 1), .Cells(.Rows.Count, 1).End(xlUp)): End With
    Set Dico = CreateObject("Scripting.Dictionary")
    For Each Cel In Plage: Dico(Cel.Value) = "": Next Cel
    ComboBox12.List = Dico.keys

par

    ''CODE POSTAL
    Set Plage = Sheets("Acceuil").Range(Cells(1, 1), Cells(Rows.Count, 1).End(xlUp))
    Set Dico = CreateObject("Scripting.Dictionary")
    For Each Cel In Plage: Dico(Cel.Value) = "": Next Cel
    ComboBox12.List = Dico.keys

On arrive à ouvrir l'userform.
Je n'ai pas analysé l'origine du problème, mais cela devrait vous aider à comprendre.

Addon : Je pense que l'erreur vient de la déclaration de feuille.
Vous avez Feuil3(Accueil)
La déclaration est soit Sheets("Accueil") soit Sheets(3).
La déclaration Sheets("Feuil3") conduit à une erreur.
Alors pourquoi cela marchait il avant ? Quelles modifs avez vous fait ? ...

 

[chilo27]

Bonjour le forum, Sylvanu

J'ai essayé cela ne fonctionne pas

Je n'ai fait aucune erreur, car j'ai repris plusieurs fois le classeur, j'ai procédé par élimination, mais j'ai pas trouvé le pourquoi
Merci pour l'aide

 

[sylvanu]

J'ai essayé cela ne fonctionne pas

C'est à dire ? Mais encore ?

Si le problème était l'ouverture du userform, alors regardez mon fichier il s'ouvre correctement.
Quel problème rencontrez vous ?
Si vous ne donnez pas plus d'informations on va tourner en rond.

 

[sylvanu]

Attention, pour la mise au point j'ai mis cette ligne en commentaire :

f.Cells(ligneEnreg, 26) = Me.TextBox4

Dans la PJ c'est rectifié.
La valeur TextBox4 est bien enregistrée en colonne Z (26)

 

[chilo27]

Rebonjour, Sylvanu

Tout d'abord Merci de tenter de m'éclairer

Je n'ai aucun souci pour ouvrir le fichier, aucun message d'incompatibilité
Quand je rentre de nouvelles nouvelles données la sauvegarde s'effectue bien,
sauf bien entendu dans les colonnes w x y z que je découvre.
je mettais acharné sur LA colonne Z

Encore une fois merci

 

[chilo27]

Par ailleurs, lorsque je saisie directement dans la colonne Z les donnée apparaissent dans la textbox
le problème viendrait de la sauvegarde
Qaund je rentre de nouvelles données,
nom
prenom
cp
ville
nume
voie

la sauvegarde fonctionne bien
Désolé, mais je comprends pas donc à je fais appel à vous
pour m'aider à comprendre

Merci à vous

 

[sylvanu]

Je ne comprends vraiment pas le problème.
Si je rentre des valeurs dans l'userform Nom Prénom... TextBox4 alors les valeurs sont enregistrées dans BD.
Si je modifie la valeur en Z puis dans l'userform je rappelle Nom Prénom alors la bonne valeur dans TextBox 4 apparait. Si je modifie cette valeur et que j'appuie sur Modifier alors cette nouvelle valeur est bien mémorisée dans BD.
Je ne comprends pas où se situe votre problème.

 

[chilo27]

Merci beaucoup ,sylvanu

Pouvez vous remplir à peu près une dizaine de nom et me les mettre en pièce jointe Svp
En vous remerciant

 

[sylvanu]

Voilà.
J'ai mis des noms prénoms avec toujours le même indice, ainsi que Textbox4 : N1 P1 01/01/2001 1 1111.
pour moi, je n'ai pas vu de soucis au remplissage.

 

[chilo27]

Bonjour le forum, sylvanu

J'ai trouvé les raisons des blocages
Le problème se posait parce que je ne remplissait pas la textbox date de naissance
Encore une fois merci pour votre aide