Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Function excel en VBA, afficher error dans la cellule

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion jul51
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
J

jul51

Guest
Hello,

Voila je concois en ce moment des fonctions en VBA pour Excel et j'aurais besoin que la cellule qui contient la function affiche Error comme les fonctions Excel par defaut si un parametre est mal renseigne.

Comment je peux faire ca?

Tks for your help 🙂

Julien
 
Trier par date Trier par votes
Re : Function excel en VBA, afficher error dans la cellule

Bonjour jul51,

en fait, tu n'as souvent pas grand chose à faire. Si la fonction ne parvient pas à renvoyer de réponse valide, elle renvoie souvent un message d'erreur automatiquement.
Si tu veux plus de précision, il nous faudrait des données plus concretes...
 
Vote positif 0 Vote négatif
Re : Function excel en VBA, afficher error dans la cellule

Overall, tks for your help!

La fonction est simple, cest pour remplacer une fonction adfin de reuters pour ajouter ou soustraire des jours, mois ou annees a une date:

Code: 
Function DateDiffPeriod(dmy As String, Diff As String, DatePoint As Date)

'If Diff = "" Or IsNumeric(Diff) = False Or IsDate(DatePoint) = False _
                Then
    
    
    Select Case dmy

        Case "d"
    
            DateDiffPeriod = DateAdd("d", Diff, DatePoint)
    
        Case "m"
    
            DateDiffPeriod = DateAdd("m", Diff, DatePoint)
    
        Case "y"
    
            DateDiffPeriod = DateAdd("y", Diff, DatePoint)
            
        Case Else
        
            
    
    End Select

End Function

J'ai pas encore teste la fonction mais cela semble renvoye 0 et pas error?
 
Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Re : Function excel en VBA, afficher error dans la cellule

et si tu essayes comme ça ?

Code: 
Function DateDiffPeriod(dmy As String, Diff As String, DatePoint As Date) As Date
    
    Select Case dmy
        Case "d"
    
            DateDiffPeriod = DateAdd("d", Diff, DatePoint)
    
        Case "m"
    
            DateDiffPeriod = DateAdd("m", Diff, DatePoint)
    
        Case "y"
    
            DateDiffPeriod = DateAdd("y", Diff, DatePoint)
            
    End Select
End Function

bon après, si tu n'obtiens pas d'erreur, donne nous les paramètres d'entrée que tu as utilisé
 
Vote positif 0 Vote négatif
Re : Function excel en VBA, afficher error dans la cellule

Mais que je suis bete, effectivement si je prevois un else.....il peut pas afficher d'erreur.

J'ai bien maintenant un #VALUE, brilliant!

Tks for your help!

Julien
 
Vote positif 0 Vote négatif
Re : Function excel en VBA, afficher error dans la cellule

Bonjour à tous,

d'ailleurs, si tu veux une erreur dans tous les cas non gérés, il vaudrait mieux faire :

Code: 
Function DateDiffPeriod(dmy As String, Diff As String, DatePoint As Date) As Date
    Select Case dmy
        Case "d"
    
            DateDiffPeriod = DateAdd("d", Diff, DatePoint)
    
        Case "m"
    
            DateDiffPeriod = DateAdd("m", Diff, DatePoint)
    
        Case "y"
    
            DateDiffPeriod = DateAdd("y", Diff, DatePoint)
            
        Case Else
        
            DateDiffPeriod = "a"
            
    End Select
End Function

Même si c'est beaucoup moins propre que la solution proposée par MichelXLD
 
Vote positif 0 Vote négatif
Re : Function excel en VBA, afficher error dans la cellule

Merci pour ces precisions, le as Date est une bonne idee. Apres je veux pas y passer trop de temps, c'est pas pour des exceleurs non inities. Du moment que cela affiche error quand un mauvais parametre est ajoute....cela me suffit.

Tks guys 😀
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

T
  • Résolu(e)
XL 2019 Afficher un mot dans une colonne paramétrée en liste déroulante
Réponses
4
Affichages
370
telemarrk
T
  • Résolu(e)
Microsoft 365 Activer/désactiver le "Focus sur la cellule" en VBA
Réponses
6
Affichages
683
oguruma
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
686
Phil69970
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
1 K
Nel'
N
EXCEL :: VBA :: Activer - Désactiver les filtres dans un tableau en plage d'adresses ou dans un tableau structuré
Réponses
0
Affichages
624
oguruma
EXCEL :: VBA :: Barre de progression via un graphique cylindrique, cubique, aquarium, donuts et shape
Réponses
0
Affichages
762
oguruma
EXCEL :: Les Tableaux Structurés :: Une classe VBA - V1.05 - Evolutions majeures exports CSV, XML, XML UTF-8, JSON, HTML, PDF, JPG, JPEG, BMP, EXCEL
Réponses
10
Affichages
1 K
oguruma
EXCEL :: CLASS_LIBRARY_TOOLS_V1.0 - Classes utilitaires - Fichier Log, Gestion de pile d'exécution, isExists, Paramètres, Collection, Dictionnaire
Réponses
0
Affichages
533
oguruma
  • Résolu(e)
XL 2016 Supprimer "Rechercher dans les menus" du menu contextuel de cellule Excel
Réponses
3
Affichages
469
jurassic pork
zip And unzip des éléments d'un fichier de type zip y compris les fichiers Excelavec la commande (TAR)
Réponses
2
Affichages
766
patricktoulon
  • Question Question
XL 2021 Orientation d'une image dans le commentaire d'une cellule
2 3
Réponses
42
Affichages
3 K
AtTheOne
  • Suggestion Suggestion
Texte Définir les propriétés d'une cellule ou d'un Range (couleurs, fonte, ..., valeur) dans une formule
Réponses
0
Affichages
2 K
Dudu2
O
  • Question Question
Autres VBA test et action selon valeur de la première cellule visible en colonne A après un tri
Réponses
8
Affichages
1 K
Oko
O
R
  • Question Question
XL 2019 fonction excel en VBA
Réponses
2
Affichages
625
Akia
A
EXCEL :: TCD :: SEGMENTS :: Identifier l'élément sélectionné dans le segment :: Modifier dynamiquement la valeur d'un segment :: VBA
Réponses
1
Affichages
841
oguruma
E
  • Résolu(e)
Microsoft 365 Problème d'organisation des colonnes dans une ListBox en VBA Excel
Réponses
2
Affichages
1 K
eCHO
E
T
  • Question Question
Microsoft 365 Images ne s'affiche pas dans fichier Excel
Réponses
5
Affichages
1 K
job75
E
  • Question Question
Microsoft 365 VBA Calendrier, rien ne se passe.
Réponses
12
Affichages
1 K
fanch55
M
  • Question Question
XL 2019 Afficher l'explorer via vba
Réponses
2
Affichages
2 K
patricktoulon
S
  • Résolu(e)
Microsoft 365 VBA pour copier/coller une plage de cellule dans un autre onglet en fonction de la date
Réponses
8
Affichages
1 K
Sylvain. B
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…