Besoin d'un petit coup main Erreur de compil

[aziz]

Bonjour à tous,
Besoin d'un coup de main pour afficher 2 massages en MgsBox
voir mon fichier
merci
pour votre aide

 

[GeoTrouvePas]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour,

Difficile de t'aider avec aussi peu d'informations. Si c'est juste pour le problème de compilation, il se trouve que tu avais créé deux procédures Workbook_Open.

Il suffit de les rassembler en faisant :

Private Sub Workbook_Open()
   Eclairage
   Echeance
End Sub

et tu n'as plus d'erreur de compilation.

 

[Robert]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour Aziz, bonjour le forum,

Pas plus d'explication dans le fichier que de cheveux sur la tête d'un chauve.
Deux procédure Open dans le composant ThisWorkbook...
Comment peut-on t'aider si tu n'expliques pas ce que tu veux ? A-t-on besoin de tous les modules pour t'aider ?
Comme tu le vois il faudrait une question claire et un fichier alléger...

[Édition]
Bonjour GéoTrouvePas on s'est croisé.

 

[GeoTrouvePas]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour Robert !

Pas plus d'explication dans le fichier que de cheveux sur la tête d'un chauve.

J'aurai pas dit mieux ^^

 

[aziz]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour à vous tous
j'ai simplifié mon fichier et tous expliqué dedans
j'espère avoir été clair.

merci

 

[Victor21]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour, Aziz, Géo, Robert.

Aziz, à quoi ça sert que Robert et Géo te conseillent, si tu ne suis pas ?
Géo dit:

Re : Besoin d'un petit coup main Erreur de compil
Bonjour,

Difficile de t'aider avec aussi peu d'informations. Si c'est juste pour le problème de compilation, il se trouve que tu avais créé deux procédures Workbook_Open.

Il suffit de les rassembler en faisant :

Code :
Private Sub Workbook_Open()
Eclairage
Echeance
End Sub

Robert t'a dit:

Deux procédure Open dans le composant ThisWorkbook...

 

[GeoTrouvePas]

Re : Besoin d'un petit coup main Erreur de compil

Re,

Il était en effet difficile de deviner ça avec ton message initial. Je viens d'écrire cette macro :

Sub Vigilance()
    Dim i As Long
    Dim Message As String
    Message = "Vigilance sur :" & vbCrLf
    i = 5
    While Cells(i, 21) <> ""
        If Cells(i, 21) < 0 Then Message = Message & vbCrLf & Cells(i, 1)
        i = i + 1
    Wend
    MsgBox Message
End Sub

Mais c'était avant de me rendre compte que ta procédure nommée "Echeance" fait exactement la même chose et ne semble pas avoir de disfonctionnement. Que veux tu de plus alors ?

Edit : Bonjour Victor. En ouvrant le fichier joint, il semblerait que sa demande ne concerne absolument pas le problème de compilation mais plutôt une macro d'alerte. Mais bon, en regardant les macros existantes, on se rend compte qu'elle exciste déjà et semble fonctionner. Va falloir investir dans une boule de cristal je crois 😛

 

[aziz]

Re : Besoin d'un petit coup main Erreur de compil

Voici mon erreur
voir fichier jpeg

 

[Victor21]

Re : Besoin d'un petit coup main Erreur de compil

Re, Géo

Comptine bien connue :

Pomme, poire, abricot
Y'en a une, y'en a une
Pomme, poire, abricot
Y'en a une de trop!​

Remplacer "Pomme, poire, abricot" par "Private Sub Workbook_Open()"
😛😛😛

 

[Robert]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour le fil, bonjour le forum,

Patrick je sens qu'Aziz est en pleine déconfiture... Alors je me permets une explication plus détaillée.
Aziz dans la procédure Open du composant ThisWorkbook tu peux lancer plusieurs macro comme Echéance ou Eclairage mais cet Open est unique ! Tu peux donc avoir :

Private Sub Workbook_Open()
Echeance
Eclairage
End Sub

dans l'ordre que tu veux, mais pas deux procédures Private Sub Workbook_Open ! Sinon ça plante...

 

[Victor21]

Re : Besoin d'un petit coup main Erreur de compil

Bonjour le fil, bonjour le forum,

Patrick je sens qu'Aziz est en pleine déconfiture...

déconfiture... d'abricot ?
😛😛😛
Bon, ok, je sors !

 

[aziz]

Re : Besoin d'un petit coup main Erreur de compil

Merci beaucoup

 

[GeoTrouvePas]

Re : Besoin d'un petit coup main Erreur de compil

Bon, ok, je sors !

Non non ! Restes ! Moi j'ai bien rigolé entre ta petite chanson et la confiture !

On dirait en tout cas que Robert a trouvé la solution : fallait écrire en bleu, décomposer l'explication et mettre du gras ^^

 

[Staple1600]

Re : Besoin d'un petit coup main Erreur de compil

Bonsoir

Besoin d'un coup de main pour afficher 2 massages en MgsBox

Je ne savais pas qu'on pouvait se masser avec une MsgBox ( à moins qu'elle ne soit thailandaise et à forte poitrine comme dirait l'autre )

Bon je fais comme Victor21, je sors et je vais au piquet.