Résoudre l’erreur « Le crédit budgétaire existe déjà » dans Excel – Un cas pratique

Description

Vous travaillez sur un fichier Excel pour gérer des crédits budgétaires et, soudain, un message d’erreur inexplicable s’affiche : « Le crédit budgétaire existe déjà ». Pourtant, vous savez pertinemment que ce n’est pas le cas. Ce problème, aussi frustrant que mystérieux, peut survenir dans des fichiers structurés de manière similaire mais avec des comportements différents. Plongeons ensemble dans ce cas concret pour en comprendre les causes et trouver une solution.
Le contexte : deux fichiers, deux comportements

L’utilisateur rencontre une situation déroutante :

Dans le fichier budgets-1-4.xlsm, créer un crédit budgétaire pour un article inexistant fonctionne sans problème.

Dans le fichier BUDGETS.xlsm, la même opération génère parfois l’erreur « Le crédit budgétaire existe déjà », bien que l’article n’existe pas.

Une recherche manuelle dans la feuille BD Crédits budgétaires avec le terme « Boudin » (exemple d’article) confirme que l’entrée n’existe pas. Pourquoi Excel insiste-t-il alors sur son existence ?
Investigation : le formulaire UF01CréerCréditsBudgétairesBP

Pour résoudre le problème, l’utilisateur a placé un point d’arrêt dans le formulaire UF01CréerCréditsBudgétairesBP, plus précisément dans la procédure :
vba

Private Sub CBArticle_Change()
tbCodeArticle.Value = Application.WorksheetFunction.VLookup(cbArticle.Value, Range(« TabBDArticlesBudgétaires2 »), 2, 0)
End Sub

Observations lors du débogage

Lors de la saisie de « Boudin » dans le champ Article, le code s’arrête sur la ligne du VLookup. Les variables affichent :

cbArticle.Value = « Boudin »

tbCodeArticle.Value = «  »

Cela indique que le VLookup ne trouve pas l’article « Boudin » dans la plage TabBDArticlesBudgétaires2, ce qui est normal puisque l’article n’existe pas. Mais pourquoi cette absence de résultat déclenche-t-elle l’erreur ?
Hypothèses et solutions potentielles
1. Gestion des erreurs du VLookup

Le VLookup génère une erreur lorsqu’il ne trouve pas de correspondance. Sans gestion d’erreur, cette situation peut provoquer un comportement imprévisible.

Solution proposée :
Modifier le code pour capturer l’erreur et gérer le cas où l’article n’existe pas :
vba

Private Sub CBArticle_Change()
On Error Resume Next ‘ Ignorer l’erreur temporairement
tbCodeArticle.Value = Application.WorksheetFunction.VLookup(cbArticle.Value, Range(« TabBDArticlesBudgétaires2 »), 2, 0)
If Err.Number <> 0 Then
tbCodeArticle.Value = «  » ‘ Ou une valeur par défaut
End If
On Error GoTo 0 ‘ Réactiver la gestion d’erreur standard
End Sub

2. Incohérence des données ou de la structure

La table TabBDArticlesBudgétaires2 pourrait être différente entre les deux fichiers :

Vérifiez que la plage TabBDArticlesBudgétaires2 couvre bien toutes les colonnes nécessaires.

Assurez-vous que les données sont cohérentes (pas de doublons, formats de texte uniformes).

3. Problème de cache ou de corruption du fichier

Le fichier BUDGETS.xlsm pourrait être corrompu ou avoir des calculs bloqués.

Essayez de copier le code et les données dans un nouveau fichier Excel.

Vérifiez les références aux plages nommées (TabBDArticlesBudgétaires2).

Conclusion

L’erreur « Le crédit budgétaire existe déjà » dans le fichier BUDGETS.xlsm semble liée à une gestion insuffisante des erreurs dans la procédure VLookup. En ajoutant une simple routine de gestion d’erreurs, vous devriez éviter ce message et permettre la création de crédits budgétaires pour des articles inexistants.

Si le problème persiste, n’hésitez pas à partager des détails supplémentaires ou à examiner la structure des tables de données. Parfois, la solution réside dans une petite ajustement du code ou une vérification minutieuse des références.

Téléchargez les fichiers concernés pour tester vous-même :

budgets-1-4.xlsm

BUDGETS.xlsm

Un grand merci à la communauté pour son aide précieuse !

Restez connectés pour plus de solutions techniques et d’astuces Excel !