VBA erreur 1004

Résolu

séverine -
Floroan - 18 févr. 2012 à 22:16

Bonjour forum

j'ai un macro qui a été fait sur excel 5 et qui marché bien.mais maintenat quand je l'execute sur la nouvelle version de excel j'ai l'erreur 1004 (impossible de lire la propriété drawing objects de la classe dialogsheet)

est ce que vous avez une idée

merci d'avance

Afficher la suite

A voir également:

Erreur 1004 vba
Erreur d'execution 1004 - Meilleures réponses
Vba 1004 - Meilleures réponses
Erreur 3005 france tv - Forum TV & Vidéo
Incompatibilité de type vba ✓ - Forum Programmation
Erreur 3000 france tv - Forum Lecteurs et supports vidéo
Erreur t32 ✓ - Forum Livebox
Erreur 4201 france tv ✓ - Forum Réseaux sociaux

4 réponses

Réponse 1 / 4

Utilisateur anonyme

Bonjour,

L'erreur 1004 est une erreur très standard qui stipule un
débordement de l'indice de l'objet. Il est très difficile de
trouver ce genre d'erreur sans voir le code.

J'ai eu aussi quelques déboire avec le passage de 95 à 97
et entre autre le nom des feuilles changeaient dans certaines
circonstances.

Si tu veux plus d'aide, transcrit ton code ici !

Lupin

Réponse 4 / 4

pti beignet

Bonjour,

je viens de le deposer le lien est:
http://www.cijoint.fr/cij102725268832601.xls

ShaBoo Messages postés 392 Date d'inscription Statut Membre Dernière intervention 50

Essaye ceci :

Private Sub Workbook_Open()

'Worksheets("resultats").Activate
'Cells(17, 2).Activate
Worksheets(2).Select
Worksheets(2).Cells(17, 2).Select
MsgBox "cellule selectionné"

End Sub

ShaBoo Messages postés 392 Date d'inscription Statut Membre Dernière intervention 50

Sub Filtre_2()
Dim i As Integer
MsgBox "entre dans la boucle "
  'Worksheets(2).Cells(2, 17).Select
'Worksheets("resultats").Range ("B17")
' Worksheets(2).Select
'Cells(2, 17).Select
'Cells(2, 17).Select
'Range("B17").Select
Workbook_Open
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).AutoFilter Field:=3, Criteria1:=head_left
Range(Selection, Selection.End(xlDown)).AutoFilter Field:=2, Criteria1:=head_up

End Sub

Que cherches tu à faire avec cette procedure ???

pti beignet > ShaBoo Messages postés 392 Date d'inscription Statut Membre Dernière intervention

Bonjour,

en gros je veux selectionner ma plage de la liste à trier
je commence par selectionner la premiere cellule puis apres avec les fontions je determine le la fin de ma liste et le auto filter me permet de filtrer

Je sens que je ne suis pas clair!

pti beignet

Bonjour,

ahhh merciiiiiiii!c'est bon pour ça !
mais du coup pkoi ça ne marchais pas?
je suis obligé de selectionner la feuille puis la feuille et la cellule?????

ShaBoo Messages postés 392 Date d'inscription Statut Membre Dernière intervention 50 > pti beignet

bin ... tu es sur un evenement d'ouverture, et Excel doit initialiser pas mal de chose (du moins je pense ;p). Et là il devait pas retrouver ces petits ...

Discussions similaires

Erreur d'éxecution 1004

masquer le déroulement d'une macro sous excel

[Access] Forcée Arret boucle infini

Arrêt automatique macro

Erreur d'execution '1004'

Arrêt d'exécution d'un code vba

Votre réponse

Discussions similaires