Erreur d'exécution 429

a26

XLDnaute Occasionnel
Bonjour à tous,
Une erreur d’exécution 429 ne me permet pas d'utiliser mon fichier quand je l'ouvre sur mon portable Mac.
Créé avec excel 2007 celui-ci fonctionne bien sur mon PC de bureau et pose problème avec le Mac.
Ci-joint le code qui demande un débobage .
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect([A10:A400], Target) Is Nothing And Target.Count = 1 Then
UserForm2.Top = Target.Top + 170 - Cells(ActiveWindow.ScrollRow, 1).Top
UserForm2.Left = Target.Left + 100 - Cells(1, ActiveWindow.ScrollColumn).Left
UserForm2.Show
End If
If Not Application.Intersect(Target, Range("B10:B400")) Is Nothing Then
UserForm1.Top = Target.Top + 150 - Cells(ActiveWindow.ScrollRow, 1).Top
UserForm1.Left = Target.Left + 100 - Cells(1, ActiveWindow.ScrollColumn).Left
UserForm1.Show
End If
If Not Application.Intersect(Target, Range("C10:C400")) Is Nothing Then
UserForm3.Top = Target.Top + 150 - Cells(ActiveWindow.ScrollRow, 1).Top
UserForm3.Left = Target.Left + 100 - Cells(1, ActiveWindow.ScrollColumn).Left
UserForm3.Show
End If
If Not Application.Intersect(Target, Range("D10:D400")) Is Nothing Then
UserForm4.Top = Target.Top + 150 - Cells(ActiveWindow.ScrollRow, 1).Top
UserForm4.Left = Target.Left + 100 - Cells(1, ActiveWindow.ScrollColumn).Left
UserForm4.Show
End If
If Not Intersect([cible], Target) Is Nothing Then Target.Value = IIf(Target.Value = "", "X", "")
Cancel = True
End Sub


Merci pour vos conseils
Cordialement
a26
 

CPk

XLDnaute Impliqué
Re : Erreur d'exécution 429

Dans l'idéal...Joignez le fichier. Vous augmentez vos chance d'obtenir une réponse personnalisée car à la seule lecture d'un code, ce n'est pas automatique que nous puissions detecter quelle ligne est en défaut.
 

a26

XLDnaute Occasionnel
Re : Erreur d'exécution 429

Bonsoir,
Je ne sais pas si cela avancera plus en joignant le fichier.
Celui-ci fonctionne parfaitement sur mon PC de bureau, mais n'ouvre pas les userform sur mon Mac.
Problème de paramétrages sur Mac ? Office sur Mac ?
 

Discussions similaires

Réponses
1
Affichages
229

Statistiques des forums

Discussions
314 450
Messages
2 109 726
Membres
110 552
dernier inscrit
jasson