Résultats de la recherche

  1. L

    Report de valeur dans Combobox.

    Bonjour, J'ai besoin de votre aide pour régler mon problème : Vous trouverez le fichier Excel en pièce jointe ... Lorsque j'appuie sur le bouton Objet 1, un USF apparaît avec à l'intérieur 2 combobox (1 pour le mois, 1 pour la saison). Je voudrais que lorsque j'appuie sur le bouton...
  2. L

    Lien hypertexte en VBA

    Bonjour le forum ! J'ai crée une USF qui apparaît quand je clique sur le bouton " Creer nouvel athlête" en page "Fiche athlête". Ce que j'aimerais c'est qu'une feuille identique à la feuille "1" se crée automatiquement lorsque je crée un nouvel athlète en appuyant sur le bouton valider de...
  3. L

    Combobox dans USF

    Bonsoir le forom, Tout d'abord vous trouverez mon fichier en pièce jointe. Je voudrais de l'aide sur une combobox qui se trouve dans un USF. J'ai crée une zone de liste déroulante sur ma feuille "1". J'y choisis mon exercice puis je clique sur le bouton bleu "Calcul des % de la RM" pour...
  4. L

    Sélectionner la dernière cellule remplie d'une colonne

    Bonsoir, Je souhaiterais connaitre le code pour sélectionner la dernière cellule remplie d'une colonne. J'ai essayé : Sub test() Dim dl1 dl1 = Cells(20, 7).End(xlUp).Select TextBox1.Value = ActiveSheet.Cells(dl1, 7).Value End sub Mais ça ne marche pas !!! Merci de m'aider...
  5. L

    Userform.Hide

    Vous pouvez fermer cette discussion car j'ai copié le message dans une autre. Merci !!
  6. L

    conserver les valeurs de textbox après fermeture d'un USF

    Bonsoir le forum, Tout d'abord désolé pour le long titre du post :D:D:D Dans mon userform, j'ai plusieurs textbox vides. Jusque là rien de sorcier ;) Quand je saisis des valeurs dans ces textbox, puis que je quitte mon userfom et que je le réouvre, les valeurs disparaissent. Rien de...
  7. L

    Boucle If

    Bonjour le forum ! Je crois que je commence à saturer car je n'arrive même plus à faire un boucle If :eek::eek: Voici le code : Sub lance_valeur_cible() Dim Avant As String Dim Trois_Quart As String Dim Meneur As String Dim poste As String poste =...
  8. L

    Trouver la valeur max de plusieurs textbox

    Bonjour le Forum, J'ai crée un multipage avec 3 textbox. Lorsque je clique sur le bouton valider, je voudrais que le code correspondant à ce bouton me trouve la textbox qui a le plus grand nombre et qu'il m'affîche cette valeur dans la première cellule vide de mon tableau. J'ai essayé avec...
  9. L

    Insérer une image dans un Multipages

    bonsoir le forum, Je cherche à insérer une image en .Jpeg dans un multipage qui se trouve dans un USF. J'ai essayé de coller l'image à l'intérieur mais ce choix est impossible, j'ai également utilisé la fonction image de la boite à outils de Vba mais une fois que j'ai tracé ma zone dans le...
  10. L

    Commande Imprimer

    Bonjour, J'ai crée un bouton de commande qui, lorsque je clique dessus, doit m'ouvrir une message box qui me demande si je veux imprimer la feuille "1" de mon fichier excel. Si je répond non, rien de doit se passer. J'ai tapé ce code : Sub imprime() If MsgBox("Voulez vous vraiment...
  11. L

    Coloration de Cellule sous condition

    Bonjour, J'aimerais colorer ma cellule H21, en fonction de 2 conditions. Mon code me colore uniquement les caractères inscris en H21 et pas le fond de la cellule... Sub XXXX Dim Val2 If val2 < Cells(21, 8) Then Range("H21").Font.Color = RGB(255, 0, 0) Else...
  12. L

    Racine carré dans formule mathématique

    Bonjour, Je dois intégrer dans un code, la formule suivante : Puissance = poids * 2,2136 * racine carré de la hauteur en mètres * gravité Voici ma proposition qui ne marche pas. val2 = (Donnees.TextBox64.Value) * 2.2136 * Sqr(val) * 9.81 Je pense que ça buge au niveau du Sqr car mon...
  13. L

    Moyenne de textbox...

    Bonsoir, J'ai un petit problème avec mon code présent dans un USF : J'ai 3 textboxs : textbox 1, textbox2, textbox3 dans lequelles j'inscris des valeurs avec décimales. J'ai un bouton de commande : CommandButton32_Click() qui, l'orsque je clique dessus, doit me calculer la moyenne des 3...
  14. L

    Moyenne de textbox...

    Bonjour, J'aurais besoin d'un petit coup de main pour calculer une moyenne de 8 textbox qui se trouvent dans un multipage... Voici mon code qui marche pas :rolleyes: Private Sub CommandButton1_Click() Masse_grasse.TextBox9.Value = Average(Masse_grasse.TextBox1, Masse_grasse.TextBox2...
  15. L

    USF et incrémentation

    Bonjour, Me voici de nouveau bloqué avec mes USF. J'ai vraiment du mal avec les incrémentations :confused: Je voudrais qu'à chaque fois que j'ouvre mon USF , il y ait un saut de ligne dans mon ficher excel de façon à ce que à la première ouverture la valeur affichée dans la textbox6...
  16. L

    incrémentation avec 1 USF

    Bonjour, J'ai crée un USF avec à l'intérieur 5 intitulés, 5 textbox et 1 bouton de commande "Quitter". Les valeurs que je rentre dans mes textbox s'affichent ensuite dans une feuille Excel en A1, B1, C1, D1 et E1. Si je relance mon USF, et que je rentre des valeurs, ces dernières se...
  17. L

    Formule mathématique dans des textbox

    Bonsoir, J'ai crée un USF très simple et j'aimerais avoir un code qui calcule une valeur (RM estimée en Kg : textbox4) à partir d'une formule mathématique : (Charge utilisée/(1,0278-0,0278*(Nb de répétitions))). Charge utilisée = Text box 2 Nb de répétitions = Text box 3 Le but serait...
  18. L

    ToolBox

    Bonsoir, J'ai beau chercher (mal sans doute ;)) mais je ne trouve pas de post traitant du sujet suivnant. Je voudrais savoir s'il est possible de créer une sorte de tool box avec VBA dans laquelle on renseignerait diverses informations (Nom, Prénom ...) L'exemple en photo ci-dessous...
  19. L

    Opération mathématique dans code VBA

    Bonsoir, J'aimerais calculer l'indice de masse corporelle (IMC = Poids / Taille²) à l'aide d'un code VBA. J'ai tenté le code suivant mais ça ne marche pas : Sub Perf() Dim Taille As Integer Taille = InputBox("Quelle est votre taille en cm", "Biométrie")...
  20. L

    Comptage de Oui dans MsgBox

    Bonjour, J'ai crée un petit code VBA qui lorsque je clique sur un bouton de contrôle, m'affiche une question dans une une msgbox vbYesNo. Quand je répond à cette 1ère question, une nouvelle msgbox apparaît avec une nouvelle question .... En fait je voudrais que le nombre de oui s'affiche...