Contenu récent par Djorge84

  1. D

    Fonction avec boucles FOR pour test sur couleur de cellules

    Re : Fonction avec boucles FOR pour test sur couleur de cellules Personne pour me donner un p'tit coup de main? :( Un petit up au cas où...
  2. D

    Créer un bouton pour envoyer un mail sous word

    Re : Créer un bouton pour envoyer un mail sous word Bonjour brice59, sous Excel je sais que la fonction suivante permet il me semble de faire ce que vous voulez : 'Envoi du classeur actif par mail, à plusieurs destinataires. ActiveWorkbook.SendMail Recipients:=Array("mimi@provider.com"...
  3. D

    Fonction avec boucles FOR pour test sur couleur de cellules

    Bonjour, je cherche à réaliser une fonction personnalisée qui, par l'intermédaire d'un test sur la couleur de plusieurs cellules (rouge, IndexColor = 3), renverrait l'intitulé des colonnes correspondantes sous forme concaténée. Le gros problème auquel je me heurte depuis quelques jours...
  4. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Merci J'imagine que CEstToutVide est une autre procédure... (qui permet quoi?)
  5. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Bonjour, votre procédure n'a pas fonctionné à cause du IsEmpty qui ne permet pas de détecter les cellules dont le contenu est vide à cause d'une formule Excel. Le IsEmpty les voit non vide... J'ai donc cherché comment résoudre ce problème et...
  6. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Merci! le code suivant fonctionne donc : :cool: Sub sExempleTest2() Dim i As Integer Dim k As Integer i = 0 For k = 0 To 10 If Sheets("Fiche Panier").Cells(10 + k, 6) = vbNullString Then i = (10 + k) - 1...
  7. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Bonjour, pour précision ce code donne bien ce que je veux : :) Sub sExempleTest1() Dim i, j, k, l, m, n As Integer Dim Ind_L As Integer If Sheets("Feuille1").Range("F10") = vbNullString Then i = 0 Else: i =...
  8. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Merci de ces précisions! :) Pour info à force de chercher, je viens de trouver ça qui détecte bien le fait que ma cellule "F10" n'affiche rien alors qu'elle comporte bien une formule conditionnelle du type If(test OK, blabla, ""). Il s'agit...
  9. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Bonjour et merci pour votre proposition. Faut-il prendre en compte les lignes de commentaires? Parce que j'avoue que j'ai du mal à saisir l'intégralité de ce que fait ce bout de code.
  10. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA merci à vous 4 pour avoir pris de votre temps pour m'apporter des éléments de réponse. Je précise à l'attention de CHALET53 que je veux faire ça en VB... Sinon pour les autres, j'essaie de comprendre ce que vous m'avez proposé, et c'est...
  11. D

    Fonction VB personnalisée avec SOMMEPROD

    Re : Fonction VB personnalisée avec SOMMEPROD Merci de votre aide. Je vais regarder tout ça de près! En tout cas c'est sympa de proposer plusieurs solutions, ça me permet d'apprendre... Je comprends mieux du coup votre fonction OuRien! ;-) Une question encore : dans votre code pour...
  12. D

    Trouver la dernière cellule non vide en VBA

    Re : Trouver la dernière cellule non vide en VBA Bonjour 13GIBE59, oui essayé également. Le problème est le même car il ne "voit" pas les cellules sans valeur comme vide du fait de la formule Excel qui leur impose "" sous certaines conditions...
  13. D

    Trouver la dernière cellule non vide en VBA

    Bonjour, mon problème doit être simple à régler je pense, encore que pour ma part je ne vois pas comment... :confused: Je désire trouver la dernière cellule non vide dans une plage donnée ("F10:F20"). Je pensais utiliser pour cela End(xlDown).Row, mais cela ne me donne pas ce que je veux...
  14. D

    Fonction VB personnalisée avec SOMMEPROD

    Re : Fonction VB personnalisée avec SOMMEPROD Re, je suis d'accord avec le fait que de nommer les plages qu'on appelle permet d'aérer les formules. Je le fais d'habitude effectivement. Cependant dans le cas qui m'intéresse vu que l'une des plages utilisées dans le SommeProd varie, je préfère...
  15. D

    Fonction VB personnalisée avec SOMMEPROD

    Re : Fonction VB personnalisée avec SOMMEPROD Re, voilà donc un fichier pour exemple. Sur l'onglet "Bilan", la ligne 15 donne le résultat d'un calcul utilisant la fonction SommeProd sur 3 plages de données (renseignées au niveau de l'onglet "Données"), dont l'une d'elle varie (cf. formule...