Discussion :

[PolyAmide]

Bonjour à tous,

Encore une fois j'ai besoin d'un peu d'aide. J'ai codé quelques Macros sur Excel 2010 qui fonctionnaient à merveille sauf que, surprise je dois les rendre compatible sur la version 2003. Je me suis sortis de pas mal de problèmes grâce aux nombreux posts précédent mais la ...

j'ai ce petit bout de code :

Code :

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

Format(Cells(i, 1).Value, "dddd dd mmmm yyyy")

Et sur la version 2003, VBA refuse d'executer cette ligne. J'ai essayer divers astuces notemment

Code :

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

Dim Format as FormatCondition

sans grand espoir je l'avoue. Bref l'un d'entre vous saurais t'il comment lui faire comprendre qu'il s'agit d'un condition sur le format de la date à afficher?

Merci d'avance pour votre aide

[mercatog]

Et comment tu l'utilise dans ton code. une partie isolée de son contexte n'a aucun intérêt.

[PolyAmide]

Dans une msgbox incluse dans un if:

Code :

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

1
2
3
            If Nb_cases_occupees > Sheets("Listes_de_postes").Cells(31, 1) Then
                MsgBox "BlaBla pour la date du " & vbCrLf & Format(Cells(i, 1).Value, "dddd dd mmmm yyyy") & vbCrLf & "ligne numéro " & i & " du tableur", vbOKOnly, "Erreur de saisi"
            End If

Mais c'est vraiment le "Fromat" qui ne passe pas, d'ou le ligne isolée du contexte

[mercatog]

Bon je vois
Quand tu écris

VBA refuse d'executer cette ligne

C'est à dire? erreur? laquelle?

Sinon

Code :

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

Cells(i, 1).Value

C'est la cellule Ai de la feuille active

Code :

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

Sheets("Listes_de_postes").Cells(i, 1).Value

C'est la cellule Ai de la feuille Listes_de_postes

Autre chose, fais un msgbox de ta cellule sans le format et regarde ce que tu as comme résultat.

[PolyAmide]

Donc refus pour la ligne c'est:

"erreur de compilation
Projet ou bibliothèque introuvable"

Et le terme "Format" est surligné

Et sans le "Format" la date est affichée par défault quelque soit le format de la cellule concernée:

"02/11/2011"

au lieu de :

"mercredi 2 novembre 2011" comme j'aimerais

C'est un détail mais je suis un peu psychotique lorsque les choses ne s'affichent pas comme je le pensais.

[mercatog]

Regarde si dans ton éditeur vba tu n'as pas une référence manquante.

[PolyAmide]

Si c'était le cas, librairie Word dont je vais me servir plus tard, je ne vois pas pourquoi elle fait bugger le code mais en décochant tout à l'air de focntionner. Parfait.

Merci beaucoup