Contenu récent par laurentdu24

  1. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    Oui, ce n'est pas change_value... ;) Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("e12:e15")) Is Nothing Then fonction1 end if If Not Intersect(Target, Range("e27:e32")) Is Nothing Then fonction2 End If end sub
  2. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    je l'ai sur 2021, les anciens, je n'ai pas de certitude. Je regarderai sur les plus anciens, car si mes utilisateurs n'ont pas accès aux fonctionnalités... ça craint Mais je dirais qu'il n'y a pas de raisons c juste : activer certaines fonctions sur changement de cellules... pas très complexe et...
  3. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    bah, désolé sous 2016... ;)
  4. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    elle existe bien, sur excel 365 / 2021 etc. Mon problème est que je personnalisais le nom de la fonction en ajoutant le nom de la page Worksheet_Change_value_pageX, et tout était bloqué...
  5. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    quelle est la question ?
  6. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    Bonjour Gégé, non, c'est pour aussi 2019 et les plus anciennes. Je suis sur 2021 (mais qui n'était pas proposée dans les options ;)
  7. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    J'ai copié la fonction sur le forum, mais avec Worksheet_Change_value1, ça ne marchait pas alors que Worksheet_Change_value ça fonctionne
  8. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    Bonjour Sylvanu, C'est impeccable, ça marche. En revanche, je découvre que si je renomme la fonction autrement que sub Worksheet_Change_value, par exemple en sub Worksheet_Change_value_pageXYZ alors, ça ne fonctionne pas. C'est normal ? Merci de cette précision, en tout cas, c'est nickel...
  9. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    Merci Sylvanu, J'ai repris une précédente sauvegarde où la fonction est bien active, mais bizarrement, en dupliquant la formule sur une autre feuille, ça bloque... Je refais des essais et reviens si besoin. Merci de votre aide.
  10. L

    Microsoft 365 VBA avec fonction Target / if not intersect

    Bonjour, J'avais cette fonction qui fonctionnait parfaitement : Private Sub Worksheet_Change_value1(ByVal Target As Range) If Not Intersect(Target, Range("Aj4:aj7")) Is Nothing Then fonction_relance_calculs End If End sub Le but de cette fonction est de relancer des calculs...
  11. L

    adresse de la dernière ligne visible à l'écran

    Bonsoir Pierrot, Et si je scrolle mon écran, quelle serait la technique pour revenir via un bouton à cette ligne enregistrée ? Merci de votre retour, et de vos nombreuses contributions ! Bonne soirée. Laurent
  12. L

    Recupération données d'une page web et mise à jour dans excel

    Re : Recupération données d'une page web et mise à jour dans excel Bonsoir, Merci. C'est nickel. Bonne soirée. Laurent Comment on met en mode résolu ?
  13. L

    Recupération données d'une page web et mise à jour dans excel

    Bonjour, Sur une feuille excel, j'ai besoin de faire un lien vers une page web, et de récupérer les données d'une zone donnée. et que ces données se mettent à jour avec une macro vba refreshall. Merci de me dire comment faire pour insérer ces données dans une ou des cellules sous excel...
  14. L

    message box avec option OK annuler ou OUI / NON ne marche pas comme il faut !

    Re : message box avec option OK annuler ou OUI / NON ne marche pas comme il faut ! J'ai aussi essayé vbokcancel vbyesnocancel. Rien ne change. j'ai l'impression que je paramètre mal la ligne msgbox, mais je ne trouve pas l'erreur. Merci de votre aide.