Ligne suivante si non vide

Résolu
Bonjour,

Je bloque depuis quelques jours sur quelque chose de tout simple.
J'ai un fichier Excel dans lequel il y a des boutons. Je voudrais qu'à la pression d'un de ces boutons, une feuille "logs" soit remplie avec par exemple le nom de l'utilisateur.
Néanmoins la partie qui me pose problème est le fait de dire :
Si le bouton est appuyé alors écrit le nom de l'utilisateur dans une cellule vide de la colonne

J'ai un fichier "modèle" si mon explication n'est pas claire :)

Merci de votre aide,
Cordialement,
Florian

1 réponse

  1. Contributeur
    bonjour

    "Etilestoù" le fichier ?

    a part ca:
    exemple dans la colonne A à remplier par la variable "nom"

    nom = "toto"
    Range(Columns("A").Find(what:="", after:=Range("A1")).Address) = nom

    en supposant que A1 n'est pas vide, si oui, fais moi signe

     Michel
    0
    1. Bonjour michel,

      Tout d'abord merci de ta réponse vraiment rapide.
      Néanmoins, cela fonctionne pour sur la feuille principale mais je me base sur une autre feuille pour entrer les informations.
      ThisWorkbook.Sheets("Logs").Range(Columns("A").Find(what:="", after:=Range("A1")).Address) = Application.UserName


      Mais avec cela, uniquement une valeur en A9 est entrée et rien de plus sur la feuille "Logs"

      As-tu une idée ?

      Florian
      0
    2. Contributeur
      @thefloflo64NON
      Je t'ai écris un exemple à adapter mais ta demande reste floue

      Mettre le classeur sans données confidentielles en pièce jointe sur « mon-partage.fr »
      et faire un clic droit-coller le raccourci dans votre message

      Dans l’attente
      0
    3. En fait, la formule que tu m'as envoyé ne fonctionne que sur la feuille où elle est saisie.
      J'ai contourné le problème en faisant appel à la macro depuis une autre feuille.

      Merci de ton aide :)

      Cordialement,
      Florian
      0