Macro bugge

jeanphi · 30 Avril 2008

Bonjour

J'utilise une macro (que je n'ai pas développé moi-même) qui plante alors qu'elle marchait encore récemment
Je ne comprends pas le problème
Quelqu'un peut t'il m'aider?
http://cjoint.com/?eEi1AimfIW
Merci

pierrejean · 30 Avril 2008

Re : Macro bugge

bonjour jeanphi

des macros il y en a plusieurs dans ton fichier !!
il ne serait pas inutile de nous preciser laquelle bugue (et de quelle façon )

jeanphi · 30 Avril 2008

Re : Macro bugge

bonjour pierrot

c'est la macro "Lancement" (voir bouton "Impact 2008" ) qui me pose problème
merci de ton aide

Roland_M · 30 Avril 2008

Re : Macro bugge

bonjour

essais ceci

Sub sup_lignes_vides()
DernLig = Range(Cells(65535, 6), Cells(65535, 7)).End(xlUp).Row+1
Range(Cells(DernLig, 1), Cells(65535, 1)).EntireRow.Delete
End Sub

Roland

jeanphi · 30 Avril 2008

Re : Macro bugge

bonjour Roland

Effectivement elle bugge mais c'est surtout la macro "Lancement" pour laquelle j'ai besoin d'aide!!
merci

Roland_M · 30 Avril 2008

Re : Macro bugge

re

on s'est croisé regarde message précédent
Roland

pierrejean · 30 Avril 2008

Re : Macro bugge

Re

A tester:

Remplacer dans la sub Traitement

Code:

Selection.Copy
    Sheets("F").Select
    Cells.Select
    Range("B1").Select

par

Code:

Selection.Copy
    Sheets("F").Select
    Cells.Select
    Range("[COLOR=red]A[/COLOR]1").Select

ensuite , si necessaire insere une colonne
Explication:
ton code copie toute les cellules de Impact dans F
si tu veux commencer en B1 , excel dit ne pas avoir assez de place

ps:
@ Roland
Le .End(xlup) ne me parait pas mal plaçé
par contre s'il n'y a pas de cellule vide cela peut expliquer le bug de la macro de suppression

jeanphi · 30 Avril 2008

Re : Macro bugge

merci roland pour ta macro
c est vrai qu elle marche la tienne!!
et pour l'autre peux tu m aider?
merci

jeanphi · 30 Avril 2008

Re : Macro bugge

Merci Pierrot pour ta réponse mais çà marche toujours pas
moi cà plante au niveau de Me.TextBox2.Value = Sheets(3).[b1].Value & " €" quand je lance la macro "Traitement"
As tu ce pb aussi?

Roland_M · 30 Avril 2008

Re : Macro bugge

re

qu'elle est l'autre bug ?

Roland

Roland_M · 30 Avril 2008

Re : Macro bugge

re

je viens de voir le bug

mais il me semble normal puisqu'on fait appel à la feuille(3) qui n'existe pas !?
en tout les cas dans le fichier joint !

Roland

jeanphi · 30 Avril 2008

Re : Macro bugge

Avant ca marchait pourtant et lea feuille 3 n existait pas non plus!
par ailleurs j ai un souci en fait avec la macro suppression également
elle ne me supprime pas que des lignes vides...

jeanphi · 30 Avril 2008

Re : Macro bugge

je m explique la macro me supprime toutes les lignes vides ou pleines qui se trouvent avant une ligne vide ou pleine
je veux juste que la macro supprime toutes les lignes pour lesquelles il n y a pas de valeur dans la colonne 7

Roland_M · 30 Avril 2008

Re : Macro bugge

re

bon, petite mise au point:
1 j'ai retrouvé la feuille manquante elle était cachée !? je l'ai mise visible
2 dans cette feuille tu as =SOMME(#REF!) dans A1 B1 C1 !?
c'est pour cela que ça plante !

3 tu voulais supprimer les lignes vides dans colonne 6 et 7 !? ou sur toute la feuille ?

Roland

Roland_M · 30 Avril 2008

Re : Macro bugge

re

voir ton fichier Zippé
je supprime les lignes vides sur base de la colonne 7
Roland

Macro bugge

jeanphi

XLDnaute Occasionnel

pierrejean

XLDnaute Barbatruc

jeanphi

XLDnaute Occasionnel

Roland_M

XLDnaute Barbatruc

jeanphi

XLDnaute Occasionnel

Roland_M

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

jeanphi

XLDnaute Occasionnel

jeanphi

XLDnaute Occasionnel

Roland_M

XLDnaute Barbatruc

Roland_M

XLDnaute Barbatruc

jeanphi

XLDnaute Occasionnel

jeanphi

XLDnaute Occasionnel

Roland_M

XLDnaute Barbatruc

Roland_M

XLDnaute Barbatruc

Pièces jointes

Discussions similaires