Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter
Formulaire et base de donnée
Bonjour,
Novice en VBA sur excel 2007 j'essaye de créer un petit programme qui me permet en passant par un formulaire de compléter une base de donnée, cependant des erreurs récurrentes apparaissent et je suis perdu à force.
je mets en pièce jointe mon classeur si jamais une âme charitable peut m'aider....
Va voir cette page-là, à lire sans modération, cela pourrait t'être très très utile.
Bonsoir le fil, bonsoir le forum,
En pièce jointe ton fichier modifié avec :
• remplacement de certaines textboxes par des comboboxes.
• création dans l'onglet Listes des listes dynamiques (voir Gestionnaire de Noms) avec la formule DECALER. Pour actualiser une liste il te suffit de rajouter/supprimer un élément et de refaire un tri alphabétique de la colonne modifiée. La combobox correspondante se mettra à jour automatiquement.
• ajout d'une combobox INTERVENTION (un oubli je pense) avec mise à jour de la combobox PRODUIT en fonction de l'intervention choisie (d'où la liste des produits Herbicides et celle des produits Non Herbi)...
• ajout d'un module de classe TBNum pour les textboxes à données numériques. Il interdit à l'utilisateur tout autre caractère que {0, 1, 2, 3, 4, 5, 6, 7, 8 et 9} et remplace la virgule par un point. Le module de classe sert juste à éviter de réécrire le même code pour chaque textbox recevant des données numériques.
• code commenté.
Si tu as des questions n'hésite pas à demander...
Le fichier :
Bonjour,
En combinant le fichier de THAUTHEME est le mien j'arrive à faire fonctionner mon petit programme, cependant le module de base qui est censé remplace , par des . m'empêche ensuite dans ma feuille DATA de calculer IFT, de plus les données arrive sous le format texte donc la formule ne les prend pas en compte et ne calcule rien, y a-t-il un moyen d'empêcher cela ?
Je vous joint encore une fois mon fichier afin que une âme charitable puisse m'expliquer se qui ne va pas dans ma programmation.
Je vous remercie par avance de votre aide.
Bonjour,
Peut-être une réponse dans cette contribution USERFORM - Créer, Consulter, Modifier et Supprimer des enregistrements à l'aide d'un formulaire.
Philippe Tulliez
Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer suret si celle-ci est pertinente pensez à voter
Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier
RE bonjour
Idiot que je suis j'ai inverser 44 et 46 dans mon keyacii afin d'avoir tout le temps des virgules, cependant j'ai toujours le problèmes des données qui sont enregistrer dans ma feuille DATA au format texte ce qui m'empêche de faire le calcul IFT .
Si quelqu'un à une idée pour éviter cela ....
Tu as 2 erreurs de typographie dans cette ligne : Ranger et x1Up
Il faut corriger ainsi:
Code : Sélectionner tout - Visualiser dans une fenêtre à part derligne = Sheets("DATA").Ranger("A104875").End(x1Up).Row + 1
Code : Sélectionner tout - Visualiser dans une fenêtre à part derligne = Sheets("DATA").Range("A104875").End(xlUp).Row + 1
Répondre avec citation
Partager