Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 02/11/2011, 20h54   #1
Futur Membre du Club
 
Homme
Étudiant
Inscription : août 2011
Messages : 34
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Rhône (Rhône Alpes)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie Pharmaceutique

Informations forums :
Inscription : août 2011
Messages : 34
Points : 16
Points : 16
Par défaut "Fomat" excel 2010 à 2003

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 :
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 :
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
PolyAmide est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/11/2011, 21h00   #2
Expert Confirmé Sénior
 
Avatar de mercatog
 
Inscription : juillet 2008
Messages : 5 848
Détails du profil
Informations forums :
Inscription : juillet 2008
Messages : 5 848
Points : 13 907
Points : 13 907
Et comment tu l'utilise dans ton code. une partie isolée de son contexte n'a aucun intérêt.
__________________
Cordialement.
mercatog est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/11/2011, 21h39   #3
Futur Membre du Club
 
Homme
Étudiant
Inscription : août 2011
Messages : 34
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Rhône (Rhône Alpes)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie Pharmaceutique

Informations forums :
Inscription : août 2011
Messages : 34
Points : 16
Points : 16
Dans une msgbox incluse dans un if:

Code :
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
PolyAmide est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/11/2011, 21h47   #4
Expert Confirmé Sénior
 
Avatar de mercatog
 
Inscription : juillet 2008
Messages : 5 848
Détails du profil
Informations forums :
Inscription : juillet 2008
Messages : 5 848
Points : 13 907
Points : 13 907
Bon je vois
Quand tu écris
Citation:
VBA refuse d'executer cette ligne
C'est à dire? erreur? laquelle?

SinonC'est la cellule Ai de la feuille active
Code :
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.
__________________
Cordialement.
mercatog est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/11/2011, 21h57   #5
Futur Membre du Club
 
Homme
Étudiant
Inscription : août 2011
Messages : 34
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Rhône (Rhône Alpes)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie Pharmaceutique

Informations forums :
Inscription : août 2011
Messages : 34
Points : 16
Points : 16
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.
PolyAmide est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/11/2011, 22h11   #6
Expert Confirmé Sénior
 
Avatar de mercatog
 
Inscription : juillet 2008
Messages : 5 848
Détails du profil
Informations forums :
Inscription : juillet 2008
Messages : 5 848
Points : 13 907
Points : 13 907
Regarde si dans ton éditeur vba tu n'as pas une référence manquante.
__________________
Cordialement.
mercatog est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 02/11/2011, 22h21   #7
Futur Membre du Club
 
Homme
Étudiant
Inscription : août 2011
Messages : 34
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Rhône (Rhône Alpes)

Informations professionnelles :
Activité : Étudiant
Secteur : Industrie Pharmaceutique

Informations forums :
Inscription : août 2011
Messages : 34
Points : 16
Points : 16
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
PolyAmide est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 12h56.


 
 
 
 
Partenaires

Hébergement Web