problème de lancement d'application

JEFF77

XLDnaute Occasionnel
Bonjour le forum
Après l'aide de plusieurs personnes du forum mon prog.marche bien sur mon pc XP media center EXCEL 2003.
Je veut le mettre à mon boulot Win 2000 sp4,excel 97 sr2 et la 2 problèmes se posent.
1er:l'application se bloque au niveau 'donnée' à la ligne de commande'mois = MonthName(Month(DATE1)) 'définit la variable mois'.
2eme:dans THISwhorkbook la commande 'Private Sub Workbook_Open()' ne marche pas.

Je vous remerçie de votre aide. [file name=Planar.zip size=40417]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Planar.zip[/file]
 

Pièces jointes

  • Planar.zip
    39.5 KB · Affichages: 30
  • Planar.zip
    39.5 KB · Affichages: 30
  • Planar.zip
    39.5 KB · Affichages: 26

Jacques87

XLDnaute Accro
Bonsoir Jeff

Ton problème est du au fait que tu passes d'une version 2003 avec laquelle je suppose que tu as construis ton produit, vers une version ancienne (Excel 97)

Autant tu peux monter (97 vers 2000 vers 2003) impossible de descendre (2003 97) car tu dois utiliser certaines commandes qui n'existaient pas avec 97

Bonne soirée

Message édité par: Jacques87, à: 12/01/2006 20:17
 

JEFF77

XLDnaute Occasionnel
sous XP et excel2003 OK
sous 98 SE excel 97 sr2,fonctionne sauf dans \\'Donnée\\' impossible de rentrer une date.
sous Win2000 excel 97 sr2,1er:l'application se bloque au niveau \\'donnée\\' à la ligne de commande\\'mois =
MonthName(Month(DATE1)) 'définit la variable mois\\'.
2eme:dans THISwhorkbook la commande 'Private Sub Workbook_Open()' ne marche pas.
 

Jacques87

XLDnaute Accro
Jeff, chez moij'ai les 3 versions d'excel 97, 2000 et 2003

Je viens de constater que la fonction MonthName qui a pour but de renvoyer le nom du mois, n'est pas reconnue par 97
je continue à chercher

suite de mes recherches :
sous 2000, cette fonction est connue
Maintenant en ce qui concerne la procédure évènementielle This WorkBook, pourrais tu détailler :
se lance -t-elle ?
si oui où bloque -t-elle?
si non que se passe-t-il ? message d'erreur ou autre


Message édité par: Jacques87, à: 12/01/2006 21:26
 

JEFF77

XLDnaute Occasionnel
Jacques87 j'ai essayé à mon boulot,les erreurs sont:
1er:dans Workbook:'erreur de compilation'au niveau de DATE Private Sub Workbook_Open()
Sheets('feuil1').Select
MsgBox 'Nous sommes le ' & Date & _
' il est ' _
& Time, vbInformation, 'Bonjour mon petit Franck'
afficheuf
End Sub
2eme:erreur de compil au niveau de QUESTION:'Option Explicit
'Dim question As Byte
Private Sub Workbook_BeforeClose(Cancel As Boolean)
question = MsgBox('Avez vous tous remplis correctement!!', vbYesNo, 'Contrôle')

If question = 7 Then Cancel = True
End Sub
3eme:erreur de compilau niveau de monthname dans DONNEES: mois = MonthName(Month(DATE1)) 'définit la variable mois [file name=Planar_20060113200953.zip size=40417]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Planar_20060113200953.zip[/file]
 

Pièces jointes

  • Planar_20060113200953.zip
    39.5 KB · Affichages: 32

Jacques87

XLDnaute Accro
Bonsoir Jeff

Je viens d'essayer de chercher la (ou les) raison(s) qui provoquent tes erreurs

1) pour les 2 premières, aucune erreur n'est déclenchée chez moi sous Excel 97

2) comme je te l'ai dit hier, Excel 97 ne connait pas la fonction MonthName
La solution serait de 'biaiser' avec les possibilités d'excel 97 'qui seront automatiquement acceptées par toute version suivante)

sinon je ne vois pas comment faire

Bonne soiré Jeff
 

Discussions similaires

Réponses
10
Affichages
1 K
T

Statistiques des forums

Discussions
311 711
Messages
2 081 792
Membres
101 817
dernier inscrit
carvajal