Résultats de la recherche

Re : combobox multiples Salut tu peux essayer ça : Dim c As Integer c = ComboBox1.ListIndex + 2 ComboBox2 = Feuil1.Range("A" & c).Value code à mettre dans l'evenement CHANGE du combo concerné @+ GREG

Re : probleme renomer une feuille Merci beaucoup à vous deux Ca marche super @+ GREG

Bonjour à tous, J'ai un petit souci, avec un bouton je crée une nouvelle feuille que je veux renomer avec le date du jour mais excel ne prend pas les "/". Voici le code : Sheets.Add ActiveSheet.Name = "Inventaire du " & Date Comment changer le format de la date ? Merci...

Re : Comment trier les données sur une colonne ? (vba excel) SALUT Tu peux faire un filtre sur la colonne ( tri croissant ) @+ GREG

Re : Enregister une feuille en PDF Salut, Je pense que ce code va pouvoir t'aider : Dim JobPDF As Object Dim sNomPDF As String Dim sCheminPDF As String If IsEmpty(Feuil1.UsedRange) Then Exit Sub sNomPDF = Feuil1.Range("F2") sCheminPDF = "C:\ton chemin\"...

Re : construction construction d'un bouton Salut, Je n'ai pas bien compris ce que tu as besoin mais je pense que tu veux travailler sur une ListBox. Envoi un fichier ce sera plus clair @+ GREG

Re : [excell-vba] gestion des modules Salut, Il faut que tu mette le nom de la procédure et non le nom du module Exemple : Private Sub Workbook_Open() Call procedure End Sub GREG

Re : Problème de date entre saisie dans le userform et renvoi dans la feuille re regarde ce fichier et dis moi si c'est ca que tu recherche. voir userform1 @+

Re : exclure un controle de Tabindex Salut Par exemple : TextBox1.TabStop = False Dis moi si c'est ca que tu recherche @+ GREG

Re : Problème de date entre saisie dans le userform et renvoi dans la feuille Salut Laisse le format de celule sur STANDARD ca marche aussi. Tiens moi au courant GREG

Re : Fonction (ou macro) recherche Salut, Tu peux essayer ça Cells.Select Selection.Find(What:=Textbox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False, SearchFormat:=False).Activate...

Re : Sélectionner des options et les regrouper dans une plage de cellules séparés Salut, Ci joint ton fichier modifié. Regarde si c'est ça que tu recherche. voir dans vbe j'ai créer un userform @+ GREG

Re : Problème de recherche Bonjour pierre jean Merci beaucoup ça marche nickel @+ GREG

Bonjour le forum, J'ai une procédure qui me permet, en tapant les premières lettres d'un nom me trouve tous les noms correspondant et les charges dans une listbox. Le problème c'est que dans la listbox je me retrouve avec 3 fois le même nom alors qu'il n'y à pas de doublon dans ma colonne...

Bonjour à tous, J'ai une petite question, est ce possible de téléphoner sur un téléphone fixe à partir d'un code vba ?, en utilisant CDO ou autre chose ? Merci d'avance GREG

Re : Pdf par mail Bonjour à tous, Merci beaucoup pour vos lien, j'ai trouvé un code qui m'a l'ai très bien mais j'ai un problème avec le .Send Si quelqu'un à une idée Merci @+ Sub Envoi_CDO1() Dim CdoMessage As CDO.Message Dim Fichier As Variant ChDir "C:\Documents...

Bonjour à tous, Voila j'utilise un code qui permet d'enregistrer en PDF des commandes. Je voudrais aussi les envoyer par mail automatiquement sans passer par outlook ni quoi que ce soit. Quelqu'un aurait il une idée ? Dim JobPDF As Object Dim sNomPDF As String Dim sCheminPDF As...

Re : recherche avec 2 conditions Re Essai comme ça si ça te convient : Private Sub CmdButValider_Click() Dim doublon As Variant With Feuil1 For Each doublon In .Range("B2:B" & .Range("A65536").End(xlUp).Row) If doublon = TextBox2.Text And doublon.Offset(0, -1) = TextBox1.Text Then...

Re : recherche avec 2 conditions Salut, Tu peux essayer comme ça : Dim doublon As Variant With Feuil1 For Each doublon In .Range("B2:B" & .Range("A65536").End(xlUp).Row) If doublon.Text = TextBox2.Text Then MsgBox "Article déja saisie", vbCritical, "INFORMATION" TextBox2.Text = ""...

Re : Commande de fournitures Salut, ci joint ton fichier modifier @+ GREG