De Excel windows a Excel:mac URGENT

[hikaru1]

Bonjour à tous!
Voila je viens d'ouvrir pour la premiere fois un fichier excel avec des macros

Le fichier a été créer avec un excel pour windows sur lequel le fichier marche vachement bien.

Le soucis c'est que je dois l'utiliser sur mon mac (mac os 10.4)
Et j'ai des message d'erreurs qui bloque tout.

Je me suis dit que j'allais modifier certaines ligne de codes mais lorsque je clique sur une feuille, module ou userform quelquonque dans l'éditeur VBA d'excel , j'ai un message d'erreur "Project locked project is unviewable"

Lorsque je fais la même manipulation dans mon pc il me demande un password que je mets et j'ai acces a tous les codes

Pourquoi sur mac hormis le message d'erreur, il ne me donne pas la proposition de mettre un mot de passe?

Si quelqu'un peu m'aider je serais soulagée
merci d'avance

 

[hikaru1]

Re : De Excel windows a Excel:mac URGENT

Bonsoir

La première des choses, est de placer un fichier sur le forum, pour que les différents utilisateurs mac de ce forum puissent le tester.

Attention, les fichiers doivent être sans mot de passe pour l'accès au VBA. Merci

@+Jean-Marie

si j'arrive a le deverouiller correctemement je pourrais pte le mettre lool

 

[Dan]

Re : De Excel windows a Excel:mac URGENT

Bonjour,

Une chose que je vois là, peut être que cela n'a rien avoir mais dans ton code les instructions :

Sheets(Prop1) ... devraient être Sheets("Prop1")

Bon à part cela, comme Jean Marie, si l'on n'a pas ton fichier, ce n'est pas facile de t'aider.

Dis nous également qu'elle est la version d'excel sous windows.

Cordialement

Message pour JYLL : ok donne nous ton projet. on pourra regarder.

 

[hikaru1]

Re : De Excel windows a Excel:mac URGENT

Bonjour,

Une chose que je vois là, peut être que cela n'a rien avoir mais dans ton code les instructions :

Sheets(Prop1) ... devraient être Sheets("Prop1")

Bon à part cela, comme Jean Marie, si l'on n'a pas ton fichier, ce n'est pas facile de t'aider.

Dis nous également qu'elle est la version d'excel sous windows.

Cordialement

Message pour JYLL : ok donne nous ton projet. on pourra regarder.

Je sais que sans le fichier vous pouvez pas beaucoup m'aider mais disons que j'ai pas le droit de le donner a d'autre.

Sur le PC j'ai excel 2003 fr
Sur la mac excel 2004 en

et je pense que le fichier a du etre fait avec excel 98 prc que la date de creation est en 99

Se qui pose probleme au depart avec mac c'est qu'il ne supporte pas le RowSource ....
Je voulais donc change ca (meme si je sais pas a quoi ca sert ni quoi mettre a la place mdr) c'est pour ca que j'essaie d'acceder au code

Si ce que je ne comprend pas non plus c'est pourquoi excel:mac ne propose pas de boite de dialogue pour la saisie du mot de passe

Et un autre detail que j'ai vu aussi c'est que si je fais clique droit sur une feuille ou module, j'ai un menu exporter ou importer or dqns mon excel:mac y a poas ca quand je clique droit bizzarre

un autre truc , mais cette fois ci du cote excel windows
Comme lorsque j'ouvre mon fichier en excel j'ai un interface macro qui s'ouvre et que lorsque je clique sur le bouton fin (integrer par l'auteur dans son application) la page excel entiere se referme je suis obliger de faire ouvrir mon fichier avec internet explorer pour qu'a la fermeture de mon interface j'ai encore le fichier ouvert . c'est normal ca?

 

[JeanMarie]

Re : De Excel windows a Excel:mac URGENT

Re...

Pour la propriété RowSource, qui n'est pas supportée sur le mac.
Par exemple, pour remplacer

ListBox1.RowSource = "A1:A10"

il faut,

Dim vCell As Range
Dim J As Byte
J = 1
   For Each vCell In Range("A1:A10")
      ListBox1.AddItem vCell
      J = J + 1
   Next vCell

Attention, si tu utilises l'événement Change de la listbox1, le fait d'ajouter ou de changer le contenu d'un item de la listebox par programmation, fait déclencher l'événement.

Je le répète, c'est plus simple avec un fichier.

@+Jean-Marie

 

[hikaru1]

Re : De Excel windows a Excel:mac URGENT

Re...

Pour la propriété RowSource, qui n'est pas supportée sur le mac.
Par exemple, pour remplacer

ListBox1.RowSource = "A1:A10"

il faut,

Dim vCell As Range
Dim J As Byte
J = 1
   For Each vCell In Range("A1:A10")
      ListBox1.AddItem vCell
      J = J + 1
   Next vCell

Attention, si tu utilises l'événement Change de la listbox1, le fait d'ajouter ou de changer le contenu d'un item de la listebox par programmation, fait déclencher l'événement.

Je le répète, c'est plus simple avec un fichier.

@+Jean-Marie

merci

je vais voir ce que je peut faire pour ca lol

mais la je vais dormir
je travail demain donc debout tot

bizz

 

[hikaru1]

Re : De Excel windows a Excel:mac URGENT

Voici une de mes procedures , il faudrait que je puisse changer la propriété rowSource
Si quelqu'un sait m'aider ..;

Private Sub ComboBox6_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Select Case ComboBox6.ListIndex
Case -1
MsgBox texte3
ComboBox6.SelStart = 0
ComboBox6.SelLength = Len(ComboBox6)
ComboBox6.SetFocus
Cancel = True
Case 0
ComboBox7 = ""
ComboBox7.Visible = False
Case Else
ComboBox7.Visible = True
agce = ComboBox6.Text * 1
Workbooks("CO.xls").Activate
Worksheets("PVD").Activate
z = Cells(2, 2)
ldeb = 2
While (z <> agce And ldeb < 1000)
ldeb = ldeb + 1
z = Cells(ldeb, 2)
Wend
If ldeb = 1000 Then
ComboBox7.Visible = False
ComboBox7 = ""
ThisWorkbook.Activate
Exit Sub
End If
lfin = ldeb
While z = agce
lfin = lfin + 1
z = Cells(lfin, 2)
Wend
rr$ = "PVD!$d$" + CStr(ldeb) + ":$d$" + CStr(lfin - 1)
ComboBox7.RowSource = rr$
If ComboBox7.Text = "" Then ComboBox7.ListIndex = 0
ComboBox7.SelStart = 0
ComboBox7.SelLength = Len(ComboBox7)
ThisWorkbook.Activate
End Select
End Sub