Erreur sur SortRange !

Version imprimable

Bonjour,

Je suis entrain de modifier un code sur projet qui à été implémenter par une autre personne. j'ai une erreur a l'ouverture de la macro et je n'arrive pas à résoudre le problème.

voilà le code et l'erreur:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Private Sub Workbook_Open()
 
On Error GoTo Err_WbkOpen
    'Trier certaines zones
    SortRange "Liste_Agglomeration"   ' <--- Erreur!
    SortRange "Liste_TGM"
    SortRange "Liste_IMEI"
    SortRange "Liste_NMobile"
    SortRange "Liste_NFixe"
    'SortRange "Liste_NFixeVisio"
    SortRange "Liste_Equipe"
 
    'trier les détails pour les différents bilans
    Dim s$, i&
    s = "AXMECH"
    For i = 1 To Len(s)
        SortRange "detvx" & Mid(s, i, 1)
        SortRange "detvt" & Mid(s, i, 1)
    Next
 
    'Ne pas charger la feuille de saisie si:
    '   - il s'agit du modèle
    '   - la touche contrôle est appuyée
    If Me.FileFormat <> xlTemplate Then
        Me.Worksheets("config").Visible = xlSheetHidden
        If ControlPressed Then Exit Sub
        ShowSaisie
    End If
    Exit Sub
 
Err_WbkOpen:
    If Err.Number = 0 Then Exit Sub
    MsgBox Err.Description & "(0x" & Hex(Err.Number) & ")", vbOKOnly, Err.Source
    Err.Clear
End Sub

voilà l'erreur :

Citation:

erreur de compilation:

Projet ou Bibliothèque Introuvable

est-ce qu'il y a quelqu'un qui puisse m'aidai??

merci

19/08/2008, 19h19
OhMonBato

C'est du VBA Excel ?
19/08/2008, 19h39
Faladin
on dirait bien du VBA,

mais bon, même si le but de la question était sûrement de te faire réaliser que tu es pas dans le bon forum, j'ai l'impression qu'il te manque sûrement soit un lien vers une bibliothèque ou un import de référence au début de ton projet, un peu comme on le fait en VB.Net
Code:

1 2 3 4 5 Import librairie requise Private Sub Workbook_Open() '[...] End Sub
20/08/2008, 17h32
zazaraignée

C'est comme de rien que la macro (procédure, fonction...) SortRange a été développée à l'origine dans le classeur perso.xls (ou un autre classeur ou module de référence) du programmeur auteur. Si cette 'autre personne' est contactable (disponible, de ce monde, encore en poste), je crois que c'est à elle (ou lui) qu'il faut demander.