Discussion :

[log1c]

Bonjour,

Après avoir créer un fichier excel avec des scripts VBA qui fonctionne très bien sur mon pc.
Je l'ai récupéré pour le mettre sur un autre pc.
Lors de l'ouverture de celui-ci, il m'affiche le message suivant :

Microsoft Forms

Impossible de charger le objet car il n'est pas disponible sur cette machine.

Je valide sur "OK"

Mon "UserForm1" s'ouvre sans encombre, le souci vient lorsque je click sur un bouton qui me permet d'ouvrir un calendrier, le message suivant apparaît en m'ouvrant la console Visual Basic :

Microsoft Visual Basic
Erreur de Compilation :
Variable non définie

La ligne suivant et surligné en jaune :

Private Sub CommandButton1_Click()
Calendar1.Visible = True
End Sub

Sachant que les deux versions d'excel sur les deux PC sont identiques, je ne comprend pas.
J'ai supposé que cette erreur était du à l'objet :
Microsoft Calendar Control 11.0, ou
Microsoft Forms 2.0 Objet Library
dans "Références - VBA Project" mais les deux sont cochés...

Merci.

log1c

[preverse]

J'ai déjà eu un problème du genre avec les calendriers.
Il me semble qu'il y avait un conflit avec une appli qui était installée sur l'autre poste (Artémis je crois) au niveau de la lib sur les calendriers (la référence ne pointe pas sur le même fichier).

A ta place, je tenterais de créer une petite macro juste avec un calendrier sur l'autre machine pour vérifier que le problème est là.

Pour ma part, la seule parade que j'ai trouver consiste à vérifier au début de mon code si le fichier est présent sur la machine et à ne faire la référence que s'il existe. Le calendrier n'est alors accessible que sur les postes compatibles.

C'est pas terrible, mais ça évite les plantages.

P.R

[khany]

[TAG [VBA-E] rajouté par Khany]
[Pensez-y vous-même à l'avenir. Merci. ]

[log1c]

Merci pour ta réponse, et merci admin pour l'info (ps : je lis jamais les "lire avant poster" ^^

Je veux essayer la création d'une macro uniquement avec le calendrier, mais je ne sais pas comment on prossède

Et puis par ta parade je ne vois pas non plus ^^

Pourrais-tu me donné plus d'eclaircissement ?

Merci pour tout.
log1c

[preverse]

J'utilise ça :

Code :

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

1
2
3
4
5
6
7
8
9
    Dim hInst As Long
 
    ' Verification de l'existance des fonctions du calendrier
    hInst = LoadLibrary("MSCAL.OCX")
    If hInst > 32 Then
       g_avecCal = True
    Else
       g_avecCal = False
    End If

g_avecCal étant une variable globale me permettant de savoir ensuite dans tout le code si je peux utiliser le calendrier.

P.R

[log1c]

Merci,

Il me met tout de même un message d'erreur lors de l'éxecution :

Erreur de compilation :
Instruction incorrecte à l'extérieur d'une procédure

et dans visual basic il me surligne en jaune :

"MSCAL.OCX"
qui est la librairie pour le calendrier il me semble.

Merci ^^
log1c

Ps : j'essaye tout ceci sur mon pc ou fonctione très bien mon script.

[preverse]

J'ai oublié de préciser que, du coup, il faut supprimer la référence du projet puisqu'elle est créée dans le code.

P.R