Résultats de la recherche

  1. B

    Listview(x).SelectedItem.Index | Boucle Listview

    Bonjour forum¸ Je cherche à créer une boucle pour simplifier mon code J'ai un userform avec Multipage et plusieurs listview. Le but est de compléter le code suivant: Cible = ListView(x).SelectedItem.Index + 2 Est-ce possible de créer une variable pour cette formule ou je doit...
  2. B

    Imprimer feuille avec macro IF

    Re : Imprimer feuille avec macro IF Bonjour Gorfael, Bonjour forum, Comment modifier le code suivant pour que la lettre P soit = au nom qu'il y a dans la cellule. Par exemple: Sub Imprimer() Dim i As Integer Dim x As Long Dim P As Double With Sheets("Menu")...
  3. B

    Imprimer feuille avec macro IF

    Re : Imprimer feuille avec macro IF Bonjour Gorfael, Bonjour fil, J'ai testé le code Par contre, actuellement je recoit un message d'erreur Run-time error `13`Type mismatch avec la portion de code suivante: Then Sheets(Cells(X, "J")).PrintOut Pourtant j'ai vérifié pour que les noms...
  4. B

    Imprimer feuille avec macro IF

    Bonjour Forum, Comment modifier le code suivant pour que la lettre P soit = au nom qu'il y a dans la cellule. Par exemple: Sub Imprimer() Dim i As Integer Dim x As Long Dim P As Double With Sheets("Menu") Application.EnableEvents = False 'désactive l'action des évènements For x...
  5. B

    Perte de formule lors de l'ouverture du userform

    Re : Perte de formule lors de l'ouverture du userform bonjour forum,fil, mutzik, Je joins le nouveau fichier le userform affiche les chiffres de la colonne B ainsi que la colonne D D1= A1+B1 Lorsque j'ouvre le userform et que je change le chiffre du textbox1 qui correspond à B1 il serait...
  6. B

    Perte de formule lors de l'ouverture du userform

    Bon matin, j,ai un petit problème lorsque j'ouvre mon userform les formule Ex: A1+C1 = E1 s'efface j'ai aucune idée pourquoi et j'aimerais corriger la situation merci
  7. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonjour Forum, Skoobi et James007, J'ai essayer de changer certaine choses, ce qui me permet de croire que c'est .FormulaLocal qui cause le problème si vous avez des sources de solutions je suis preneur Bruno
  8. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonjour Skoobi, cette ligne de code Cells(Lig, j).FormulaLocal = "=SI(P1!" & Col(c) & Lig - 48 & "<>"""";P1!" & Col(c) & Lig - 48 & "/DECALER(P1!" & Col(c) & "$1;M1!A$19;0)-1;"""")" me donne un message d'erreur: run-time error 1004 application-defined...
  9. B

    ProgressBar Dans un userform

    Bonsoir, Dans ma macro principale (mon projet) j'ai 5 sous-macros après chaque sous-macros, j'ajoute +1 à la cellule A1 à la fin j'ai un compte de 5 je cherche à créer une progresse bar qui s'afficherais dans mon userform et qui évolurais selon le chiffre dans la cellule A1 Bruno
  10. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonjour à tous, Bonjour James007, Est-ce que c'est possible de créer une macro pour faire cela, ou je devrais abandonner Bruno
  11. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonjour James, C'est justement ce que j'était entrain de préparer :) Bruno
  12. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonsoir, quelqu'un aurait une idée parce que je tourne vraiment en rond Bruno
  13. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonjour à tous, j'ai trouvé la façon d'inclure la variable dans la formule " & Z & " Mais le résultat n'est pas celui que je souhaitais Dans les faits, avec la variable Z je voulais avoir Pour le premier pas: B par la suite D par la suite F, H...
  14. B

    Créer une formule avec Step +11

    Re : Créer une formule avec Step +11 Bonjour Forum, Bonjour James007, J'y suis presque le code suivant est bon, mais c'est la formule qui reste à modifier dans les fais, cette dernière ne prend pas en considération la variable Z. est-ce que vous auriez une solution merci
  15. B

    Créer une formule avec Step +11

    Bonjour j'ai une formule dans la cellule A1 et B1 je désire créer une formule qui va copier cette formule avec un step de 11 colonne donc A1 + 11 ensuite L11 ensuite W11 même chose avec B1 + 11 J'ai testé cela sans succès Sub Macro7() ' ' Macro7 Macro ' For i = 1 To 254...
  16. B

    CLassement macro va chercher maximum

    Re : CLassement macro va chercher maximum Bonjour James007, merci de l'information, par contre je me demande comment faire pour j 1 to 11 si je fais (i , j) cela ne fera pas 1 , 1+11, 12+ 11, .... merci
  17. B

    CLassement macro va chercher maximum

    Re : CLassement macro va chercher maximum Bonjour à tous, Bonjour James, Je viens de comprendre que je m'était trompé de poste pour ma formule + 11 :eek: mais on va continuer ici :o ou est-ce que je dois insérer i ? merci
  18. B

    CLassement macro va chercher maximum

    Re : CLassement macro va chercher maximum Bonjour fil et Jmes007, je ne sais pas si vs etes en mesure de m'aider à terminer cette macos alors voila ce que j'ai fait: Sub Macro7() ' ' Macro7 Macro ' For i = 1 To 3 Range("L50").Select ActiveCell.Offset(0...
  19. B

    CLassement macro va chercher maximum

    Re : CLassement macro va chercher maximum Bonjour James007 je vient de lire dans mon petit livre, que je pouvait enregistrer en mode relatif, je vais essayer Bruno80
  20. B

    CLassement macro va chercher maximum

    Re : CLassement macro va chercher maximum Bonjour James007, je veux copier une formule ! dans la Sheet1 j'ai des données que je veux utiliser dans la sheet2 je veux faire cette formule A50 "=IF(sheet1R[-48]C[1]<>"""",sheet1R[-48]C[-8]/OFFSET(sheet1R1C[-8],+Sheet1!R19C,0)-1,"""")"...