Résultats de la recherche

  1. A

    Microsoft 365 Réorganiser les colonnes de plusieurs fichiers automatiquement par VBA

    Je vais explorer la piste donnée par @Dudu2 dans le post suivant : https://excel-downloads.com/threads/reorganiser-des-colonnes.20060190/
  2. A

    Microsoft 365 Réorganiser les colonnes de plusieurs fichiers automatiquement par VBA

    Bonjour à tous, J'ai besoin de vous pour trouver une solution afin de réorganiser des colonnes de plusieurs fichiers. Je possède x fichiers dont les titres et le nombre des colonnes (en ligne 1) ne sont pas identiques pour tous les fichiers. J'aimerais pouvoir appliquer un traitement afin de...
  3. A

    XL 2019 VBA - Combinaisons possibles à partir d'une liste d'actions

    Je confirme que tu es balèze! 👏 Je ne sais pas ce que tu aurais aimé comme fichier alors que ma demande concernait des idées pour réaliser le résultat souhaité ou des pistes de choses similaires. Néanmoins, je te remercie pour avoir pris de ton temps pour apporter une solution qui fonctionne...
  4. A

    XL 2019 VBA - Combinaisons possibles à partir d'une liste d'actions

    Bonjour, Alors effectivement je n'ai pas mis de fichier car je n'ai pas réussi à appliquer ma solution que j'appelle par niveau. J'ai bloqué dans ma démarche: - Je boucle sur mon tableau, je regarde le terme en index i => AB-BD pour i = 0 - J'inscrit une autre boucle pour partir de l'indice i...
  5. A

    XL 2019 VBA - Combinaisons possibles à partir d'une liste d'actions

    Bonjour à tous, A partir de la colonne A, je charge une variable tableau en VBA. Je voudrais l'utiliser pour déterminer toutes les combinaisons possibles (cf image ci-dessous). Je sais avec tout ça que les actions commençant par "A" seront les 1ères (donc ici AB et AC). J'ai tenté une solution...
  6. A

    XL 2019 Conversion RTF en TXT - Problème CREATEOBJET

    Bonjour à tous, Autoréponse : Cela provient du fait que le poste en question n'a pas le fichier RICHTX32.OCX d'installé. Sur un poste avec office 32 bits aucun problème mais avec office 64 bits, prise en compte du compléments impossible. Mais ça, c'est une autre histoire. Bonne journée. @urel87
  7. A

    XL 2019 Conversion RTF en TXT - Problème CREATEOBJET

    Bonjour à tous, J'ai crée une fonction qui me permet de transformer une cellule avec un texte formaté en RTF pour le convertir en texte simple. La source utilisée est celle-ci (voir 1ère réponse) : https://stackoverrun.com/fr/q/11710990 Mon problème est la partie...
  8. A

    Microsoft 365 Recordset : Utilisation dans boucle et connexion unique

    Roblochon, Evidemment... Je pensais l'avoir fait. Cela fonctionne correctement. Merci.
  9. A

    Microsoft 365 Recordset : Utilisation dans boucle et connexion unique

    Bonjour, Je continue avec une nouvelle problématique... Je boucle sur plusieurs lignes (environ 500-1000 lignes) avec différents traitements (requêtes SQL, calculs). J'utilise des fonctions pour faciliter le retour de donnée. J'ai donc une SUB qui contient une boucle qui, pour chaque ligne...
  10. A

    Microsoft 365 RECORDSET - MoveNext et CopyfromRecordset

    Bonjour Roblochon, Merci. Cela fonctionne parfaitement! @urel87
  11. A

    Microsoft 365 RECORDSET - MoveNext et CopyfromRecordset

    Bonjour à tous, Suite à un précédent échange sur ce forum, j'ai changé ma stratégie d'interrogation d'une base SQL pour utiliser ensuite les données : j'utilisais un QUERYTABLE (qui me copie mes données dans une feuille, puis je vais chercher la valeur voulue dans la cellule choisie) et je...
  12. A

    Microsoft 365 QUERYTABLE.ADD : Collage directement des valeurs dans variable possible ?

    Bonjour Pounet95, Une variable RANGE fonctionne bien, et me permet d'être sûr de supprimer les données avant lorsque je boucle mais cela colle quand même les données dans la feuille : Set Rg = Range("AR1:AT1") Rg = "" <reste du code> La solution que j'ai trouvé, qui est plus propre à mon avis...
  13. A

    Microsoft 365 QUERYTABLE.ADD : Collage directement des valeurs dans variable possible ?

    Bonjour à tous, J'utilise beaucoup les requêtes SQL dans mes codes VBA. Pour les créer, j'utilise un querytable.add sous la forme suivante : With Thisworkbook.Worksheets("FEUIL").QueryTables.Add (Connection:= "ODBC;DRIVER=xxx;SERVER=xxx;DATABASE=xxx;UID=yyy;PWD=rrr" _ , Destination...
  14. A

    XL 2016 [Résolu] Somme prod d'une liste organisée en niveaux

    Re, Merci pierrejean. Cela fonctionne parfaitement. Je dois juste appliquer quelques ajustements pour pouvoir l'intégrer dans un code plus général. Bonne continuation et à bientôt. ^^
  15. A

    XL 2016 [Résolu] Somme prod d'une liste organisée en niveaux

    Bonjour pierrejean, Ci-joint un fichier exemple. Les cellules en jaune sont les calculs à réaliser avant d'effectuer ceux des cellules grises. Je pense qu'il faut utiliser les niveaux comme "critère" mais ne pas les saisir en "dure" dans le code car je peux très bien avoir 4 voire plus de...
  16. A

    XL 2016 [Résolu] Somme prod d'une liste organisée en niveaux

    Bonjour à tous, Je suis en train de réaliser un fichier de traitement d'un fichier (pour avoir des indicateurs) non extraits directement depuis la base de données. Je bloque sur un bout de code afin de réaliser une somme prod sur une liste qui est organisée en niveau comme l'exemple ci-dessous...
  17. A

    XL 2016 Créer une boucle avec un QueryTables.Add sans redemander le MdP

    Bonjour à tous, Via VBA, j'utilise une requête afin d'interroger une Bdd (Activesheet.QueryTable.Add(Connection:=...) et renvoyer une valeur dans une feuille excel en fonction d'un numéro de série saisie dans une cellule. Par contre, même en intégrant le mot de passe dans le code, j'ai...