Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
J'ai trouvééééééééé, j'ai remplacé lig par Fdev qui est la variable que j'utilise pour créer la ligne et du coup ton code marche parfaitement.
Merci Job75
Arnaud
Bonjour Job75,
Merci de ta réponse, malheureusement cela ne fonctionne pas.
La cellule de référence est Y7 et tu as bien compris : cela avance de 4 en 4 (AC7 puis AG7 et ainsi de suite). Le code me paraît bien construit pourtant (mais bon il est vrai que je n'y connais pas grand chose).
Arnaud
Bonjour à tous,
A la suite du remplissage d'un formulaire, je souhaiterais qu'à partir de la colonne Y il soit insérer un certain nombre de formule. Mais à la suite de Y cela a une fin, et cette fin est variable (cela peut être AF ou AJ ou plus encore).
J'ai donc commencé un petit code :
Dim...
Je pense que je ne suis pas loin (déjà, il n'y a plus d'erreur!) mais cela ne fonctionne que pour les nouvelles lignes, et ça ne prend pas en compte la condition, de plus si les anciennes ont été modifiées cela ne les modifie pas.
J'ai épuré le fichier pour pouvoir le joindre.
Sub...
Bonjour à tous,
J'ai essayé de créer un code correspondant à ce que je souhaitais, mais je n'y arrive pas, je retourne le problème dans tous les sens et ça coince presque à chaque ligne (non quand même pas, seulement à partie de la ligne 17, mdr).
Sub Alerte_Stock()
Const ColBas = 9
Dim ColE...
Je réfléchissais à comment contourner le problème : je vais lancer le contrôle des alertes de stock à partir d'un formulaire qui encadrera des dates (le formulaire n'est pas encore créé mais j'ai l'ensemble du code dans la tête et sur des bouts de papier). Ce formulaire ne fera pas que ça, il...
Je ne suis pas sur de bien comprendre : Cells(FAlSt, 5) est un nombre qui provient de la base, quant à Cells(FAlSt, 9) il correspond au résultat de la formule que j'ai mis dans le code, c'est un nombre aussi.
Bonjour Paf,
Merci de ta réponse, j'avais effectivement oublié Font.
Mais l'erreur se produit sur la ligne : If Sheets("Alerte_Stock").Cells(FAlSt, 9) >= Sheets("Alerte_Stock").Cells(FAlSt, 5) Then (Erreur d'exécution '13': Incompatibilité de type). J'aurai du le préciser dans mon premier...
Bonjour à tous,
Je poursuis la création de mon petit programme et je coince sur un problème :
Dans une de mes feuilles, je crée l'ensemble de la ligne et je souhaite que la dernière cellule de la ligne ait une mise forme particulière (gras, italique et rouge) et que cela se fasse à la création...
Re Mapomme,
Waouuuu, nom de Zeus, ça a l'air de fonctionner parfaitement, et tout ça en si peu de temps! c'est vraiment trop fort, en plus il y a toutes les explications pour pouvoir comprendre aisément, c'est excellent, merci beaucoup Mapomme.
Je ferai de nombreux tests demain.
Je ne...
Bonjour Mapomme,
Je me suis mal expliqué, j'ai omis une information importante (à laquelle vous venez de me faire penser) : je ne souhaite que traiter les sorties, c'est pour cela qu'il n'y a pas de valeur et de service lors des entrées.
Bonjour à tous,
Je suis à la recherche d'une solution à mon petit problème.
J'ai créé un petit formulaire sur lequel il y a une combobox, 2 textbox destinées à la date de début et à celle de fin, un bouton valider et un annuler. Je souhaiterais qu'à la validation, il soit extrait vers la...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.