macro qui ne fonctionne pas jusqu'au bout

N

ninanani

XLDnaute Occasionnel

• 10 Mars 2009

• #2

Re : macro qui ne fonctionne pas jusqu'au bout

Re,

Personne n'a trouve ce qui cloche??

 

Vote positif 0 Vote négatif

Gael

XLDnaute Barbatruc

• 10 Mars 2009

• #3

Re : macro qui ne fonctionne pas jusqu'au bout

Bonjour Ninanani,

Le problème vient de la définition de la variable "Largeurbase" pour laquelle tu utilises la ligne 1 dont les 3 dernières colonnes sont vides.

"Balance" est en colonne BK, la cellule BL est vide puisque fusionnée avec BK.

BL et BM sont vides.

Tu peux donc soit mettre des titres en BL et BM, soit utiliser la ligne 3 en modifiant l'instruction:

Code:

LargeurBase = Sheets("paiement").Range("IV3").End(xlToLeft).Column

@+

Gael

 

Vote positif 0 Vote négatif

Gael

XLDnaute Barbatruc

• 10 Mars 2009

• #4

Re : macro qui ne fonctionne pas jusqu'au bout

Re,

Quelques remarques supplémentaires:

Les formules en colonne BL me semblent décalées d'une ligne. en ligne 3 par exemple on a

Code:

=(BJ2+BH2+BF2)-BD2

Lors de l'ajout d'une ligne, tu ne recopies ni les formats, ni les formules.

Dans la procédure "Save", tu peux remplacer la plupart des instructions de recopie de valeurs dans les cellules par une boucle:

Code:

For i = 19 To 35
    Sheets("paiement").Cells(der_lig, i - 15).Value = .Range("A" & i).Value
    Sheets("paiement").Cells(der_lig, i + 2).Value = .Range("C" & i).Value
  Next i

@+

Gael

 

Vote positif 0 Vote négatif

nolich

XLDnaute Occasionnel

• 10 Mars 2009

• #5

Re : macro qui ne fonctionne pas jusqu'au bout

Bonjour ninanani et Gael, bonjour à toutes et à tous

Gael, je pense que cela est le fait des essais que ninanani a dû effectuer, et dans lesquelles les 3 dernières colonnes, dont BL qui est la seule à contenir un calcul, n'étaient pas effacées.

@+

 

Vote positif 0 Vote négatif

N

ninanani

XLDnaute Occasionnel

• 11 Mars 2009

• #6

Re : macro qui ne fonctionne pas jusqu'au bout

Re Gael, Nolich

Merci pour votre aide.
J'ai en effet mis un titre sur mes collones qui etaient vides et tout fonctionne parfaitement.

Merci encore a vous, et merci au forum

 

Vote positif 0 Vote négatif