macro ne fonctionnant pas

Question

Bonjour, 
J’ai créé dans la cellule B7 un menu déroulant.
Puis une macro intitulée « comptable » qui remplit le tableau sur la feuille comptable
Mais les valeurs ne vont pas dans les bonnes cellules de destination alors que dans la macro, j’ai bien spécifié celle-ci.
Si quelqu’un peux m’aider à résoudre ce problème
Je le remercie d’avance.
ci dessous fichier
http://www.cjoint.com/c/GAqrDgmXDdX

Patrice33740 · Answer

Bonjour,
Il n'y a pas de macro dans le fichier joint
(elle est dans un autre fichier nommé calcul tva janv 2017-5-3.xls)

haffinger1 · Answer

https://www.cjoint.com/c/GArhYRl2ROj

haffinger1 · Answer

https://www.cjoint.com/c/GArhYRl2ROj
je remets le fichier car la macro n’était pas présente
elle se trouve sur la feuille facture
merci d'avance

momo · Answer

Bonjour
A toi de finier la macro

Sub Macro2()
Passe = True
   With Sheets(Feuil2.Name)
      Nlig = .Range("A" & Rows.Count).End(xlUp).Row
      For L = 2 To Nlig
         If .Range("C" & L).Value = Range("B6").Value Then
            Passe = False
            MsgBox "Pas Bon"
            Exit For
         End If
      Next
      If Passe = True Then
         Lig = Nlig + 1
            .Range("A" & Lig).Value = Range("B1").Value ' Jour
            .Range("B" & Lig).Value = Range("B2").Value ' Client
            .Range("C" & Lig).Value = Range("B4").Value ' N°Fact
            .Range("D" & Lig).Value = Range("G14").Value ' Montant
         MsgBox "OK"
      End If
   End With
End Sub

A+
Maurice

haffinger1 · Answer

Merci momo d'avoir vu mon problème
par contre je suis néophyte dans les macros
pour moi, l’écriture des termes, c'est de l’hébreu
si tu peux finaliser la macro ou une personne qui peux m'aider
je vous  remercie d'avance

Macro ne fonctionnant pas

5 réponses

Discussions similaires

Newsletters