Demande d’explication combobox

lanoe

XLDnaute Occasionnel
Bonjour,

J’ai un Combobox qui « colle » la date en colonne N, si j’applique la formule en O12 =SI(N12=AUJOURDHUI();1;0), cela ne fonctionne pas voir piece jointe.

Par contre si je rentre manuellement la date cela fonctionne.

Je cherche à comprendre pour ma petite culture personnelle et surtout une solution.


Cordialement

Lanoe
 

Pièces jointes

  • question4.zip
    39.4 KB · Affichages: 22
  • question4.zip
    39.4 KB · Affichages: 21
  • question4.zip
    39.4 KB · Affichages: 22

Creepy

XLDnaute Accro
Re : Demande d’explication combobox

Bonjour le Forum, Lanoe,

L'erreur provient du fait que par défaut tu copie le contenu de tes controles en texte, donc Excel ne considère pas cela comme une date

Remplace ton code par :

Code:
Select Case i
        Case 1 To 7
            Sheets(feuille1).Cells(x, i + 3) = Controls("Textbox" & i)
            Controls("Textbox" & i) = ""
        Case 8 To 10
            Sheets(feuille1).Cells(x, i + 3).Value = Controls("Combobox" & i).Text
            Controls("Combobox" & i) = ""
        Case 11
            Sheets(feuille1).Cells(x, i + 3).Value = CDate(Controls("Combobox" & i))
            Controls("Combobox" & i) = ""
    End Select
Et le tour est joué !

@+

Creepy
 

Discussions similaires

Statistiques des forums

Discussions
312 490
Messages
2 088 879
Membres
103 981
dernier inscrit
vinsalcatraz