Résultats de la recherche

Re : Menu déroulant en VBA excel Bonjour Domdom57 Code à insérer dans la procédure ComboBox1_Change() Sheets(ComboBox1.Text).Activate Bonne journée

Re : Macro afficher message si valeurs identiques Bonjour Sandrine123, St007 et à tous, Une autre possibilité. Attention on utilise la colonne S. A modifier si cette colonne est déjà utilisée pour d'autres données. Option Explicit Dim Ra As Range Dim Cell As Range Dim I As Integer...

Re : Comptage de points lors d'un tournoi Bonjour Quentin4h, Goosse_Clement Une autre proposition avec calculs intermédiaires en Feuil2. Bonne soirée et bon anniversaire au fiston.

Re : bouton de commande Bonjour Alexnica, Vois si ce petit exemple te conviens. Cordialement

Re : Inversion de cellules sous condition Bonjour Man95 et à tous, Je te propose cette solution en VBA: Public Sub Inversion() Dim R As Range Dim Cell As Range Dim X As String Set R = Range("C4:C" & Range("C65536").End(xlUp).Row) For Each Cell In R If Left(Cell, 9) = "CAC PA...

Re : Macro enregistrée qui ne fonctionne pas. Bonjour Daroumx, Je suis ravi de t'avoir aidé à résoudre ton problème. Par contre, je ne vois pas pourquoi mon code ne fonctionnait pas. Je suppose que tes cellules n'étaient pas au format Texte? Bonne journée.

Re : Macro Excel récupération de données dans plusieurs fichiers Texte Bonjour jozerebel et à tous, Une première piste et à défaut de précision sur la partie qui te pose problème: Il te faut utiliser la commande VBA Line Input. Bonne continuation

Re : Macro enregistrée qui ne fonctionne pas. Rebonjour Daroumx , Pour ma part j'utiliserai plutôt ce code: Dim R As Range Dim Cell As Range Set R = Range("A1:A" & Range("A2").End(xlDown).Row) For Each Cell In R Cell = Replace(Cell, ",", ".") Next A utiliser toujours sur...

Re : Problème de concaténation de cellule VBA Bonjour Daroumx Pour retrouver la valeur "04.10" en E1, il faut modifier le format de cette cellule. (format Texte) Cordialement

Re : userform pour lancer macro Ok. De toute façon, c'est facile de connaître le nombre exact de lignes par le code VBA. C'était simplement pour savoir si c'était intéressant de le faire. La question ne se pose plus puisqu'on va, dans le pire des cas, diviser le temps de traitement par 10...

Re : userform pour lancer macro Katoch, Peux-tu me dire très approximativement (disons à 10000 près) combien de lignes de données figurent dans ta feuile OPEX? Actuellement on teste sur l'ensemble de la feuille soit 1048576 lignes ce qui prend pas mal de temps. Le fait d'éviter les...

Re : userform pour lancer macro Bonjour Katoch, Pour ton info, voilà ce qu'est devenue ta procédure MacroOPEXChAff sans utiliser la fonction du filtre. On devrait ainsi encore gagner en vitesse d'éxécution. Sub MacroOPEXChAff() Sheets("RésultatsOPEX").Range("E33") =...

Re : userform pour lancer macro Bonsoir Katoch et le Forum, Je te propose dans un premier temps ceci pour réduire un peu la lourdeur des macros Sub MacroOPEXTotal() Application.ScreenUpdating = False MacroOPEXACHATS MacroOPEXENG MacroOPEXChPers...

Re : userform pour lancer macro Bonjour Katoch et à tous, J'ai réussi à télécharger ton fichier en utilisant Firefox au lieu de IE. Quelques petites questions avant de commencer à faire ce que tu demandes. As-tu supprimé des feuilles, des lignes ou des colonnes dans ton fichier ou...

Re : userform pour lancer macro Bonjour Katoch et à tous Pour ma part, je n'arrive pas à ouvrir ton fichier. J'obtiens simplement un fichier zip avec fichiers xml. Je ne connais pas le principe de fonctionnement du site cijoint. Est-ce du à un problème de délai? Bonne journée à vous.

Re : MACRO pour supprimer la sélection d'un filtre automatique Bonsoir à tous, Katoch: Je ne vois pas pourquoi showalldata ralentit ton projet. La solution que tu proposes ressemble étrangement à ce que voulait éviter Chris6999, c'est à dire supprimer le filtre et le remettre ensuite...

Re : MACRO pour supprimer la sélection d'un filtre automatique Désolé C'est On Error Resume Next ActiveSheet.ShowAllData

Re : MACRO pour supprimer la sélection d'un filtre automatique Bonjour Chris6999, Essaie ceci; On Error Resume Next Application.ShowAllData Bonne journée

Re : Raccourcir les écrits de la bible Bonjour jeromeN95, A vrai dire je ne comprends pas grand chose au problème que tu nous exposes dans ton tableau. Tu nous parles par exemple de "l'ordre des pompes". Il doit se confondre avec ceux de la feuille RBuanderie. c'est à dire? J'ai...

Re : Lien sur bouton Bonjour Divers68, Merci pour l'info, ça peut effectivement servir. Bon Noël