Résultats de la recherche

  1. gfortin9

    Comment prendre en compte une valeur à l'ouverture du formulaire

    Re : Comment prendre en compte une valeur à l'ouverture du formulaire Bonsoir, Dans : Table1 sous-formulaire Public Sub Ouvre(nom As String) DoCmd.OpenForm "Formulaire2", , , "[nom]=" & nom Forms!Formulaire2!nom2.Value = Me!nom.Value If Forms!Formulaire2!nom2.Value = "a" Then...
  2. gfortin9

    offset

    Re : offset Allô! De quelle façon appelles-tu l'exécution de la fonction "ActiveCell.Offset(0, 2).Select" ??? G
  3. gfortin9

    erreur d'execution 53

    Re : erreur d'execution 53 Bonjour! Sur ma machine, ça fonctionne sans erreur. J'ai aussi excel 2010. Depuis l'apparition de l'erreur, as-tu redémarré ta machine ?? G
  4. gfortin9

    Combinaison de 2 textbox dans userform

    Re : Combinaison de 2 textbox dans userform Allô! Pas sûr de bien comprendre : ActiveCell.Value = AJouter_Nouvelle_Mission_!TextBox26 & " " & AJouter_Nouvelle_Mission_!TextBox27 Si AJouter_Nouvelle_Mission_!TextBox26 = Bonjour et AJouter_Nouvelle_Mission_!TextBox27 = Ripou...
  5. gfortin9

    [Résolu] LISTE DEROULANTE et UserForm

    Re : LISTE DEROULANTE et UserForm Allô! Désolé du dérangement. Une erreur de momenclature dans mon exemple. Dans mon fichier original, il faut que le code soit dans un module, il ne peut être dans le UserForm; ainsi, ça fonctionne. G
  6. gfortin9

    [Résolu] LISTE DEROULANTE et UserForm

    Re : LISTE DEROULANTE et UserForm Allô! Désolé, j'avais oublié le fichier de travail. Merci de votre aide G
  7. gfortin9

    [Résolu] LISTE DEROULANTE et UserForm

    Allô! Dans cette discussion : ICI ... le menu écrit dans une cellule et ça fonctionne à merveille. J'aimerais utiliser la même technique, mais en écrivant dans un TextBox d'un Userform. Je n'y arrive pas ... Peut-être n'est-ce pas adapté 8- // Merci de votre aide et bons conseils G
  8. gfortin9

    hELP LISTE DEROULANTE

    Re : hELP LISTE DEROULANTE Allô! Tu m'as fait réaliser qu'on peut avoir des noms utilisables sans qu'ils soient nécessairement attachés à une plage de cellules. Je faisais F5 pour avoir la liste des noms ... elle était vide. C'est pour cela que j'ai utilisé une autre méthode. Suite à...
  9. gfortin9

    hELP LISTE DEROULANTE

    Re : hELP LISTE DEROULANTE Allô! Ma cellule n'avait pas tout compris. Merci pour m'avoir aider à comprendre 8- )) G
  10. gfortin9

    hELP LISTE DEROULANTE

    Re : hELP LISTE DEROULANTE Allô! J'aime bien la façon que tu as composé ces listes déroulantes. C'est dépanné pour les trois colonnes. Examine cela, si ça te convient. G
  11. gfortin9

    erreur sur macro

    Re : erreur sur macro Allô! Je fais plusieurs tests et ce n'est pas stable. Parfois ça fonctionne, parfois pas. C'est déroutant. gf
  12. gfortin9

    erreur sur macro

    Re : erreur sur macro Allô! J'ai désactivé les 3 'ThisWorkbook.Sheets("RECAP").Protect dans : Sub import(mois, annee, activite) Sub Dessine_Rectangle(maCell, ordreTri) Sub triage(Target As Range, ordreTri) Maintenant ça fonctionne. Il y aurait peut-être à repenser ce bout de...
  13. gfortin9

    erreur sur macro

    Re : erreur sur macro Allô! La ligne qui bloque chez-moi : Sheets("RECAP").Range("A8:G" & Sheets("RECAP").Range("G65535").End(xlUp).Row).Borders.LineStyle = xlNone Sur la plage Sheets("RECAP").Range("A8:G14), on ne peut pas utiliser le bouton de droite de la souris > Format des cellules...
  14. gfortin9

    Modification de plusieurs dates

    Re : Modification de plusieurs dates Allô! Un os à ronger pour une avoir une meilleure solution 8- )))) gf
  15. gfortin9

    Au secours David :(

    Re : Au secours David :( sous Win7 64 bits et IE9 : ça fonctionne bien ici aussi. Mais il n'y aurait pas de difficulté s'il n'en avait pas 8- )))) gf
  16. gfortin9

    Macro / protect un protect feuilles

    Re : Macro / protect un protect feuilles Allô! Le code de Gorfael fonctionne bien si on réduit les points, une erreur de frappe probablement. Private Sub ProteccionClasseur_Click() If Sheets("Calculos").ProtectContents Then Sheets("Calculos").Unprotect Else...
  17. gfortin9

    Positionner à la date du jour

    Re : Positionner à la date du jour Allô! Non, il n'y a pas de piège. Mais si tu changeais la date de la cellule B1 (genre 01/12/2012, pour l'année prochaine), sur laquelle sont basées les dates de la plage J3:AY3, tu devrais aussi modifier la macro. Avec la variante du post #5, en...
  18. gfortin9

    Positionner à la date du jour

    Re : Positionner à la date du jour Allô! Une variante qui rend dynamique le changement de date dans la cellule B1 de la feuille "planning" Private Sub Workbook_Open() Dim LaDate As String LaDate = Sheets("planning").[B1] Sheets("planning").[G1] = (Date - DateSerial(Year(LaDate)...
  19. gfortin9

    Positionner à la date du jour

    Re : Positionner à la date du jour Allô! Comme ceci peut-être : Private Sub Workbook_Open() Sheets("planning").[G1] = (Date - DateSerial(2011, 12, 1)) -20 End Sub 20 étant le moitié des jours affichés gf
  20. gfortin9

    Modification non voulue de la taille de champ nommé lors d'insertion de lignes

    Re : Modification non voulue de la taille de champ nommé lors d'insertion de lignes Allô! L'explication Microsoft de la fonction Décaler : DECALER - Excel - Office.com gf