XL pour MAC Erreur d’exécution 5 Mac

[PA16]

Bonjour,
Je rencontre un problème depuis plusieurs semaines sur le code que j’ai développé sans en comprendre la cause. En effet, j’ai écrit plusieurs macros sur Excel Mac qui fonctionnent parfaitement en temps normal, cependant, à certains moments, lorsque je les exécute, un message d’erreur « argument ou appel de procédure incorrect » apparaît et indique une erreur sur une ligne if où je teste la couleur d’une cellule (par exemple : if cells(i.j).interior.color = rgb(217,217,217)). Parfois, en relançant Excel ou en redémarrant l’ordinateur, le code fonctionne de nouveau sans avoir fait aucune modification, parfois non, et je ne comprends pas ce qui peut impliquer cette erreur.
Je travaille sur MacBook Pro M1, mais je rencontrais le même problème sur MacBook Air 2014.
Je vous remercie d’avance pour votre aide.
Pierre A.

 

[Staple1600]

Bonjour,

Sans voir le code VBA, il est certain que nous pourrons t'apporter une aide inefficace.

En voyant le code VBA, il n'est pas certain qu'on puisse t'apporter une aide efficace.

Mais il est certain qu'il vaut mieux qu'on puisse t'apporter une aide efficace.

😉

 

[mapomme]

Bonjour,

Peut-être une coquille au moment de l'écriture de la question (ou pas) ?
Remplacez le point par la virgule dans cells(i.j)

 

[Staple1600]

Bonjour mapomme

Tu n'es pas d'accord avec moi? 😉

PS: Il fait froid par chez toi? Plus de neige ?

NB: Si c'est le point, alors normalement Excel tousse quand on écrit le code dans VBE, non ?

 

[Staple1600]

Re

=>PA16
Normalement l'objet Dictionary ne fonctionne pas sur Mac
(Réservé à l'environnement Windows)

 

[Staple1600]

Re

Et pour infos, tes déclarations devraient être
Dim i&, irow&
Dim kitems(0 To 10) As Variant
Dim m%, k%, j%

 

[mapomme]

Tu n'es pas d'accord avec moi? 😉

PS: Il fait froid par chez toi? Plus de neige

Bonjour l'agrafe 😋,

Je suis d'accord mais le point à la place de la virgule m'avait sauté aux yeux.
En plus je n'avions point vu ton message car je n'avais point rafraîchi.
Mais vu le code du demandeur, c'est toi qui avait raison.
Un petit fichier du demandeur nous permettrait de ne pas travailler à l'aveugle.


Quand au froid, il n'y en a point à Angers. Quant à la neige, il n'y en a point à Angers. Quant aux pluies verglaçantes, il n'y en a point à Angers. C'est un pays civilisé l'Anjou! 😉

 

[PA16]

Oui, mais pour contourner le problème j'ai créé un module de classe Dictionary qui me permet de l'utiliser comme sur Windows.
Je ne peux malheureusement pas vous transmettre le fichier pour cause de confidentialité, mais je pense que le problème vient du RGB qui pose parfois problème à l'ouverture du fichier. Je voulais seulement savoir si vous aviez déjà eu des échos sur cela.

 

[Staple1600]

Re

Tu pourrais diffuser néanmoins le module de classe qui rendrait un grand service aux Macistes du forum, non ?

Sinon, grâce à ta question, je viens de m'apercevoir d'un truc chelou.

Sub test()
Dim i&, j&
i = 3
j = 7
MsgBox Cells(3.7).Address 'Excel ne bronche pas !
MsgBox Cells(i.j).Address 'Aie Caramba !
End Sub

 

[mapomme]

je viens de m'apercevoir d'un truc chelou.

Sur mon 365, ton code provoque une erreur à la compilation (sur i.j)

 

[Staple1600]

Re

Sinon parfois en ajoutant VBA, Excel peut parfois moins tousser
Exemples
[A1].Interior.Color=VBA.RGB(255,0,0)
ou
MsgBox VBA.Asc(VBA.Left(Application.UserName, 1))

 

[Staple1600]

Re

=>mapomme
Et si tu ne testes que
MsgBox Cells(3.7).Address

Chez moi, cela m'affiche D1

 

[mapomme]

Chez moi, cela m'affiche D1

Normal.
3.7 est arrondi à 4 et D1 est le 4ème élément du range Cells.
Si on remplace 3.7 par 3.4, on obtient l'adresse de C1 (arrondi à 3).
Si on remplace 3.7 par 16384.8, on obtient l'adresse de A2 (arrondi à 16385).
(mon Excel à 16384 colonnes)

 

[PA16]

Oui, il ne compile pas surement à cause du module de classe Dictionary qu'il appelle mais que vous n'avez pas.
Effectivement, je viens de rajouter Thisworkbook.activesheet devant cells et le code fonctionne. En revanche avec VBA.RGB cela ne fonctionne pas cette fois-ci mais je garde ça dans un coin de ma tête pour une prochaine fois, je n'avais pas l'info.
Merci pour votre aide 🙂

 

[Staple1600]

Re

=>PA16
Et donc dans l'esprit XDlien qui est pour rappel
"le partage des connaissances dédiées à Excel", tu ne publies pas ton module de classe pour le bénéfice de la communauté?