Contenu récent par tom59

  1. T

    Satanés OptionButton

    Re : Satanés OptionButton Tout simplement génial HASCO ! merci beaucoup de m'avoir débloqué !
  2. T

    Satanés OptionButton

    Re : Satanés OptionButton oui ça marche et si j'ai bien compris quand DERS1_1 est sur false, il vaut 0 et quand il est sur true il vaut -1. Du coup en multipliant par son indice on obtient le résultat. C'est ça ? Le problème c'est qu'il faut faire cela pour les 50 questions...
  3. T

    Satanés OptionButton

    Re : Satanés OptionButton Je précise mon problème : J'ai plusieurs Questions 1, 2 ,3 ...50 Pour chaque question il y a 5 optionbutton. Pour la question 1 j'ai appelé mes optionbutton DERS1_1, DERS1_2, DERS1_3, DERS1_4, DERS1_5 pour la question 2 : DERS2_1, DERS2_2, DERS2_3, DERS2_4...
  4. T

    Satanés OptionButton

    Re : Satanés OptionButton Merci kjin, je regarde cela au plus vite. Hasco, je ne comprends pas ce que fais ce code. De plus, je n'ai pas défini de variable DERS1 mais j'ai appelé mes optionbutton DERS1_1, DERS1_2...DERS2_1,... du coup quand je lance ton code il me dit que DERS1 n'est pas...
  5. T

    Satanés OptionButton

    Bonjour ! J'ai créé un userform dans lequel se trouve de nombreuses questions auxquelles il faut répondre en sélectionnant 1 parmi 5 réponses (d'ou l'utilisation d'optionbutton). Cela fait plusieurs heures que je cherche : 1/ à vérifier que pour 1 question, au moins 1 optionbutton a été...
  6. T

    attributs de formulaire

    Re : attributs de formulaire J'y suis finalement arrivé avec le code suivant : Dim Ctrl As Control For Each Ctrl In Me.Controls If TypeOf Ctrl Is MSForms.TextBox Then If Ctrl.Object.Value < 1 Or Ctrl.Object.Value > 5 Then MsgBox "Erreur de saisie pour" & " " &...
  7. T

    attributs de formulaire

    Re : attributs de formulaire Un petit coup de main s'il vous plait...
  8. T

    attributs de formulaire

    Re : attributs de formulaire J'ai mis 'Option Explicit' avec le private sub(), ça passe mais j'ai toujours l'erreur avec With... :confused:
  9. T

    attributs de formulaire

    Re : attributs de formulaire Bonsoir carcharodon-carcharias et merci de me répondre, ça bloque avec 'option explicit'. L'erreur est : "instruction incorrecte dans une procédure" Ce code s'exécute suite à l'appui sur un bouton, est ce que ça vient de là ? Faut-il le mettre à un endroit...
  10. T

    attributs de formulaire

    Bonjour/bonsoir Je cherche à faire une boucle sur des "attributs" de variables d'un formulaire (désolé si le terme n'est pas exact mais je ne suis pas développeur). Je souhaiterai transformer cette longue liste de if : Dim i As Integer Dim b As String If BVAQ1.Value = "" Then MsgBox...
  11. T

    erreur avec une macro

    Re : erreur avec une macro Oui je viens de trouver, le code correct est celui ci : Sub accord() Dim b As Integer Dim c As Integer Dim d As Integer Dim l As Integer Dim m As Integer Dim j As Integer Dim k As Integer ' modifier l'étendue de l en fonction du nombre de sujets For l...
  12. T

    erreur avec une macro

    Bonjour, J'ai un petit probleme avec cette macro. Je pense que ça doit être tout bête mais je ne vois pas ou est l'erreur. Excel me renvois le message suivant : Erreur de compilation Next sans For et il surligne le Next m Si quelqu'un pouvait m'apporter ses lumiéres j'en serais ravi. Voici...
  13. T

    Code VB qui ne fonctionne pas...

    Re : Code VB qui ne fonctionne pas... :o ca marche ! Je n'ai jamais eu de cours sur VB ou excel et je ne connaissai pas Double. Un grand Merci pour ton aide :) :) :)
  14. T

    Code VB qui ne fonctionne pas...

    Bonjour @ all Cela fait 2 jours que je cherche à écrire un bout de code sans succés. Pour une raison que j'ignore il ne me donne pas le résultat attendu... Je vous fait un petit résumé: j'ai 1 classeur avec 2 feuilles (red et valence). Je voudrais que le code scanne chaque cellule d'une...
  15. T

    Datediff mais résultat différent VBA ou excel

    Je n'ai pas testé ta solutions Jacques87 car le bout de code cité juste au-dessus me convient parfaitement. merci pour le soutient de tous les forumeurs @+