Validation de date / Userform

S

simrobert21

Guest

• 19 Février 2009

• #16

Re : Validation de date / Userform

Il semble y avoir une erreur, lorsque je veut quitter, excel m'indique document non enregistré, tu as une idée ?

 

Vote positif 0 Vote négatif

J

jp14

XLDnaute Barbatruc

• 19 Février 2009

• #17

Re : Validation de date / Userform

Bonsoir

simrobert21 à dit:

Il semble y avoir une erreur, lorsque je veut quitter, excel m'indique document non enregistré, tu as une idée ?

Cliquez pour agrandir...

Bizarre,
Je n'ai pas de problème.

JP

 

Vote positif 0 Vote négatif

S

simrobert21

Guest

• 20 Février 2009

• #18

Re : Validation de date / Userform

J'ai fait des tests et finalement à l'ouverture du fichier j'ai le messages "Erreur de chargement de la DLL". Par la suite le fichier fonctionne normalement jusqu'a ce que je le sauvegarde, il inscrit alors "document non enregistré" J'ai aucune piste pour le moment.

 

Vote positif 0 Vote négatif

J

jp14

XLDnaute Barbatruc

• 20 Février 2009

• #19

Re : Validation de date / Userform

Bonjour

Il faudrait essayer en supprimant DTPicker.

JP

 

Vote positif 0 Vote négatif

S

simrobert21

Guest

• 25 Février 2009

• #20

Re : Validation de date / Userform

Bonjour JP14 et les autres

J'ai finalement réussi à faire fonctionner le userform sans avoir de messages d'erreur. Par contre il resterait une dernière modification à faire pour qu'il réponde à 100% à mes besoins. Si possible de m'aider, j'aimerais que le données entrées dans soit insèrer dans la bonne colonne.

DTPicker1 / Colonne A
ComboBox5 / Colonne B
ComboBox4 / Colonne C
TextBox2 / Colonne D
ComboBox3 / Colonne E

J'ai tenter de modifier le code mais je suis assez débutant en VBA et dès que je modifie, elle ne fonctionne plus. Je joint le fichier pour référence.

Merci beaucoup

 

Pièces jointes

• Visiteur TEST3.zip

  25.1 KB · Affichages: 24

Vote positif 0 Vote négatif

J

jp14

XLDnaute Barbatruc

• 25 Février 2009

• #21

Re : Validation de date / Userform

Bonjour

Il suffit de supprimer

Code:

For y = 1 To 5 'boucle sur les  Textboxes
    Select Case y
        Case 1
            If Me.Controls("DTPicker" & y).Value <> "" Then
 .........................
            End If
        
    End Select
next y

de la procédure CommandButton1_Click
et écrire à la place ( à terminer)

Code:

donnee.Offset(0, 0).Value = DTPicker1.Value 'placement de la donnée colonne a
donnee.Offset(0, 1).Value = ComboBox5.Value ' colonne B

JP

 

Dernière édition: 25 Février 2009

Vote positif 0 Vote négatif

S

simrobert21

Guest

• 25 Février 2009

• #22

Re : Validation de date / Userform

Super, ça fonctionne parfaitement, merci JP et les autres.

 

Vote positif 0 Vote négatif