Rendre obligatoire la saise de la cellule

Résolu
Fabduf37 Messages postés 11 Statut Membre -  
ccm81 Messages postés 11033 Statut Membre -

Bonjour,

Comment rendre obligatoire la saise de la cellule O...à partir du moment ou A... est remplie et empecher la sauvegarde et ou de quitter?

Cordialement

20 réponses

  1. Raymond PENTIER Messages postés 58219 Date d'inscription   Statut Contributeur Dernière intervention   17 485
     

    Bonjour.

    Il n'y a que deux méthodes :

    • Programmer un script VBA pour créer une macro.
    • Afficher dans la feuille un message invitant l'utilisateur à respecter la consigne ...

    0
  2. Fabduf37 Messages postés 11 Statut Membre
     

    Bonjour,

    J'ai essaye mais pas réussi si vous pouviez m'aider c'est pour ça que je fait appel au forum...

    0
  3. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     

    Bonjour à vous deux

    @ FAbdu37

    Dans ThisWorkbook de l'éditeur VBA copier-coller ces 2 macros, l'une pour la fermeture l'autre pour la sauvegarde

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    If Sheets("Feuil1").Range("O3") = "" And Sheets("Feuil1").Range("A2") <> "" Then
    MsgBox "Vous devez d'abors compléter la cellule O3"
    Cancel = True
    End If
    End Sub
    
    Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    If Sheets("Feuil1").Range("O3") = "" And Sheets("Feuil1").Range("A2") <> "" Then
    MsgBox "Vous devez d'abors compléter la cellule O3"
    Cancel = True
    End If
    End Sub

    Modifier les références des cellules A2 et O3 dans les 2 macros pour mettre celles de ton fichier avant de fermer l'éditeur VBA et enregistrer le fichier (cellules en A et en O vides)

    Cdlmnt

    Via


    0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. Fabduf37 Messages postés 11 Statut Membre
     

    RE,

    Ca fonctionne presque bien mais il faut que cela s'applique a toutes les lignes et j'ai essayé mais cela m’empêche de sortir de la celle A en fait tant que O n'est pas remplie mais ne veut pas que j'y aille!!!

    On y est presque

    Cordialement

    0
  6. ccm81 Messages postés 11033 Statut Membre 2 434
     

    cela m’empêche de sortir de la celle A en fait tant que O n'est pas remplie mais ne veut pas que j'y aille

    Pas très clair ! Avec la proposition de via55 (salut amical au passage) que tu as sans doute corrigé (remplacer A2 par A3 dans les deux procédures) ? ou bien avec la mienne.

    Peux tu décrire exactement ce que tu as constaté lors d'une tentative de fermer alors que A3 est remplie et O3 vide.

    Cdlmnt

    0
  7. Fabduf37 Messages postés 11 Statut Membre
     

    En fait si je remplie A des que j'en sors j'ai le message mais ne peut rien faire car tjrs le message quelque soit l'action que je fasse!!!!

    0
  8. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     

    Re,

    Effectivement ta demande n'était pas suffisamment claire

    Si je comprends bien sur une certaine plage  tu veux vérifier que pour chaque cellule A remplie d'une ligne la cellule O de la même ligne le soit aussi ?

    Dans ce cas la macro avant fermeture est à modifier ainsi

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    For n = 2 To 20 'boucle sur les lignes 2 à 20 A MODIFIER SELON LES LIGNES A VERIFIER DANS LE FICHIER
    If Sheets("Feuil1").Range("O" & n) = "" And Sheets("Feuil1").Range("A" & n) <> "" Then
    MsgBox "Vous devez d'abors compléter la cellule O" & n
    Cancel = True
    Exit For
    End If
    Next
    End Sub

    Modifier de la même manière la macro avant enregistrement


    0
  9. Fabduf37 Messages postés 11 Statut Membre
     

    Sur joint .com j'ai mis une copie du fichier et MERCI pour votre aide. ( achat 2023 )

    0
  10. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     

    c'est bien de le mettre sur cjoint mais encore faut il copier le lien cjoint du fichier et venir le coller ici pour qu'on puisse y accéder


    0
  11. Fabduf37 Messages postés 11 Statut Membre
     

    Le voici je pensais que c'était en direct avec la question désolé

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

    0
  12. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     

    ok

    bon confirme moi que j'ai bien compris

    pour tout n° dans la colonne A il doit y avoir des frais indiqués ou 0 au pire dans la colonne O en regard sinon pas possible ni de sauvegarder ni de fermer ?


    0
  13. Fabduf37 Messages postés 11 Statut Membre
     

    Re,

    Ce ne sont pas des frais mais un mois pour provision de frais qui correspondent à la liste déroulante des mois . De 1a12

    Par contre il ne faut le faire qu'à partir de la ligne 199 le crois car je ne pourrais revenir en arrière sur les lignes précédentes....

    Ah mince ce n'est pas Osur ce fichier la c'est Q car j'ai deux colonnes a supprimer mais je le ferais après

    0
  14. Fabduf37 Messages postés 11 Statut Membre
     

    Ok j'essaie tout à l'heure merci bonne nuit ????

    0
  15. Fabduf37 Messages postés 11 Statut Membre
     

    Bponjor,

    Il y a bien le message lors de la fermeture mais si on clicque sur ok on sort quand meme il faudrait empecher cette sortie..si possible bien sur

    0
  16. Fabduf37 Messages postés 11 Statut Membre
     

    Voici la réponse CCM81 après essais, on arrive quand meme àa fermer à cerrtains moments et surtout si on enregistre avant!

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

    0
  17. ccm81 Messages postés 11033 Statut Membre 2 434
     

    De rien,

    Ce que j'ai essayé de faire : tu ne peux pas quitter si la colonne O n'est pas Ok,. Et si ok, avant de quitter le fichier est enregistré via la macro.

    Si tu as trouvé une séquence où tu peux fermer sans que la colonne O soit ok, ou le fichier n'est pas enregistré, tu expliques comment tu en es arrivé là.

    Cdlmnt

    0
  18. Fabduf37 Messages postés 11 Statut Membre
     

    Bonjour,et merci à tous c'est bon tout fonctionne!!!!

    0
    1. ccm81 Messages postés 11033 Statut Membre 2 434
       

      Bon, il ne te reste plus qu'à mettre le sujet à Résolu (en haut dans ton premier post, les trois petits points)

      Bonne soirée

      0