Résultats de la recherche

  1. JYLL

    création et tri d'onglets avec des noms numéric

    Re : création et tri d'onglets avec des noms numéric Bonsoir Papapaul et le Forum, Salut Spitnolan, PierreJean;) :p Ton problème vient tout simplement que ta feuille nommée"" tu dois la nommer "05" et la tu verras tout se passera normalement. Excel prenant le code ASCII des caractères pour...
  2. JYLL

    Plusieurs Entêtes différentes

    Re : Plusieurs Entêtes différentes Bonjour Viscere, JeanPierre ;) et le Forum, Voici une petite Macro qui devrait répondre à ta demande avec les modifications mises en commentaires. Sub Impression_Entetes_Multiples() ActiveSheet.PageSetup.PrintArea = "" With ActiveSheet.PageSetup...
  3. JYLL

    Repérer un bug

    Re : Repérer un bug Bonjour Typiquement et le Forum, Une solution consiste à venir écrire dans ta feuille les noms des cellules impliquées dans le calcul ou passer en mode débugage dans VB. bon test.
  4. JYLL

    Incrire via userform

    Re : Incrire via userform Bonsoir ABC et le Forum, Voici ta Macro modifiée, elle devrait répondre à ta demande. Private Sub valide_Click() Sheets("Feuil1").Activate Range("B20") = entree.nom.Value Range("C20") = entree.prenom.Value Range("B5:C20").Select...
  5. JYLL

    sélection dans listbox choix multiple

    Re : sélection dans listbox choix multiple Bonsoir Blafi et le Forum, Il y a toujours des couches tard sur le Forum, voici ton classeur modifié pour répondre à ta demande. Bon test et bonne nuit si tu repasses.
  6. JYLL

    2 combobox dans un même userform

    Re : 2 combobox dans un même userform Bonsoir Fonso, Robert et le Forum, Je pense avoir trouvé le pourquoi du non fonctionement. Au lieu de : With Tableau , jai mis With Sheets("Dates") et le résultat s'emble probant. Bon test.
  7. JYLL

    2 combobox dans un même userform

    Re : 2 combobox dans un même userform Bonsoir Fonso et le Forum, Voici un petit exemple joint qui j'espère répondra à ton besoin. Bon test.
  8. JYLL

    MFC plus de 3 conditions

    Re : MFC plus de 3 conditions Re JCGL,:) Avant d'être arrêté, j'allais souvent à Grenoble au Laboratoire du Magnétisme du Navire qui est au sein de INSIEG à St Martin d'Hères. Ils ont une chaîne de mesures magnétiques à Herbeys et ils travaillent avec nous. c'est notre service au sein de la...
  9. JYLL

    MFC plus de 3 conditions

    Re : MFC plus de 3 conditions Bonsoir JCGL, Jean-Pierre et le Forum, Pour l'humidité "OK", il fait beau à Grenoble j'ai reçu des photos aujourd'hui d'Altinea du "granier en chartreuse". Par contre dans l'ensemble pour la pollution je préfére la pointe de Bretagne avec le vent pas de fumée.;)...
  10. JYLL

    Code de saisie de plusieurs lignes

    Re : Code de saisie de plusieurs lignes Bonsoir SEV et le Forum, Voici ton classeur modifié pour j'espère répondre à ta demande. Bon test.
  11. JYLL

    Majuscule dans une cellule sans VBA

    Re : Majuscule dans une cellule sans VBA Bonsoir le fil et le Forum, Coucou JCGL, Jean-Pierre, Gorfael;) Voici une des merveilles de Didier (MDF) qui une fois installée permet avec le clic droit de faire ce que l'on veut. MAJUSCULE,minuscule,Nom Prpre, Barré, Souligné etc... Bon test et...
  12. JYLL

    Macro suppression de cellules non protégées

    Re : Macro suppression de cellules non protégées Bonjour Serge et le Forum, Voici ton classeur avec la macro plus un bouton pour effacement. Bon test.
  13. JYLL

    Problème avec LISTVIEW

    Re : Problème avec LISTVIEW Bonjour Zozotitou, MichelXLD et le Forum, Comme le dit Michel, pas facile de savoir ce qu'il te faut exactement. Voici une autre solution au cas où les lignes ajoutées sont en rouge, toujours définir "Pointeur" en Global dans un module pour qu'il soit vu de toutes...
  14. JYLL

    Base De Donnees Excel - Requete Sous Word

    Re : Base De Donnees Excel - Requete Sous Word Bonjour Florianelle et le Forum, Il me manque quelques éléments pour pour faire ton publipostage comme le nom de ta sociéte, l'adresse, son numéro de téléphone qui sont des paramètres fixes. Autrement les types de texte qui sera ajouté au fax...
  15. JYLL

    optimisation de macro existante

    Re : optimisation de macro existante Re Bonsoir Romain, MJ13, Catrice et le Forum, Bravo catrice ton algo est plus rapide que le mien (Y a pas photo) et de plus il m'a permis de vérifier que j'avais une erreur dans mon code. j'avais oublié que le tableau commencait à l'indice 0 et du coup mes...
  16. JYLL

    optimisation de macro existante

    Re : optimisation de macro existante Re bonsoir Romain, Le problème vient de cette ligne, en voulant effacer le petit bonhomme vert que met l'interpréteur du Forum, j'ai tout simplement oublié de remettre la lettre voir exemple ci dessous. Enlever l'espace devant le D; Range("C1:D" &...
  17. JYLL

    optimisation de macro existante

    Re : optimisation de macro existante Bonsoir RoaminChu, MJ13 et le Forum, Voici la macro rémaniée. Elle copie les données dans un tableau et met le résultat dans un autre qui à la fin est copié dans la feuille. jste la fonction couleur de l'écriure ne fonctionne pas. Testé avec un Athlon 64...
  18. JYLL

    Macro pour calcul de pourcenatge par colonne

    Re : Macro pour calcul de pourcenatge par colonne Re Bonjour Flash et le Forum, Salut Jean-Pierre, Pierre Jean,Porcinet:) ;) La Macro précédente adaptée à ton besoin : Sub Calcul_Pourcentage() Dim Tablo(100), Nb_Val As Integer, Ligne As Integer, I As Integer, J As Integer Nb_Val =...
  19. JYLL

    Macro pour calcul de pourcenatge par colonne

    Re : Macro pour calcul de pourcenatge par colonne Re Bonjour Flash et le Forum, La question est-elle celle ci ?: Tu fais la somme d'une colonne et tu veux savoir le pourcentage de chaque ligne de la colonne ? J'ai fais la somme de chaque ligne et j'ai calculé le pourcentage de chaque...
  20. JYLL

    Macro pour calcul de pourcenatge par colonne

    Re : Macro pour calcul de pourcenatge par colonne Bonjour Flash et le Forum, Voici une macro qui devrait répondre à ton besoin : Sub pourcentage() For I = 1 To Range("A65536").End(xlUp).Row somme = 0 For J = 1 To 4 somme = somme + Cells(I, J) Next J For J = 1 To 4...