Résultats de la recherche

  1. M

    XL 2010 VBA: commande non disponible, aucun document n'est ouvert

    Bonjour J'ai un classeur Excel qui contient une macro, enregistré sur un serveur. Une vingtaine de PC l'utilise sans problème. Durant cette macro, un document Word est ouvert, et le contenu du fichier Excel y est copié. Depuis quelques jours, un des utilisateurs a un problème sur cette ligne ...
  2. M

    XL 2010 [RESOLU] VBA: L'indice n'appartient pas à la sélection

    Bonjour J'ai un classeur Excel qui contient une macro, enregistré sur un serveur. Une vingtaine de PC l'utilise sans problème. Depuis quelques jours, un des utilisateurs a un problème (les autres l'utilisent sans problème), la macro plantant sur la ligne : Workbooks("Base de données").Close...
  3. M

    .RemoveDuplicates amélioré en VBA ?

    Bonjour J'aimerais savoir comment "améliorer" la fonction .RemoveDuplicates : - j'ai une feuille avec environ 20.000 lignes et 100 colonnes - la première colonne contient un numéro unique (il n'y a pas de doublon dans cette colonne), en ordre croissant - je considère comme doublons les...
  4. M

    [Résolu] Copier des boutons avec le lien vers la macro

    Bonjour J'ai un problème concernant la copie de boutons d'un classeur vers un autre. Dans une macro, j'ai à un moment besoin de copier l'ensemble des boutons présents dans une feuille vers une feuille d'un autre classeur. J'ai un classeur WB1 qui contient des boutons : - bouton 1 lié à la...
  5. M

    [Résolu]Largeur exacte d'une colonne et ajustement automatique de cellules fusionnées

    Bonjour J'ai un problème concernant la largeur des colonnes : - dans mon classeur, toutes les colonnes ont une largeur de "2" - je pensais que 6 cellules fusionnées auraient une largeur de "12", et donc contiendrait autant de texte qu'une cellule de largeur "12" - or ce n'est pas le cas...
  6. M

    Erreur lors d'un choix de dossier

    Bonjour Dans une macro, le code ci-dessous permet à l'utilisateur de choisir un répertoire : Set objFolder = Nothing Do While objFolder Is Nothing Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.BrowseForFolder(&H0&, "Choisir le...
  7. M

    [Résolu] VBA copier données d'un fichier à un autre

    Bonjour J'ai un fichier qui possède plusieurs centaines de colonnes ; chaque colonne correspond à un individu, des données numériques étant listées pour chaque individu. J'aimerai créer un autre fichier qui ne contiendrait que les données numériques supérieures à un certain seuil (renseigné...
  8. M

    Tester répertoire sur un réseau

    Bonjour J'aimerais tester si un répertoire réseau existe ; pour cela je me sers de ce code : If Dir("\\ServeurTest\User\DOSSIER", vbDirectory) = "" Then With Application.FileDialog(msoFileDialogFolderPicker) .InitialFileName = Application.DefaultFilePath & " \ " .Title...
  9. M

    Création d'un fichier excel par défaut en mode compatibilité

    Bonjour J'ai un module qui a un moment crée un nouveau classeur, et y copie la feuille d'un autre classeur : Application.Workbooks.Add Ca marche très bien, sauf sur certains ordinateurs dont Excel version 2010 crée par défaut un classeur en mode compatibilité, donc limité à 65536 lignes, et...
  10. M

    Tableau non adapté ?

    Bonjour J'avais imaginé une solution pour mon problème qui à priori n'est pas adapté, j'aimerais savoir si quelqu'un aurait une autre proposition. OBJECTIF : - mon classeur a deux feuilles, "Commandes" et "Résumé" - j'ai plusieurs données qui sont renseignées dans la feuille Commandes (de...
  11. M

    VBA et demande de mot de passe pour copie d'une page web

    Bonjour J'ai une macro qui colle et organise des données que l'utilisateur aura préalablement copiées d'une page internet. Plus précisément : - l'utilisateur ouvre une page web avec Internet Explorer (pas d'autre navigateur) - il entre un identifiant et un mot de passe - il copie les...
  12. M

    Supprimer un espace qui n'est pas reconnu comme un espace

    Bonjour Le titre de mon sujet est bizarre mais je ne comprends pas ce qui se passe. J'ai un classeur qui contient des données copiées/collées d'un site internet, avec des espaces inutiles. Dans la colonne A, chaque cellule contient un nom et prénom ; parfois il n'y a pas d'espace avant le...
  13. M

    [résolu] .Find et "L'indice n'appartitent pas à la sélection"

    Bonjour Je ne comprends pas pourquoi le code ci-dessous me renvoie l’erreur "l'indice n'appartient pas à la sélection" à la ligne .Find. Après recherche j'ai compris qu'il peut s'agir d'une erreur du nom de la feuille, mais ce n'est pas le cas ici. Quelle peut être l'origine ? Je mets un...
  14. M

    Filtre élaboré avec des cellules vides dans la plage de données

    Bonjour J'ai réalisé une macro qui, à un moment, va réaliser un filtre élaboré. J'ai isolé cette séquence dans le fichier exemple : Sub Macro1() Range("A1:D6").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _ "H1:K2"), CopyToRange:=Range("F4"), Unique:=False End Sub...
  15. M

    [RESOLU] VBA supprimer ligne si valeur trouvée sur une autre feuille

    Bonjour à tous. Je cherche à automatiser la fonction suivante : - j'ai des données en Feuil1, dont un code numérique en colonne A ; - j'ai une série de valeurs numériques en colonne A de Feuil2 (il peut y avoir des cellules vides, par exemple une valeur en A1 et A2, rien en A3, une valeur...
  16. M

    Recherche multicritère mais très particulière

    Bonjour à tous Je viens vers vous car après trois jours de réflexion et de recherche web, je n'arrive pas à trouver une solution :confused::confused: ! Mon tableau excel : - chaque ligne correspond à un individu (environ 800), caractérisé par un identifiant unique ; - chaque colonnes (36...