PJeune membrePierFranInscrit le :23/01/2022Dernière activité :19/12/2023 à 16:50Version d'Excel :VBAMessages18Votes2Fichiers0Téléchargements0SujetsMessagesStatistiquesVotes reçus Messages postés par PierFranDateAuteur du sujetSujetExtrait du message04/06/2023 à 18:36PierFranDifférents formats dans un listboxMerci pour cette solution. Bonne journée...04/06/2023 à 16:18PierFranDifférents formats dans un listboxEn fait il s'agit d'un exemple qui utilise le format General "heures" pour éviter d'avoir une colonne supplémentaire. Ce format de la catégorie Personnalisée permet d'ajouter du texte tout en gardant le format "nombre" de la colonne B Par conséquent on peut faire la multiplication unité et taux. Le...03/06/2023 à 18:11PierFranDifférents formats dans un listboxIl s'agit d'importer les valeurs et formats d'un tableau excel dans un Listbox Le format de la colonne B est personnalisé "General" voir fichier ci-joint. Comment importer cette colonne avec les valeurs et le format. Merci...29/11/2022 à 19:35PierFranNumberformat ="General" avec une "variable"""J'ai joint un fichier merci de me répondre...28/11/2022 à 15:32PierFranNumberformat ="General" avec une "variable"""Exemple colonne A = 5 heures X colonne B = 10 total colonne C = 50 La macro: range("A1").numberformat = "General""heures""" Comment remplacer "heures""" par une variable provenant d'une liste déroulante. Merci...18/05/2022 à 18:40PierFranInputbox déclaration DIMMerci pour l'information Bonne journée...18/05/2022 à 18:01PierFranInputbox déclaration DIMCette première macro nommée Essai1 fonctionne. Sub essai1() col = 2 Set LastRow = Cells(rows.Count, col ).End(xlUp).Offset(1, 0) For z = LastRow.Row To 1 Step -1 If Cells(z, col ).Value = "" Then Cells(z, col ).Delete Next z End Sub Cependant l'utilisation d'un Inputbox pour identifier la colonne ne...15/05/2022 à 17:02PierFranUtiliser la fonction like avec une variableMerci...15/05/2022 à 16:56PierFranUtiliser la fonction like avec une variableSub test() Set F = Sheets("Liste") For Each c In F.Range("A1:a" & F.[A10000].End(xlUp).Row) If c.Formula Like "nom*" Then c.Font.ColorIndex = 3 Next End Sub Je voudrais remplacer nom par une variable. Par exemple par activecell.formula Alors comment écrire la macro suivante ? Merci Sub test(...18/03/2022 à 17:11PierFranEnregistrer un classeur en Excel (xlsx)La solution est bonne Merci à tous...18/03/2022 à 16:18PierFranEnregistrer un classeur en Excel (xlsx)J'ai corrigé mais j'ai toujours un code d'erreur. Merci pour votre réponse...18/03/2022 à 15:49PierFranEnregistrer un classeur en Excel (xlsx)Sub save_as_excel() nom =range("A1").value je veux enregistrer seulement le classeur "Feuil1") renommer selon la variable "nom" en format excel dans le dossier suivant "C:\Users\dossier \sous-dossier\Comptabilité\" & nom end sub J'utilise Microsoft excel 2010 J'ai un message d'erreur avec nom = Rang...11/02/2022 à 15:33Nrev74Portion de code ralentissant beaucoup le temps d'exécutionPeut-être ceci pourrait aidé un peu à partir de : .Cells(i, 12).NumberFormat = "@" ou remplacer toutes lignes dont seulement le numéro de colonne change for j = 12 to 28 .cells(i,j).numberformat = "@" next...11/02/2022 à 14:57Nrev74Portion de code ralentissant beaucoup le temps d'exécutionPlacer au début de vottre macro Sub turns_off_applications() With Application .Calculation = xlCalculationManual .ScreenUpdating = False .DisplayStatusBar = False .EnableEvents = False End With End Sub Placer à la fin Sub turns_on_applications() With Application .Calculation = xlCalculationAutomatic...08/02/2022 à 17:46AE74Comparaison - différences entre deux fichiersDésolé j'ai oublié de mettre la macro...08/02/2022 à 16:33AE74Comparaison - différences entre deux fichiersJe vous joint un fichier. J'ai sélection la plage A4 :Q26 de la feuil1 et la même plage feuil2 Les même cellules qui ont la même valeur des deux plages sont indiquées en rouge. Donc les différences sont en noir. Cliquer sur le bouton Comparer valeurs Feuil1...07/02/2022 à 18:18AE74Comparaison - différences entre deux fichiersVoici peut-être une solution à votre demande. La macro vous demande la plage à comparer...28/01/2022 à 16:57PierFranComparer deux plages de données (VBA)Deux plages de données sont sélectionnées et les valeurs communes ou identiques sont formatées "couleur de police en rouge"...Forums