Erreur multiple en vba dont erreur '1004'
mat_h
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention -
pijaku Messages postés 12263 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
Je travaille actuellement sur un outil d'industrialisation et je rencontre une difficulté dans le développement de mon programme.
Le projet consiste à développer une petite IHM en VBA permettant de donner les caractéristiques d'appareils en fonction d'un code entré par l'utilisateur.
J'essais de réaliser une condition me permettant de comparer d'un côté une plage de donnée qui représente la liste des appareils et de l'autre un caractère provenant d'un textBox. Ceci me permettant de vérifier l'existance de l'appareil dans la base de donnée.
Le code est le suivant:
Plusieurs erreurs apparaissent et je ne sais pas comment les résoudre.
La première est "Erreur 1004: erreur défini par l'application ou par l'objet." -> sur ma plage de donnée.
Après une erreur de type dans ma condition.
Si vous avez un début de solution, merci d'avance pour vos réponses.
Cordialement
Mat_h
Je travaille actuellement sur un outil d'industrialisation et je rencontre une difficulté dans le développement de mon programme.
Le projet consiste à développer une petite IHM en VBA permettant de donner les caractéristiques d'appareils en fonction d'un code entré par l'utilisateur.
J'essais de réaliser une condition me permettant de comparer d'un côté une plage de donnée qui représente la liste des appareils et de l'autre un caractère provenant d'un textBox. Ceci me permettant de vérifier l'existance de l'appareil dans la base de donnée.
Le code est le suivant:
' Procédure d'initialisation de Userform2 Private Sub UserForm_Initialize() ' Décomposition en caractère du code de la TextBox rentré par l'utilisateur Dim code(4) code(0) = Left(TextBox4.Value, 1) ... ' Définition des plages de données associés Dim tab_code(4) tab_code(0) = Sheets("GammeConfig").Range("tab_1[Code X1]" ... Dim rg As Range Set rg = tab_code(0).Find(What:=code(0)) If code(0) = rg Then .... End If
Plusieurs erreurs apparaissent et je ne sais pas comment les résoudre.
La première est "Erreur 1004: erreur défini par l'application ou par l'objet." -> sur ma plage de donnée.
Après une erreur de type dans ma condition.
Si vous avez un début de solution, merci d'avance pour vos réponses.
Cordialement
Mat_h
A voir également:
- Erreur multiple en vba dont erreur '1004'
- Erreur 0x80070643 - Accueil - Windows
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
- J'aime par erreur facebook notification - Forum Facebook
- Code erreur f3500-31 ✓ - Forum Bbox Bouygues
- Java code erreur 1603 ✓ - Forum Windows