Résultats de la recherche

  1. T

    VBA - Fct recherche et cellule couleur

    Bonjour, merci à tout les forumistes pour leur aide précieuse :D Je souhaiterai ecrire une ligne de code sur le meme principe que celle ci : Set j = [J:J].Find("*", , , , xlByRows, xlPrevious) [I15] = j Sauf qu'au lieu de chercher simplement la dernière cellule rempli je souhaiterai...
  2. T

    VBA - Taduire une somme en VBA

    Bonjour le forum Comment traduire la Somme de Cette cellule .RANGE("C" & Tot.Row + 7) à cette cellule .RANGE ("C" & Tot.Row + 10) .Range("C" & Tot.Row + 11).Formula = ? ( Somme décrite précédemment Merci
  3. T

    VBA - Code pour passer à la ligne suivante si une est déja prise

    Bonjour, Je continue d'avancer sur mon programme et la je bloque. A partir de ce code Private Sub CommandButton1_Click() Dim ligne As Long Dim Tot As Range With Sheets("EDF").Range("B2:B2000") Set Tot = .Find(UserForm2.ListBox1.Text) Range("A" & Tot.Row + 7) =...
  4. T

    VBA _ Soucis sur fonction recherche et insertion dans tableau

    Bonjour à toutes et à tous. J'ai rentré ce code Private Sub CommandButton1_Click() Dim ligne As Long Dim Tot As Range ligne = .Range("B" & .Rows.Count).End(xlUp).Row Set Tot = .Range("b1:b" & ligne).Find.UserForm.ListBox1.Text .Range("A" & Tot.Row + 7) = TextBox1.Text End...
  5. T

    VBA _ Aide sur parametrage userform et checkBox

    Bonjour, salut à tout le forum et en particulier à ceux qui m'on deja beaucoup aidé. J'ai crée une userform avec 3 checkbox ( représentant 3 autres userform). Je n'arrive pas à trouver la mise en forme conditionnel pour que, selon si ma chekbox est coché ou non cela face apparaitre la...
  6. T

    Solution plus simple sur insertion de lignes.

    Bonjour ! J'utilise ce code pour inserer automatiquement une ligne dans mon tableau. ligne = .Range("B" & .Rows.Count).End(xlUp).Row Set Tot = .Range("b11:b" & ligne).Find("TOTAL") .Range("A" & Tot.Row).Insert Shift:=xlDown 'inserer ligne au dessus .Range("A" & Tot.Row) =...
  7. T

    Code VBA _ Adresse d'une cellule ?

    Bonjour, Merci pour l'aide que vous pourrez peut etre m'apporter. J'ai 4 Feuilles dans mon classeur et je souhaite récupere grace à un code Vba la valeur de la cellule "D & Tot.Row" de ma feuille 1 pour la mettre en D3 de ma Feuille 4. Or je bloc sur la procédure. J'ai commenceé par ce code...
  8. T

    Code vba - correction de donnees d'un tableau

    Bonjour; J'ai rentré un code qui me permet d'inserer des lignes dans un tableau ( entre la ligne de titre et la derniére ligne Total) sans définir à l'avance le nombre de ligne de mon tableau. Ce code est le suivant ligne = .Range("B" & .Rows.Count).End(xlUp).Row Set Tot = .Range("b11:b"...
  9. T

    Synthétiser plusieurs tableaux

    Bonjour, Voila mon problème : j'ai créer plusieurs tableaux identiques au point de vu nombre et nom de colonnes. Ces tableaux regroupe divers renseignements sur plusieurs lignes. Chaque tableau est enregistré dans un fichier séparé ( non sur des feuilles différentes d'un meme fichier car 85...