Erreur 1004

Résolu
Shadorb Messages postés 60 Statut Membre -  
Pierre1310 Messages postés 8854 Statut Membre -
Bonjour,

J'essaye de supprimer toute les lignes dont la colonne ciblé contient "CUMUL".
Voici le code qui provoque donc l'erreur "Erreur définit par l'application ou l'objet."

Option Explicit

Sub test1()
Dim myRange As Range
Dim cell As Range
Set myRange = ActiveSheet.Range("L7C20:L294C20")
For Each cell In myRange
If cell.Value = "CUMUL" Then cell.Delete
Next
End Sub


La question est donc pourquoi je n'ai pas le droit de faire ça ?

1 réponse

Pierre1310 Messages postés 8854 Statut Membre 651
 
Bonjour,

Set myRange = ActiveSheet.Range("L7C20:L294C20")

C'est cette ligne qui n'est pas compilée. Je pense que c'est parce que L7C20 L294C20 ne veut rien dire. On dirai que tu veux spécifier ligne/colonne à ligne/colonne, essaye de spécifier une plage pour commencer.
0
Shadorb Messages postés 60 Statut Membre
 
En faite mon problème c'est que l'application tiers qui renvoi le csv que je veux traiter, ne renvoi pas des colonne de type A,B,C mais colonne 1,2,3 ce qui donne C1. Donc en gros j'essaye de sélectionner Ligne 7 Colonne 20 à Ligne 7 Colonne 294.
0
Pierre1310 Messages postés 8854 Statut Membre 651
 
Ce que tu peux faire c'est 2 compteurs avec un pour la ligne et un autre pour la colonne comme ça tu peux délimiter sans erreur.
0
Shadorb Messages postés 60 Statut Membre
 
J'ai trouver une solution, en faite c'était je pense mon excel qui avait un mauvais format.

Du coup: Fichier" > "Options" > ">Formules" qu'il faut aller. Dans la partie "Manipulation de formules" tu décoches la case "Style de références L1C1" et le tour est joué.

Merci bien en tout cas.
0
Pierre1310 Messages postés 8854 Statut Membre 651
 
De rien bonne journée.
0