Contenu récent par liloucmoi

  1. L

    Incompatibilité de type et argument vba

    Re : Incompatibilité de type et argument vba Super, ça marche. Merci Pierrot, Smotty.
  2. L

    Incompatibilité de type et argument vba

    Bonjour à tous, J'ai besoin d'une fonction me disant si une chaîne est comprise dans un tableau de chaînes. N'ayant pas trouvé dans l'aide vba une telle fonction, je cherche à la faire moi même. j'ai donc : Function IsIn(txt As String, ByRef TabTxt() As String) As Boolean ' Determine...
  3. L

    Copie sans autofill

    Re : Copie sans autofill Laissez tomber, je suis un boulet et je suis désolé pour le dérangement. J'avais laissé la ligne range.autofill derrière ma copie... :(:( Merci quand même, parler aide à solutionner à priori :p
  4. L

    Copie sans autofill

    Bonjour le forum, J'ai une cellule A1 contenant un texte. A2, A3 et A4 sont vide A5 contient un autre texte. Ainsi de suite. Je veux copier A1 dans A2, A3 et A4. (La j'ai pas de soucis à faire le job.) Mon soucis vient quand je copie un texte du genre : "4 pommes" qui se...
  5. L

    Impossible de créer un graphe à partir de sources variables

    Re : Impossible de créer un graphe à partir de sources variables re, Sans le code complet (surtout les déclarations) que tu as fait, je ne vois pas trop ou ca peut planter. A te lire.
  6. L

    Reporter le résultat d'un filtre sur une liste déroulante

    Re : Reporter le résultat d'un filtre sur une liste déroulante Hello :D Décidement tu l'aimes bien ce post ;) Donc pour pouvoir adapter la feuille des lignes aux montages il faut : remplacer la formule en G4 de ...
  7. L

    Impossible de créer un graphe à partir de sources variables

    Re : Impossible de créer un graphe à partir de sources variables re, Je pense que j'aurais fais cela comme ceci : Dim Jur, Impl, CpteDoss as Range Jur = Sheets(CA).Range(DebJur & ":" & FinJur) Impl = Sheets(CA).Range(DebImp & ":" & FinImp) CpteDoss =...
  8. L

    Impossible de créer un graphe à partir de sources variables

    Re : Impossible de créer un graphe à partir de sources variables Bonjour, Petit extrait de l'aide sur la propriété range : Propriété Range telle qu'elle s'applique aux objets Application, Range et Worksheet. Cette propriété renvoie un objet Range qui représente une cellule ou une plage...
  9. L

    MFC sur longeur liste déroulante

    Re : MFC sur longeur liste déroulante Hello tous, Hajorinette, tu peux regarder dans l'exemple ci-joint un principe de macro pour utiliser les 30 listes nommées sans se fatiguer. Si tu as des questions à ce propos, n'hésites pas. Cette macro quand tu la lancera mettra la condition que...
  10. L

    ralentissement sur le temps d'exécution d'une macro

    Re : ralentissement sur le temps d'exécution d'une macro Re, La seule idée qui me reste c'est d'enlever cela au début : Application.Calculation = xlCalculationManual et l'autre à la fin. Tu laisses tout le temps en automatique. si ca se trouve, c'est le fait de passer en automatique...
  11. L

    ralentissement sur le temps d'exécution d'une macro

    Re : ralentissement sur le temps d'exécution d'une macro Hello Gihesse, Hasco , tototiti , tous, Sheets(NomFeuilleSource).Select Workbooks(NomClasseurSource).Sheets(NomFeuilleSour ce).Cells(NumeroLigneEnTete, NumeroColonneAFiltrer).Select Selection.AutoFilter Selection.AutoFilter...
  12. L

    Gestion des objets (shapes)

    Re : Gestion des objets (shapes) Bonjour joums, HIJACK, Il me semble que ce code va stocker dans un premier tableau le nom de chaque image de la feuille, puis dans deux autres tableaux les positions top et left de chaque image de la feuille. Si tu as un nombre d'images inconnu dans ta...
  13. L

    Recherchev particulière (gauche droite)!

    Re : Recherchev particulière (gauche droite)! Hello Shmider, A la base je voulais écrire Mettre cette formule ou un truc dans le genre. Une formule matricielle, c'est pas compliqué, après avoir finit de la taper (tu n'as pas appuyé encore sur ENTREE), tu appuies sur CTRL + MAJ (juste au...
  14. L

    Recherchev particulière (gauche droite)!

    Re : Recherchev particulière (gauche droite)! Hello Shmider, Un petit essai : Rendre cette formule matricielle en C14 (valider par CTRL + ALT + ENTREE) =INDEX(schema!$D$2:$D$6;EQUIV(A14;(SUBSTITUE(schema!$A$2:$A$6;"xx";0)+schema!$E$2:$E$6);0)) Xldment.
  15. L

    pb:tracer d'un graphique à la demande

    Re : pb:tracer d'un graphique à la demande Re, J'ai une idée en effet :D For i = 1 To Nbre_de_feuille j = i - 1 Worksheets.Add Mn = Mn + 5 Sheets(i - j).Select Sheets(i - j).Activate Sheets(i - j).Name = "Mns_" & Mn 'c'est à ce niveau qui renomme la feuille 2...