XL 2010 Problème sur formulaire de saisie de tableau

Vélor

XLDnaute Nouveau
Bonsoir à tous,

Je commence le langage VBA et sur mon tableau "fichier synthèse" pour le suivi des commandes d'achats, cette formule ne fonctionne pas. Premier problème, sur le bouton modifier " pour modifier une DA" je voulais que dans le formulaire je puisse avoir le choix modifier un n° de DA en le cherchant dans combobox1 "n°", mais j'y arrive pas. J'arrive à alimenter des colonnes simple comme "date de création, nombre de poste...". Toutefois, mon autre problème se situe sur la deuxième liste modifiable "la premier marche", mais déjà la seconde "erreur", si je comprend la solution cela me permettra de faire fonctionner les deux suivantes. Je désire vraiment comprendre et donc progresser dans ce monde du VBA pour me simplifier la vie dans le cadre de mon travail, et surtout cela sera une satisfaction. Si une âme charitable veut prendre un peu de son temps pour m'aider et m’aiguiller, cela serait vraiment super.
Merci beaucoup

S.
 

Pièces jointes

  • Fichier synthèse.xls
    313.5 KB · Affichages: 62

Lone-wolf

XLDnaute Barbatruc
Bonjour Vélor et bienvenue sur XLD :)

J'ai apporté certaines modifications. Mais tu vas avoir de gros problèmes pour inserer ou modifier les données. Regarde bien cette image

forms.gif


Où sont les colonnes pour Date Création - Nombre de poste - Marché et N° Marché??? :rolleyes: . Met déjà les colonnes en place, ensuite tu prépare le formulaire. De plus tu mets for i = 1 to 7 Me.Controls("TextBox" & i) alors que t'en a que 4??. J'ai ajouté une macro de recherche pour combobox1. Avec le bouton Modifier, il faudra changer comme ceci:

With Ws
rw = Application.Match(ComboBox1, .Columns(2), 0)
.Cells(rw, 2 ) = Combobox xx
.Cells(rw, 3) = Combobox xx
End With

Idem pour les autres contrôles.
 

Pièces jointes

  • Copie de Fichier synthèse.xls
    316.5 KB · Affichages: 65
Dernière édition:

Vélor

XLDnaute Nouveau
Bonjour Vélor et bienvenue sur XLD :)

J'ai apporté certaines modifications. Mais tu vas avoir de gros problèmes pour inserer ou modifier les données. Regarde bien cette image

Regarde la pièce jointe 978085

Où sont les colonnes pour Date Création - Nombre de poste - Marché et N° Marché??? :rolleyes: . Met déjà les colonnes en place, ensuite tu prépare le formulaire. De plus tu mets for i = 1 to 7 Me.Controls("TextBox" & i) alors que t'en a que 4??. J'ai ajouter une macro de recherche pour combobox1. Avec le bouton Modifier, il faudra changer comme ceci:

With Ws
rw = Application.Match(ComboBox1, .Columns(2), 0)
.Cells(rw, 2 ) = Combobox xx
.Cells(rw, 3) = Combobox xx
End With

Idem pour les autres contrôles.
 

Vélor

XLDnaute Nouveau
Bonjour Lone-wolf,

Pour les colonnes pour Date Création - Nombre de poste - Marché et N° Marché, les colonnes à alimenter sont sur le fichier synthèse sur l'onglet Synthèse. Les colonnes sont respectivement "C;G;H;I". J'espère pouvoir faire fonctionner les listes de choix modulables.
Merci beaucoup pour ton aide.
S.
 

Vélor

XLDnaute Nouveau
Bonsoir Lone-wolf,

Déjà merci, je commence à comprendre quelques trucs. J'ai tenu compte de vos observations, et remis de l'ordre au sein de mon formulaire. En revanche, si vous pouvez me montrer comment rédiger le texte VBA pour que cela fonction, cela serait cool. J'ai effectivement encore quatre autres formulaires à créer donc je vais m'amuser. Toutefois, en essayant de comprendre votre VBA pour le Début. J'ai mis les annotations pour comprendre mon fichier sur l'onglet "Synthèse". Oui car je suis parfois compliqué dans ma tête. Bien entendu si cela vous demande trop de temps ne le perdez pas pour moi, je comprendrais.
Merci d'avance pour vos cours de formation.......
S.
 

Pièces jointes

  • Copie de Fichier synthèse (1).xls
    345.5 KB · Affichages: 46

Lone-wolf

XLDnaute Barbatruc
Bonsoir Vélor

Pourquoi avoir créer des onglet différents, alors que tu peux tout mettre sur un seul onglet. Tu te complique la vie pour rien. Le premier fichier était quasi juste, il fallait ajouter les colonnes dates - nombre de poste - marché etc. La feuille servira pour la recherche ensuite tu enregistre dans la feuille sythèse et c'est dans celle-ci que tu va modifier ou supprimer une ligne.
 

Lone-wolf

XLDnaute Barbatruc
Bonsoir Vélor,

Voir le fichier joint si cela convient. Mais il faut que tu fasse un formulaire d'enregistrement pour la feuille Table, supprime tout les noms qui non aucune référence. Ces noms doivent être rajoutés au fur et à mesure. En colonne K , il y a un numéro qui s'incrémentera dès qu'une cellule de la colonne C sera remplie. En Colonne I, les initiales de chaque service émetteur + le numéro automatique viendront se rajoutés pour former le code de recherche, tout ceci se fera à l'affichage du formulaire 1. Fait un double clique sur la feuille Synthèse pour l'afficher. Pour la recherche dans la feuille Synthèse, utilise la combo de recherche à gauche, la combo n° emetteur recherche les informations dans la feuille Table.
 

Pièces jointes

  • Fichier synthèse.xlsm
    262.3 KB · Affichages: 56
Dernière édition:

Discussions similaires

Réponses
17
Affichages
636

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 196
Messages
2 086 100
Membres
103 116
dernier inscrit
kutobi87