Résultats de la recherche

  1. D

    Problème macro création de TCD à partir de plusieurs pages

    Bonjour le forum, J'ai un problème avec une macro qui doit insérer à partir de toutes les feuilles d'un classeur un Tableau croisé dynamique. La macro fonctionne bien sauf quand la feuille source du TCD dépasse 80000 lignes la macro me renvoie alors un message d'erreur d'exécution 13...
  2. D

    Code suppression de plage avec condition un peu lent à l’exécution

    Bonjour le forum, J'ai une macro avec laquelle je supprime une plage avec condition dans un fichier qui fait en moyenne 160000 lignes j'utilise pour l'instant ce code là mais il met environ 32 sec pour supprimer les plage: Sub Suppr() With Application .ScreenUpdating = False...
  3. D

    Est-il possible de supprimer ligne d'une variable tableau ?

    Bonjour le forum, Comme le titre l'indique je voudrais savoir si il serait possible de supprimer une ligne d'une variable tableau ou si il existe une astuce qui aboutirais par exemple à supprimer une ligne d'une variable tableau dont la valeur est égale à "" par exemple. Merci d'avance...
  4. D

    Afficher une image de mon classeur dans un userform

    Bonjour le forum, Voila j'essaie d'afficher une image présente dans la feuil1 de mon classeur.Malheureusement le code suivant affiche seulement l'userform sans la photo chargée dedans. Private Sub UserForm1_Initialize() Dim Sh As Shape Set Sh = Worksheets("Feuil1").Shapes(1)...
  5. D

    Récupérer une valeur générée aléatoirement dans une boucle.

    Bonjour le forum, Do Until (WorksheetFunction.Sum(Range("B1:B" & Range("B" & Rows.Count).End(xlUp).Row)) * 2) >= Total Range("B" & Range("B" & Rows.Count).End(xlUp).Row).Offset(1, 0) = tbl(((UBound(tbl) - 1) * Rnd) + 1) Loop Voila je remplis la colonne B avec les valeurs prises...
  6. D

    Voir si une cellule dans une plage corresponds à l'une des cellules d'une autre plage

    Bonjour le forum, Voila je cherche à voir si une cellule dans une plage de donnée corresponds à l'une des cellules d'une autre plage de donnée , Sans passer par 2 boucles for each qui prennent un peu trop de temps à mon avis comme j'ai fait ici. Dim derl as long Dim cel As Range...
  7. D

    Couper et coller une plage variable d'un classeur à un autre par VBA

    Bonjour le forum, Voici mon problème j'essaie de couper et de coller une plage variable dans une feuille d'un classeur vers une autre feuille d'un autre classeur Voici mon code : Sub test() Application.ScreenUpdating = False Dim derl As Long Dim derc As Long derl =...
  8. D

    Problème avec création de nouvelle classeur par vba puis remplissage du classeur

    Bonjour le forum, Voila mon problème j'essaie de créer un nouveau classeur par vba via une macro dans un autre classeur. Le nouveau classeur est crée avec comme nom : nomduclasseur + date d'aujourd'hui et une seule feuille nommée aussi.Mais quand j'essaie d'activer le nouveau classeur et...
  9. D

    Petit problème dans une macro supposée faire la somme du plage variable

    Bonjour le forum, Voila j'ai essayé de faire une macro qui va sommer des plages de cellules qui varie la détections de début et de fin de position des cellules se fait bien comme il faut mais dans la cellule ou doit être indiqué la somme j'ai un petit problème , au lieu d'avoir la formule...
  10. D

    Macro enregistrée qui ne fonctionne pas.

    Bonjour à tous, Alors je vous explique mon problème. J'ai enregistré une macro qui remplace les "," par des "." dans une plage de cellules constitué que de chiffres. J'obtient alors ce code Range("A2").Select Range(Selection, Selection.End(xlDown)).Select Selection.Replace...
  11. D

    Problème de concaténation de cellule VBA

    Bonjour à tous, Donc voila, j'ai un petit problème de concaténation sur VBA. Je met ce code Range("E1") = "0" & Left(Range("D1"), 1) & "." & Right(Range("D1"), 1) & "0" Avec la valeur de D1 = "4,1" ,j'obtiens toujours 4,1 en E1 alors que je cherche à avoir en E1 = "04.10" Je n'arrive...
  12. D

    Supprimer plages avec position première et de la dernière ligne qui varie.

    Bonjour à tous. Donc voila j'essaie de trouver une solution pour supprimer plusieurs plages de cellules dont la position de la 1ere et dernière ligne varie a chaque fois(pour chaque plage). Toutefois , dans la première et dernière ligne de la plage à supprimer on retrouve toujours la même...
  13. D

    Supprimer 8 lignes y compris celle de la cellule

    Bonjour, Je suis assez novice en VBA ... bon disons que j'utilisais uniquement l'enregistreur de macro Donc, ce que j'essaie de faire c'est de supprimer la ligne avec la valeur de la cellule active dans la colonne A = ********* puis ensuite supprimer les 7 lignes qui suivent la 1ere...
  14. D

    Remplir plage vide avec plage pleine précedente

    Bonsoir à tous, Je suis un vrai novice sur VBA. J'utilise généralement l'enregistreur de macro, mais la j'y arrive pas. Donc j'ai un fichier avec une colonne G par exemple qui regroupe les données d'un matricule dans G1 , G2 ... etc mais dans la plage A1:F1 figurent les données...