Résultats de la recherche

Bonjour, j'ai inséré un object "package" dans une feuille Excel. Dans cet objet, j'ai inclus un fichier dll l'objectif étant que lors de l'installation, si le programme détecte que la dll est manquante dans les références, alors il l'installe puis la supprime de la feuille. Quelqu'un...

Bonjour à tous, Après de nombreux développements je me trouve confronté à un souci, la portabilité de mon application. Je développe un complément Excel qui utilises des références vba qui ne sont pas forcément sur tous les postes, voici la liste: J'ai lu pour une référence, qu'elles...

Re : treeview avec image du fichier excel Re bonjour, J'ai trouvé la solution en chargeant les images dans des controles images et en utilsant ce code: dim img as OLEObject For Each img In Feuil1.OLEObjects .ListImages.Add , img.Name, img.Object.Picture Next img ça servira...

Re : treeview avec image du fichier excel Bonjour Hasco, Merci beaucoup pour ton aide.:) J'ai un message d'erreur, "image non valide". J'ai copié des images .bmp dans la feuille en faisant "insertion/image" Est-ce que ça viendrait de là:confused:

Bonjour à tous, Je me prends la tête depuis des heures. grâce au forum j'ai enfin réussi à utiliser des images en icone pour un Treeview, donc, déjà, merci. Vous l'aurez compris, j'utilise un Treeview et je charge des images en icone. Mon souci, c'est que je développe un complément...

Re : Passage de Excel vers Access Bonjour Amine, vois ça, il y a peut-être la réponse à ton souci, suis le lien, ils y parlent également de l'erreur 3343: PROBLÈME*: Le message d'erreur «*Format de base de données inconnu*» s'affiche lors d'une mise à niveau vers Access 2000 ou 2002 en tout...

Re : liste des onglets d'un fichier .xlsb fermé Bon, désolé, mais en fait j'aurais dû mieux tester mon programme. En fait il suffit de remplacer ElseIf F Like "*.xlsx" Or F Like "*.xlsm" Then par ElseIf F Like "*.xls?" Then Je ne pensais pas que cette portion de programme...

Bonjour le forum, J'aimerai savoir s'il est possible de lire la liste des onglets d'un classeur xlsb fermé? J'ai créé (piqué) une macro sur le forum de HASCO et Hervé sur un fil qui date de 2008. Grand merci au passage pour vos codes:D Cette macro lit les onglets de fichiers Excel femés...

Re : Problème automation Bonsoir, idem pour moi, impossible de le faire planter. En tout cas, c'est un code très intéressant. Merci pour le code et désolé de ne pas avoir pu aider. Vérifiez peut-être si il ne vous manque pas une mise à jour d'Excel:confused: cdt smotty

Re : Passage d'une zone de texte vers un bon enregistrement d'un formulaire Bonsoir, j'arrive peut-être un peu tard, mais on ne sait jamais. Voici une solution que j'ai utilisée. code dans le formulaire sur lequel je doubleclique sur le champs NomProjet. Private Sub...

Re : Ouverture base de données à partir d'Excel Bonsoir, Voir réponse faite sur votre autre fil pour des idées de causes de bug J'ai testé votre code par curiosité et ça fonctionne parfaitement. cdt smotty

Re : Passage de Excel vers Access Bonsoir, votre code fonctionne à merveille (concernant l'ouverture de la base) 2 questions: 1) avez vous bien coché la bonne référence dans vba (Microsoft DAO 3.6 Object Library) 2) êtes vous sûr du chemin? cdt smotty

Re : Ouverture base de données à partir d'Excel Bonsoir, Je ne connais pas bien votre méthode. Cependant, tout dépend de ce que vous voulez faire. Si c'est pour récupérer des données, personnellement j'utilise l'import de données d'Excel. Avec l'enregistreur de macro, on obtient le code...

Re : Incompatibilité de type et argument vba Bonjour, Voici une fonction que j'utilise dans un de mes programmes: Function EstDansTab(ByRef T(), ByVal V) As Boolean Dim i As Integer Dim blok As Boolean blok = False For i = 0 To UBound(T) If T(i) = V Then...

Re : rassembler des lignes recherchées Re bonjour, Voici en fichier joint la solution. pour le code: Private Sub Worksheet_Change(ByVal Target As Range) Dim sh As Worksheet Dim c As Range Dim l As Long If Target.Column <> 1 Then Exit Sub If...

Re : Trucs pour boucle for n=1 to 55000 (?) Bonjour, j'en suis à 13 secondes sur 35000 lignes: Sub trouvedate() Dim det As Worksheet Dim doc As Worksheet Dim foundcell As Range Dim Champs As Range Dim ChampsRech As Range Dim bldatefound As Boolean Dim...

Re : rassembler des lignes recherchées Re Si chaque fournisseur est sur un onglet différent, j'imagine que le format de chaque tableau est différent. Tarif en colonne B pour l'un, D pour l'autre etc... Afin de pouvoir écrire un code VBA, il faudrait savoir pour chaque onglet dans quelle...

Re : macro pour recherchV auto URGENT Bonjour, Je suis désolé, je viens juste de voir votre message. Si ça coince, c'est qu'il n'y a pas de fichier ou que le fichier n'est pas un fichier Excel. Voici une petite modif qui teste si le fichier trouver est un fichier Excel: While s <>...

Re : Fonction Liredonnées avec cube SQL Bonjour, LIREDONNEESTABCROISDYNAMIQUE retourne un #ref quand elle ne trouve pas la valeur. Ce qui oblige à faire un teste. exemple: =Si(esterreur(LIREDONNEESTABCROISDYNAMIQUE(...));0;LIREDONNEESTABCROISDYNAMIQUE(...)) cdt smotty

Re : Calcul si cellules renseignées Bonjour 3dbillard, alors: =SI(OU(A7<>"";B7<>"");+C6-A7+B7;"") CDT smotty