Contenu récent par Kiphrine

  1. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Je pensais que nbragent était égale à Do While c.Count < 4
  2. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Voici mon code: Sub Nom_FIP_1(w() As String) Dim v As Byte, c As New Collection, x As Integer, y() As Variant, z() As Variant, i As Byte Dim agentdisponible() As Boolean '''''''''''''''''''''''''''' ReDim agentdisponible(nbragent)...
  3. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Toujours besoin d'aide... Pour Roger: pour le plantage de la ligne il ne faut pas en tenir compte, ici c'est pour l'impression et cela fonctionne très bien chez moi. Le problème est dans le module roulement1. 1 agent ne doit apparaître qu'une fois par jour...
  4. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Merci de ta réponse Alyro, mais ceci non plus ne semble pas fonctionner non plus. Je viens de penser à quelque chose: ne serait-il pas possible de changer mon code en utilisant les valeurs booleennes? Dire pour la première activité: "quand agents sélectionnées...
  5. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Le problème est que je ne sais pas si mettre en 1 dans une colonne était possible avec mon code car au lieu de prendre les colonnes une par une il les prend en un seul coup. Donc si quelqu'un aurait une autre solution, j'avoue que je suis preneuse!:)
  6. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Problème: répétition des agents dans les activités par jours. Comment résoudre le problème? Besoin d'aide.
  7. K

    mettre un 1 dans une colonne

    Re : Problème de planning N'hésitez pas à me demander ce que vous ne comprenez pas. En fait je ne sais pas si l'idée de mettre des 1 dans une colonne était bonne donc je redemande si il n'y aurait pas une autre solution. J'ai vraiment besoin d'une solution car c'est un projet qui me permettra...
  8. K

    mettre un 1 dans une colonne

    Re : Problème de planning Voici le fichier. Le code se trouve dans le module roulement. Mon code prend les agents dans la feuille"compétence" qui ne sont pas en rouge et qui possède un 1 puis les met dans la feuille"mois en cours" sauf dans les cellules jaunes. Les même agents restent en...
  9. K

    mettre un 1 dans une colonne

    Problème de planning Bonjour, je fais un planning sous excel mais un problème est survenu lors de sa création: en ligne: les jours en colonne les activités Mon code met plusieurs personnes dans une activité pour un jour. Le problème est qu'il me répète les personnes d'une activité à l'autre...
  10. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Dans la feuille "compétences" le code prend les cellules par activités qui ne sont pas rouge et qui contiennent un 1. Je peux choisir le nombre de personne à affecter dans chaque activité. Ensuite le code place les noms des agents dans le planning, il y en a...
  11. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Dans mon fichier, le code doit prendre les cellules non rouges et possédant un 1 et les mettre dans le planning, sauf que les cellules se répètent d'une activité à l'autre or un agent ne peut faire qu'une seule activité par jour. Alors je voudrais que lorsque...
  12. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Voila le fichier, le code est dans le modile roulement. Je réexplique: Je voudrais que lorque mes cellules spécifiques sont sélectionnées alors un 1 apparaissent dans la colonne K au niveau de la ligne de la cellule sélectionnés Exemple avec une cellule...
  13. K

    pas de doublon!

    Re : pas de doublon! Mon problème est toujours d'actualité...:o
  14. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne Alors voilà, mon code prend des cellules spécifiques ici If Cells(x, 3) = 1 And Cells(x, 3).Interior.ColorIndex <> 3 Then Je voudrais que lorqu'elles sont sélectionnées alors un 1 apparaissent dans la colonne K au niveau de la ligne de la cellule...
  15. K

    mettre un 1 dans une colonne

    Re : mettre un 1 dans une colonne D'accord mais dans mon code les cellules sélectionnées sont ici: If Cells(x, 3) = 1 And Cells(x, 3).Interior.ColorIndex <> 3 il n'y a pas de sélection. Je voulais mettre ceci: Then Cells(x, 11) = 1 mais ça ne marche pas et je ne sais pas si c'est ici...