Code VBA après conversion 2003->97

**madchemiker** · 23/05/2007, 10h19

à tous,

j'ai créé une base access sous access 2003 sur mon PC. Maintenant j'aimerai la faire tourner sur mon lieu de travail, ou les postes sont sous Access 97 et le chef lache pas les Euros nécessaires a de nouvelles licenses.

J'ai un formulaire de recherche dans cette base. Le code a été repris sur un tutoriel. Mais sous VBA avec access 97, la formulaire ne marche pas.

Est que quelqu'un sait les modifications de syntaxes que je dois effectuer pour enfin la faire tourner?

merci de vos réponses

Invité · 23/05/2007, 10h49

Bonjour

Quel Code ?
Quelles sont les messages d'erreurs, et où ?

Starec

**madchemiker** · 23/05/2007, 13h50

Ce que je n'ai pas précisé c'est que Access est en version allemande au boulot,

Je tente toutefois une traduction du message d'erreur

"Erreur de Compilation: Projet ou Bibliothèque non repérable"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub Form_Load()
Dim ctl As Control
 
For Each ctl In Me.Controls
    Select Case Left(ctl.Name, 3)
        Case "chk"
            ctl.Value = 0
        Case "lbl"
            ctl.Caption = "- * - * -"
        Case "txt"
            ctl.Visible = False
            ctl.Value = ""
        Case "cmb"
            ctl.Visible = False
    End Select
Next ctl
 
Me.lstResults.RowSource = "SELECT [CAS-Nr], [Name], [Gefahr], [Klasse], [Schrank] FROM [Chemikalien_mit_CAS-Nr];"
Me.lstResults.Requery
 
End Sub

Je ne sais pas ce qu'il veut me dire par là. Si quelqu'un pouvait me filer une petite astuce, je ne serais pas contre. Il me mets en surbrillance Left et Right dans le code, ainsi que le Private Sub.

Merci