Résultats de la recherche

  1. P

    Microsoft 365 Identifier ligne par ligne les différents chiffres par une couleur précise

    Bonjour le forum, Après plusieurs essais via les mises ne formes conditionnelles je fais appel à vous pour m'aider à résoudre mon problème en vba. Dans le fichier joint, j'ai un tableau qui peut avoir entre 1 et 500/600 lignes pour lesquelles j'ai entre 1 et 3 valeurs différente(s). Je...
  2. P

    Microsoft 365 Transformer InputBox en UserForm avec TextBox et CommandButton

    Bonsoir le forum, Je cherche à insérer une ou plusieurs lignes via UserForm (via TextBox et bouton de validation). J'ai trouvé ce code mais via InputBox : Sub Incrémentation() Dim xCount$ LableNumber: xCount = Application.InputBox("Nombre de lignes à incrémenter", "Tableau de...
  3. P

    Microsoft 365 Suppression des filtres de la totalité des segments sur un onglet en particulier

    Bonjour le forum, J'ai dans mon fichier Excel plusieurs onglets avec des segments. J'utilise la macro ci-dessous pour supprimer la totalité des segments en une seule fois, mais elle effectue la suppression des filtres sur tous mes autres onglets... Comment faire fonctionner cette macro onglet...
  4. P

    Microsoft 365 Suppressions anciens fichiers de sauvegarde à la fermeture du fichier

    Bonsoir le forum, J'ai un fichier avec le code suivant : Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim NomDossier As String Dim NomFichier As String NomDossier = "C:\Users\xxx\" Application.DisplayAlerts = False NomFichier = Format(Date, "dd.mm.yyyy") & "_" &...
  5. P

    Microsoft 365 Formule ou code vba pour remplir tableau en fonction du nombre de valeurs par ligne

    Bonjour le forum, Dans le tableau joint, je cherche à renseigner le tableau se trouvant en AK:AN. Voici ma problématique : - Dans ID doit figurer uniquement l'ID d'un client de la ligne si il est unique - Dans ID (T1) doit figurer le premier ID client de la ligne en commençant depuis la gauche...
  6. P

    Microsoft 365 Problème avec une mise en forme conditionnelle

    Bonsoir le forum, Je rencontre un soucis avec une mise en forme conditionnelle. J'ai dans les cellules B1:X1 un menu déroulant avec une liste de 3 items identiques. Les cellules B1 et D1 disposent d'une mise en forme conditionnelle qui se déclenche en fonction du texte contenu en A1. Pour...
  7. P

    Microsoft 365 vba convertir nombre au format texte pour calcul et mise en fome conditionnelle

    Bonsoir à tous, Je récupère dans un fichier Excel des données de l x h au format texte comme cf. colonne D de l'exemple joint. Je souhaite diviser le chiffre de gauche par le chiffre de droite et mettre en rouge les cellules de la colonne D dont le résultat serait différent de 0,80 J'ai essayé...
  8. P

    Microsoft 365 Liaison entre deux cellulles dans les deux sens

    Bonjour le forum, Je ne sais pas si cela est possible en VBA mais je cherche a créer une liaison entre deux cellules dans les deux sens. Ex : Feuil1 A1 liée dans les deux sens avec Feuil2 A2 que je modifie la cellule en Feuil1 ou en Feuil2 l'autre est actualisée automatiquement. Merci d'avance...
  9. P

    XL 2010 TCD avec regroupement dates / lieux

    Bonsoir le forum, Dans le cadre de mon travail je dois analyser le tableau ci-joint. Il me faut arriver à extraire les données (de préférence via un TCD) le nombre de vols par jours dans les différentes classes, le nombre de vols par jours et par aéroport dans les différentes classes. Je ne...
  10. P

    XL 2013 Modification code export onglet

    Bonjour à tous, J'ai dans ma macro export le code suivant : Option Explicit Sub Exporter() Dim s As Object Application.ScreenUpdating = False Application.DisplayAlerts = False Sheets(Array("ANALYSE")).Copy With ActiveWorkbook For Each s In .Sheets: s.DrawingObjects.Delete: Next .SaveAs...
  11. P

    XL 2010 Macro pour inserer ligne avec celulles fusionnees et hauteur ajustée automatiquement

    Bonjour le forum, Dans le fichier joint, je souhaite créer une macro capable : 1. d’insérer une ligne au niveau de la ligne 11 (en effaçant les formats, formules et bordures éventuelles de la ligne au-dessus) 2. fusionner les cellules ("C11:G11"), renvoyer à la ligne automatiquement puis...
  12. P

    Inserer données d'une ou de plusieurs cellules dans une meme forme

    Bonsoir le forum, Je voulais savoir si il était possible d’insérer les données de de plusieurs cellules dans une même forme. Ex : ma forme se prénomme IDREGION01 est je voudrais y insérer le contenu de la cellule A1, B1 et C1. Est il possible via VBA de sélectionner le contenu que l'on...
  13. P

    Erreur d’exécution '13': incompatibilité de type

    Bonsoir le forum, Je souhaite convertir le contenu de trois cellules en majuscules dès lors qu'elles ne le sont pas (D8,D21 et D22). Le code "fonctionne très bien" sauf que lorsque je supprime le contenu de l'une des cellule le message est : Erreur d’exécution '13': incompatibilité de type...
  14. P

    Problème avec MsgBox

    Bonsoir à tous, J'ai un code qui doit ouvrir un MsgBox si les conditions ne sont pas respectées : Sub MesPerso3(Art, Col) MsgBox "Veuillez renseigner l'intégralité des champs avant de débuter la saisie des données.", vbExclamation, "Module de gestion"...
  15. P

    vbOKOnly effacer cellule active après clic sur "OK"

    Bonjour à tous, Dans un code vba à plusieurs conditions, j'ai un déclenchement d'un MsgBox (cf code si-dessous). Je souhaiterai que la valeur de la cellule active soit effacée quand on clique sur le bouton OK du MsgBox. Pouvez vous m'aider ? il me semble qu'il faut utiliser...
  16. P

    Verrouiller cellule(s) ou plage(s) en fonction de la valeur d'une autre

    Bonsoir à tous, Je souhaiterai pouvoir "verrouiller" une ou des cellule(s) ou plage(s) en fonction de la valeur d'une autre. Ex : Si la cellule D2 contient "H" verrouiller ou rendre la saisie impossible dans la plage D5:D9 et D15:18 à l'inverse, si D2 contient "F" verrouiller ou rendre la...
  17. P

    Reproduire formules vba sur plusieurs colonnes

    Bonsoir le forum, J'ai crée plusieurs formules vba qui peuvent déclencher ou non un MsgBox. Mon soucis est qu'elles ne s'appliquent pour le moment qu'à la colonne D. Comment procéder pour qu'elles soient reproductibles sur les colonnes E, F, G, H etc. ? Dans les formules les cellules A*...
  18. P

    Comment faire une boucle avec mon code

    Bonsoir à tous, Je chercher à reproduire ce code sur les colonnes D et après dès lors que la cellule D1, E1, F1 etc. est non vide. Le code doit s'arrêter des l'instant où la cellule ""1 est vide (cela peut aller de 1 à 60 colonnes environ). Les cellules B"" et A"" dans le code sont fixes...
  19. P

    MsgBox si valeur cellule <> d'une fomule somme

    Bonjour le forum, Je cherche à déclencher un MsgBox des lors que la cellule B5 est différente de la somme D5 : D9. J'ai essayé ce code : Private Sub Worksheet_Change(ByVal Target As Range) If [B5] <> [Sum("D5 : D9")] Then MsgBox "Les quantités ne sont pas respectées" End If End...
  20. P

    Dupliquer colonne en fonction de la valeur d'une cellule

    Bonsoir à tous, Je suis nouveau sur le forum et novice en vba... :mad: Toutefois, je cherche un code qui pourrait me dupliquer la colonne D de l'onglet ATHLETES autant de fois que la valeur de la cellule D1 de l'onglet INFOS. Exemples : - si la cellule D1 de l'onglet INFOS = 0 ou 1 ...