VBA EXCEL erreur de compilation
Résolu
micheldu52
Messages postés
5
Statut
Membre
-
micheldu52 Messages postés 5 Statut Membre -
micheldu52 Messages postés 5 Statut Membre -
Bonjour,
J'a un soucis : le message
"erreur de compilation : fonction ou variable attendu"
et "selection" (en dessous de rows("5:5) est en surbrillance
Voici le code :
Pourtant sur des essais simplifiés le même code marche…..
Help !
Le but est d'insérer une ligne 5 (par tassement vers le bas des autres lignes), de récupérer toutes les formules des cellules (entre A et EZ) et de mettre à jour certaines (à partir de G)
Débutant en VBA je ne trouve pas ce qu'il faut faire !
Merci d'avance pour vos lumières.
Michel
J'a un soucis : le message
"erreur de compilation : fonction ou variable attendu"
et "selection" (en dessous de rows("5:5) est en surbrillance
Voici le code :
Sub REPORT()
'
' REPORT Macro
'
'
Sheets("base Faits Etablissement").Select
Rows("5:5").Select
selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("A6:EZ6").Select
selection.AutoFill Destination:=Range("A5:EZ6"), Type:=xlFillDefault
Sheets("saisie simplifiée").Select
Range("A26:BZ26").Select
selection.Copy
Sheets("base Faits Etablissement").Select
Range("G5").Select
selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("saisie simplifiée").Select
Range( _
"A2:B2,F2:G2,A7:D7,H6,A12:C12,E12:I12,K12:M12,O12:V12,X12:AA12,AC12,A17,D17:K18,L18,N17:P17,R17:S17,X17:AB17" _
).Select
Range("X17").Activate
Application.CutCopyMode = False
selection.ClearContents
End Sub
Pourtant sur des essais simplifiés le même code marche…..
Help !
Le but est d'insérer une ligne 5 (par tassement vers le bas des autres lignes), de récupérer toutes les formules des cellules (entre A et EZ) et de mettre à jour certaines (à partir de G)
Débutant en VBA je ne trouve pas ce qu'il faut faire !
Merci d'avance pour vos lumières.
Michel
A voir également:
- Erreur de compilation vba
- Erreur 0x80070643 - Accueil - Windows
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
- Erreur 4201 france tv ✓ - Forum Réseaux sociaux
- J'aime par erreur facebook notification - Forum Facebook
- Code erreur f3500-31 ✓ - Forum Bbox Bouygues
Merci pour ta réponse rapide!
Le classeur n'est pas protégé, les cellules ne sont (plus) verrouillées.
Les données sont "sensibles". J'ai dégradé un fichier que je peux te donner : il a toujours le même symptôme qui se produit…. (mais les données sensibles ont été modifiées)
Question (très) bête du débutant sur ce forum: je fais comment pour te le donner?
https://www.commentcamarche.net/faq/29493-utiliser-cjoint-pour-heberger-des-fichiers
va dans l'onglet "saisie simplifiée" et clique sur "mise à jour" cela devrait renvoyer les informations dans l'autre onglet
Ce fichier est fortement dégradé, mais j'ai laissé la structure "qui coince" (macro "report")
Merci d'avance pour ton aide !
Michel
Le probleme vient de selction, le s n'est pas en majuscule!!!!!
J'ai recupere votre fichier, meme avec l'enregistreur de macro le probleme existe!!!!!
Suite:
Ai trouve, vous avez une procedure qui s'appelle selection dans le Module1
Sub selection() ' ' selection Macro ' ' Sheets("Selection").Select End SubSuite:
Apres avoir renommer, toujours de meme!!
Suite:
Ma faute, avais vire deux sélections (a eviter, mais petite modif des lignes precedentes) et pas mis en commentaire les lignes selection.
Par contre le s de selection toujours en minuscule mais ca marche!!!
Bien renommer la procedure selection sinon plante
Remarque: tres lent en excecution!!
J'étais focalisé sur la procédure qui s'arrêtait mais je n'avais pas pensé qu'un onglet nommé "selection" et une macro nommée "selection" entreraient en conflit avec la fonction selection d'excel….
En la renommant ("choix" en l'occurrence) ca marche impec ! Je comprends maintenant pourquoi mes tests simplifiés marchaient…. il n'y avait pas l'onglet et la macro évoquées plus haut!
Première utilisation de ce forum, solution en 24h, encore MERCI !!!!
PS: l'exécution est lente, car il y a (dans le fichier réel) pas loin de 100 000 calculs en réalité et qui doivent être relancés en fonction des saisies faites et des requêtes de l'utilisateur. Je vais d'ailleurs maintenant reprendre cela pour voir si certains calculs peuvent être optimisés et moins gourmand en "prise d'information" dans toute la base de données, et s'il n'y a pas des "calculs doublonnés" ce qui n'est pas impossible. Je devrais arriver à l'accélérer (ou du moins à la ralentir moins!).
Je reprends mon développement du "vrai" outil !
Michel
"ils ne savaient pas que c'était impossible alors ils l'ont fait" (Marx Twain)