Macro Excel 2007 ne fonctionne plus sur Excel 2010

Version imprimable

Bonjour,

J'avais une macro qui fonctionnait bien sous Excel 2007 mais lorsque j'ai utilisé la macro sous Excel 2010 elle ne fonctionnait plus.

J'ai le message d'erreur suivant :

Erreur de compilation :
Membre de méthode ou de données introuvable

Voilà ma macro :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
Sub test()
 
Sheets("LISTE").Select
 
If ActiveCell <> "" And ActiveCell.Row > 2 Then
 
    Mesval = Mesval = Array("Titre1", "Genre1", "Anne1", "Duree1", "Possession1")
 
    MaLig = ActiveCell.Row
 
    For i = 0 To UBound(Mesval)
 
         Saisir.Controls(Mesval(i)).Text = Sheets("Liste").Cells(MaLig, i + 2)
 
    Next
 
    Saisir.CommandButton1.Visible = True
 
    Saisir.Valid.Visible = False
 
    Saisir.Show
 
Else
 
    MsgBox "Selectionner une fiche !"
 
End If
 
    'Sheets("FEUILLE DE SAISIE").Select
 
End Sub
 
 
 
Sub EcritUSF(Arg1)
 
Sheets("LISTE").Select
 
Mesval = Array("Titre1", "Genre1", "Annee1", "Duree1", "Possession1")
 
For i = 0 To UBound(Mesval)
 
    Sheets("Liste").Cells(Arg1, i + 1) = Saisir.Controls(Mesval(i)).Text
 
Next
 
Unload Saisir
 
Sheets("Menu").Select
 
End Sub

Pourriez-vous m'aider à faire fonctionner ma macro sur Excel 2010 svp ?

31/10/2017, 22h30
unparia
Bonjour
1) Que veut dire cette ligne :

Code:

Mesval = Mesval = Array("Titre1", "Genre1", "Anne1", "Duree1", "Possession1")

?

Je doute fort que cette ligne de "code" passait "auparavant", hein . ..
2)
Code:

1 2 3 Sheets("LISTE").Select If ActiveCell <> "" And ActiveCell.Row > 2 Then
Outre le fait que l'on travaille directement avec les objets Excel à traiter et non à coups de Select, etc ...
-----Tu sélectionnes une feuille ... Bon ... mais quelle en est la cellule active ?
------ toujours spécifier la propriété utilisée (ActiveCelle.QUOI ?
commence par cela !
10/11/2017, 14h17
Guiggs

Salut, Oui effectivement j'ai écrit un Mesval en trop.
Cette ligne dit que les valeurs que je vais saisir seront créé dans un tableau.

Je comprend pas pourquoi ma commandButton1 ne fonctionne plus ?

Cordialement,
Guiggs
10/11/2017, 14h18
Guiggs

Salut,

Ma cellule active est la première ligne vide de mon tableau.

Cordialement,
Guiggs