Partage
  • Partager sur Facebook
  • Partager sur Twitter

Création d'une fonction personnalisée VBA

Sujet résolu
    27 janvier 2021 à 10:03:38

    Bonjour j'aimerai creer une fonction personnalisé en vba excel qui me dit si une range de cellules est vide ou non. je l'ai fait seulement lorsque je l'appelle, je  n'ai pas le retour escompté. 

    Public Function ESTNONVIDE(Cellules As Range) As String
        Dim i As Integer, MaCell As Range, NONVIDE As String
        ESTNONVIDE = "NOK"
        For Each MaCell In Cellules.Cells
            If MaCells.Value <> "" Then
                ESTNONVIDE = "OK"
                Exit For
            End If
        Next
    
    End Function

    Lorsque j'appelle la fonction dans une cellules excel "=ESTNONVIDE(C37:F37)" , j'ai le message suivant: #VALEUR!

    Pouvez-vous me dire ou se trouve le problème ?

    Merci d'avance

    • Partager sur Facebook
    • Partager sur Twitter
      27 janvier 2021 à 14:07:11

      Déjà une petite erreur dans le code ligne 5 MaCells n'existe pas contrairement à MaCell déclarée en ligne 2 et 4, ce qui doit à l'origine de l'affichage de #VALEUR!

      Prends peut-être l'habitude de mettre Option Explicit en tête des fichiers VBA (on peut le faire mettre par défaut en cochant la case "déclaration des variables obligatoire" dans le menu Outils > Options > onglet Editeur de l'éditeur VBA)

      • Partager sur Facebook
      • Partager sur Twitter

      Création d'une fonction personnalisée VBA

      × Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié.
      × Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Nous te conseillons de créer un nouveau sujet pour poser ta question.
      • Editeur
      • Markdown