Mon bouton Nouvelle Facture ne fonctionne plus

Bonjour tout le monde,

Voila depuis ce soir mon bouton nouvelle facture ne fonctionne plus il me dit que j'ai un souci de cellule fusionner mais je vois rien de fusionner,

je vous joint mon fichier si quelqu'un voit d’où

14facture.xlsm (54.29 Ko)

peux venir mon problème car cela fonctionnais jusqu’à maintenant merci d'avance.

Bonsoir Duncoup32, bonsoir à tous,

Une série de cellules sont effectivement fusionnées (A46:H46 - F38:H38 - F39:H39 - F42:H42 ).

J'ai corrigé le format de cellule en dé-fusionnant puis en centrant sur plusieurs colonnes.

A priori, cela fonctionne maintenant.

10facture.xlsm (52.11 Ko)

A+

AL 22

Merci à toi,

Ok je vois c'est suite a mon agrandissement de mon montant HT qui du coup ce retrouve en dessous de la colonne quantité alors que avant non ok,

y a t'il un moyen de dire au code VBA de stopper a la ligne 34 du coup cela règlerais mon souci sans modifier ma facture ?

Re,

2 solutions :

• Soit tu décales le texte "Montants" de F38 à G38 et tu centres, pareil pour les cellules F39 et F42,

• Soit tu modifies la macro comme ceci :

Sub NumeroFacture()

'Efface la facture et met a jours le numéro de facture
Sheets("Factures").Range("A12").Select
    Range(Selection, Selection.End(xlDown)).ClearContents
Sheets("Factures").Range("F12").Select
    Range("F12:F36").ClearContents
Sheets("Factures").Range("E3").ClearContents

Sheets("Factures").Range("G1").Value = Sheets("Factures").Range("G1").Value + 1

End Sub

Bonne fin de soirée

AL 22

Encore merci grace a toi j'ai trouver la solution j'ai modifier la formule:

Sub NumeroFacture()

'Efface la facture et met a jours le numéro de facture
Sheets("Factures").Range("A12").Select
    Range("A12:A36").ClearContents
Sheets("Factures").Range("F12").Select
    Range("F12:F36").ClearContents
Sheets("Factures").Range("E3").ClearContents

Sheets("Factures").Range("G1").Value = Sheets("Factures").Range("G1").Value + 1

End Sub

pour palier a la cellule fusionner en bas ou j'ai écris:

"En cas de retard de paiement, indemnité forfaitaire légale pour frais de recouvrement : 40,00 €"

qui prend toute la ligne de la page je suis obliger de stopper la colonne A a 36 aussi vraiment merci de ton aide.

Rechercher des sujets similaires à "mon bouton nouvelle facture fonctionne"