error 1004 columns

bonjour
J'ai un programme VBA qui plante et je ne comprend pas pourquoi, surtout qu'il ne plante pas systematiquement, mais seulement de temps en temps
Voila mon début de code...

Code:

---

1 2 3 4 5 6 7 8

Worksheets("dsff").Activate Calculate Columns("G:G").Select Selection.NumberFormat = "General" Columns("H:H").Select Selection.Font.ColorIndex = 0 On Error Resume Next c = Range("N1").Value

---

Il plante de temps en temps en me disant error 1004 et un message d'erreur sur les Columns... Et l'Help ne marche pas
Et le Debug me met en jaune :

Code:

---

Columns("G:G").Select

---

.
Donc je ne comprend pas en quoi mon code serait faux, et surtout pourquoi ca ne plante pas de maniere systematique

Calculate doit demander un certain temps... Si c'est ça, il faut laisser au système le tps de faire son travail. Ajoute un DoEvents entre les deux lignes

Code:

---

1 2 3

Calculate DoEvents Columns("G:G").Select

---

ok je vais le faire mais je pense pas que ce soit ca....le calculate prend meme pas 1/2 seconde...

il me dit "Run Time error 1004" "Method 'Columns' of object '_Global' failed"

et j'ai essayé le DoEvents
ca ne marche pas :(

ptetre un autre indice :
ca ne me met pas le message d'erreur lorsque je me place initialement dans le bon onglet.
En revanche, si je suis initialement dans un autre onglet, ca plante

Remplace Worksheets("dsff").Activate par Select
A tout hasard

lol ca plante aussi avec select

J'ai réduit le code à

Code:

---

1 2 3 4 5 6

Sub deboggage2() Worksheets("jj").Activate   Columns("G:G").Select   End Sub

---

et ca plante
j compren vraiment pas

bon, ben ca marche avec sheets a la place de worksheets
mais bon c'est quand meme bizarre, j comprend pas tout...

Ferme Excel et relance-le puis refais le test avec Worksheets et select

Ceci dit on n'a jamais besoin de sélectionner ni une feuille ni une colonne à une exception près. Que veux-tu faire avec ta colonne ?

la selection de la feuille c'était parceque j'ai plusieurs onglets
la selection de la colonne c'est pour changer le format des valeurs de la cellule
Ce qui est juste bizarre, c'est que ce fichier marchait tres bien avant, mais il s est mis tout d'un coup a bugger, et depuis, j'essaie de le debugger...

As-tu redémarré Excel ?

oh oui ...au moins 50 fois lol!
et avec worksheets, ca marche dans mes anciens fichiers avec le meme code
mais pas dans mon fichier actuel

Alors "y'a aut' chose". Ça peut être un bug dans un code que tu n'utilises pas (dans une autre procédure) Tu as ça ? ;)

j ai trouvé....
en fait, lorsque je lancais le code, initialement, c'était un tableau dans l'onglet qui était sélectionné.
Donc ça faisait bugger tout mon code!!
il suffisait de mettre avant la selection de colonne

Code:

---

Range("A1").select

---

et je m en rendais pas compte car lorsque j'activais l'onglet et que ca marchait, c'est parce que je cliquais dans une cellule
voila
merci quand meme pour ton aide
(j te rassure, il m a fallu pleein d'essais et un bon bout de temps pour trouver l'erreur(j m attendais pas a ce type d'erreur))

Tout ça ne répond pas à ma question sur la nécessité des "activate" ou des "select" ;)

comment ça sur la nécessité des "activate" ou "select"?

On n'a jamais besoin de sélectionner quoi que ce soit, à une exception près que j'oublie toujours. Donc ma question : Que veux-tu faire avec ton select qui alourdit le code, et donc le ralentit et qui en outre donne des mouvements de fenêtre inutiles.
Là était mon interrogation à laquelle on peut apporter une solution.
A+ ... si tu as envie de savoir comment on peut se passer de sélectionner une feuille ou une cellule. ;)