Constituer une BD avec les mise à jours sous Excel 2003 SP3
Bonjour,
Je travaille actuellement sur un petit utilitaire pour gérer des introductions de matériels avec prise en compte de l'utilisation d'un lecteur code barre.
Je ne joins pas encore le fichier juste le temps pour moi de le finaliser, et de le rendre présentable, afin de vous fournir de la matière.
Mais au bout de 4 semaines d'auto formation, je pense avoir besoin les avis des maîtres qui officient ce site, afin de savoir :
Existe t il une solution pour mettre à jours un onglet ('BD") à partir d un onglet ("Jal Events")
en balayant tous les évènements intervenus sur un item:
Je suis entrain de finalisé une version avec une formule de ce type copiée dans la cellule "" ="vlookup""". la limite connu de cette solution il va prendre uniquement la première ligne rencontrée et non pas toutes concernant l'élément recherché.
j'opterais pour un select case si cela concernait uniquement une mise à jours individuels
Miais je peux me retrouver avec des *MAJ* en masse.
Je vous remercie et tiens à m'excuser si mes explications ne sont pas assez explicites.
Je vous fournirais une version finalisé de mon fichier ce soir ou demain
Salut le forum
Merci de joindre un fichier exemple avec quelles lignes pour voir la disposition de tes feuilles.
Mytå
Bonjour à tous
Grand merci Myta pour ton post.
Vous trouverez un fichier non définitif avec un petit soucis de boucle que je n'arrive pas encore a stabilisée.
Mais je vous demande la plus grande indulgence avec les codes que vous allez trouver je débute dans le vba (je vous le rappel : je n'ai que 4 semaine, je suis un Bleu).
Il est vrai que pisser du code c'est un art, hélas avec quelques règles élémentaires que j'ai adoptée à 10%, toutes les lignes ne sont pas commentées.
Désolé messieurs:oops:
Bonne journée à tous et toutes au plaisir de voir vos postes avec vos commentaires et petites astuces (^_-)
Au vu de la gourmandise en octets les modules ont été supprimés et le code a été copiés dans des simples feuilles excel
Links :
https://www.excel-pratique.com/~files/doc2/ietMwmodule1.xls
https://www.excel-pratique.com/~files/doc2/jlC5Omodule2.xls
https://www.excel-pratique.com/~files/doc2/7M0ZDModule3.xls
https://www.excel-pratique.com/~files/doc2/WH7qiUtilitaire_GI_Version_1.0_depouille.xls
Bonsoir
Je n'arrive pas a stabiliser la boucle ci-dessous:
Sub lancement_Boucle_pour_mettre_à_jours_la_base()
Range("A65536").End(xlUp).Select
Do
If Selection = """" Then Exit Do
Range("A65536").End(xlUp).Offset(0, 1).End(xlUp).Offset(1, 0).Select
Call Mise_à_jours_Base_A
Range(Selection, Selection.Offset(0, -20)).Select
Selection = Selection.Value
Range("A65536").End(xlUp).Offset(0, 1).End(xlUp).Offset(1, 0).Select
Loop
End Sub
A très vite en vus remerciant pour l'attention porté à ces petits soucis de bleu
Amicalement
dan