La valeur par défaut ne s'inscrit pars dans une cellule

max850 Messages postés 312 Statut Membre -  
max850 Messages postés 312 Statut Membre -
Bonjour,

Lorsque je veux compléter mes feuilles de recette ou dépense et journalbord via mon userform
le terme dummy que je souhaite inclure en A5 ne s'inscrit pas et provoque une erreur de Ref
alors qu'il s'inscrit bien sur ma feuille journalbord
Pouvez vous m'aider à résoudre ce problèm e
merci

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

4 réponses

  1. hich24 Messages postés 1686 Statut Membre 753
     
    un probleme sur fichier
    0
    1. max850 Messages postés 312 Statut Membre 3
       
      Vous n'arrivez pas à le lire ?
      0
      1. hich24 Messages postés 1686 Statut Membre 753 > max850 Messages postés 312 Statut Membre
         
        oui
        0
  2. hich24 Messages postés 1686 Statut Membre 753
     
    la feuille onglet nexiste pas !!
    With Sheets(Onglet)
    If Range("A5").Value = "" Then 'renseigne par défaut la cellule A5 pour éviter msg erreur REF
    Range("A5").Value = "Dummy"
    End If
    0
    1. max850 Messages postés 312 Statut Membre 3
       
      Pourtant dans le private sub checkbox
      j'ai bien défini Onglet = Feuil2.Name
      et Onglet = Feuil14.Name
      0
    2. hich24 Messages postés 1686 Statut Membre 753
       
      pourquoi ne pas essayer dans le worksheets change , a chaque intervention dans la feuille il verifier a5
      0
      1. max850 Messages postés 312 Statut Membre 3 > hich24 Messages postés 1686 Statut Membre
         
        ok vais essayer
        0
      2. max850 Messages postés 312 Statut Membre 3 > max850 Messages postés 312 Statut Membre
         
        dans le private sub cmdevalider-click
        j'ai placé un
        with feuil2
        etc...
        end with
        précédent mon with feuil4

        le dummy est bien inclus dans la feuille 4
        mais n'est pas pris en compte dans la feuil2
        0
  3. hich24 Messages postés 1686 Statut Membre 753
     
    onglet doit recuperer lindex de la feuille essaye de changer
    Onglet = sheets("Feuil2").Index
    0
  4. max850 Messages postés 312 Statut Membre 3
     
    j'obtiens un code erreur
    pas dans la collection
    0