Résultats de la recherche

  1. B

    Insérer photos d'un dossiers dans feuille excel

    Re : Insérer photos d'un dossiers dans feuille excel Merci Michel, Mais je cherche également à les compresser....
  2. B

    Insérer photos d'un dossiers dans feuille excel

    Re : Insérer photos d'un dossiers dans feuille excel Re, J'ai une macro qui fonctionne bien seulement par moment des photos ne sont pas insérés. Sauriez vous pourquoi? Voici la macro: Private Sub ButtonOk_Click() 'ceci si on utilise l'userf présent On Error GoTo Fin For x = 1 To...
  3. B

    Insérer photos d'un dossiers dans feuille excel

    Bonjour, Je souhaiterais insérer plusieurs photos d'un dossier en donnant le nom du dossier à l'aide d'une message box de type parcourir et que l'ensemble de photos s'insère les une sous les autres aux dimensions de la cellule. Voici le début de la macro: Private Sub...
  4. B

    Messagbox avec liste suivant critère de sélection

    Re : Messagbox avec liste suivant critère de sélection Bonjour Messieurs, Et un grand merci à vous en effet j'ai tendance à privilégier les codes ou les variables s'adaptent en fonction du tableau... J'avais du mal à voir comment incrémenter le message et vous m'avez aidé à merveille, un...
  5. B

    Messagbox avec liste suivant critère de sélection

    Bonjour, Comme l'intitulé l'indique je cherche à trouver une macro qui me sortirais l'ensemble des celulles en colonne A dont le chiffre en colonne B est inférieure qu'en colonne C. J'avais imaginé quelque chose de bien trop simple évidement qui ne marche pas...
  6. B

    Recherche d'une date sous condition depuis matrice

    Re : Recherche d'une date sous condition depuis matrice Ah oui très bien non mais c'est parfait j'ai remarqué quelle fonctionnait a merveille. Encore merci Salutations, Billouu
  7. B

    Recherche d'une date sous condition depuis matrice

    Re : Recherche d'une date sous condition depuis matrice Un grand merci romain9 c'est vraiment ce qui me fallait seulement pour la formule max elle ne fonctionne pas au delà de 255 me semble t'il ?? Encore merci sinon!!
  8. B

    Recherche d'une date sous condition depuis matrice

    Bonjour, Après maintes tentatives je ne trouve pas la formule à adopter pour satisfaire ce que je veux. Je vous expose mon problème: Pour faire simple: j'ai un tableau à deux colonnes. La première les dates allant du 1er janvier au 31 décembre La deuxième avec des chiffres aléatoire...
  9. B

    Recherche des symbole /\:*?"<>|

    Re : Recherche des symbole /\:*?"<>| Merci beaucoup c'est parfait
  10. B

    Recherche des symbole /\:*?"<>|

    Bonjour, Je souhaiterai disposé d'une macro me permettant de renvoyer un message lorsque les symbole suivant sont dans une cellule: /\:*?"<>| J'avais un bon début, mais les signes " et * risque de poser problème. Par avance merci beaucoup BILLOUU PS:Voici ma trame: If...
  11. B

    Modifier listbox .rowsource en additem ou autre...

    Re : Modifier listbox .rowsource en additem ou autre... Merci beaucoup pour vos retours qui répondent parfaitement à mon problème. BILLOUU
  12. B

    Modifier listbox .rowsource en additem ou autre...

    Bonjour, Voilà j'ai quelques problèmes avec ma listbox du notamment au nom des pages... puisque le .rowsource ne gère pas les espaces et je voudrais donc modifier la macro avec autre chose (additem par exemple..mais j'ai du mal a faire la traduction). Voila mon code: Dim L As Integer G =...
  13. B

    Recherche caractère dans selection d'une listbox

    Re : Recherche caractère dans selection d'une listbox Bonjour Pierrot, Une fois de plus c'est toi qui répond à ma demande et je t'en remerci... Mais une fois de plus cela ne fonctionne pas chez moi, je n'y comprend plus rien... Aurait tu un fichier en exemple...? En fait cela...
  14. B

    Recherche caractère dans selection d'une listbox

    Bonjour, Je voudrais que lorsqu'un utilisateur sélectionne un texte défini (dès que le texte contient "...") dans une listbox un message lui parvienne: exemple: Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) If Me.ListBox1.Text Like "*" & "..." & "*" Then...
  15. B

    Report de tous les items d'un listbox dans une cellule mais séparé par une virgule

    Re : Report de tous les items d'un listbox dans une cellule mais séparé par une virgu Bonjour Pierrot, Je reviens vers toi après ce weekend pour te demander si tu vois a quoi cela est dû puisque la version d'excel n'est pas mise en cause...? Faut-il que j'incrémente la listebox dans la...
  16. B

    Report de tous les items d'un listbox dans une cellule mais séparé par une virgule

    Re : Report de tous les items d'un listbox dans une cellule mais séparé par une virgu C'est la version 2003 d'excel. Pour ce qui est des fonctions Join & Split il me semble les voir pourtant dans l'explorateur d'objet de VBA en tant que "string"...
  17. B

    Report de tous les items d'un listbox dans une cellule mais séparé par une virgule

    Re : Report de tous les items d'un listbox dans une cellule mais séparé par une virgu Oui c'est peut être seulement la version.... En 6.3 seulement (malheureusement)
  18. B

    Report de tous les items d'un listbox dans une cellule mais séparé par une virgule

    Re : Report de tous les items d'un listbox dans une cellule mais séparé par une virgu Merci encore pour ta réponse. Mais toujours le même message incompatibilité de type... Dois je incrémenter quelques choses dans les listbox 4 & 5 ???
  19. B

    Report de tous les items d'un listbox dans une cellule mais séparé par une virgule

    Re : Report de tous les items d'un listbox dans une cellule mais séparé par une virgu Option Explicit Dim x As String Dim y As String Const G As String = "Feuil1" Const F As String = "Feuil2" . . . . Sheets(G).Select Worksheets(G).Range("B65536").Select Selection.End(xlUp).Select...
  20. B

    Report de tous les items d'un listbox dans une cellule mais séparé par une virgule

    Re : Report de tous les items d'un listbox dans une cellule mais séparé par une virgu Voici ce que j'ai mis: Sheets(G).Cells(x + 1, 5).Value = Join(Application.Transpose(ListBox5.List), ",") Le code que j'avais posté c'était suite à d'autre test puisque le code au dessus me renvoi le même...