Contenu récent par are

Re : liste(s) déroulante(s) et suppression automatique ok quand j'efface E38 ça bug je suis d'accord. je cherche la condition IF pour résoudre cela Par contre en sélectionnant E38 hors des cellules Agence, elle s'efface bien du champ agence...

Re : liste(s) déroulante(s) et suppression automatique Tu copie colle les valeurs ou tu les sélectionnes ?

Re : liste(s) déroulante(s) et suppression automatique Ok, chez moi ton code marche : 1)vérifie d'abord que la macro est la seule active sur la console (que t'as pas laissé les anciens code sur la console ou dans un module 2)débogue et réinitialise (enregistre et quitte)

Re : liste(s) déroulante(s) et suppression automatique Réduis le au seul onglet qui nous intéresse, Et quel est le problème de la macro ? elle plante ?

Re : liste(s) déroulante(s) et suppression automatique ie ? plantage ? ou ce n'est pas ce que tu souhaites Pourrais-tu renvoyer le fichier qui ne marche pas également stp :) merci d'avance,

Re : liste(s) déroulante(s) et suppression automatique Bonjour, Pardon, j'aurais du préciser . Ci-dessous le code Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("C:C")) Is Nothing Then E = Range("A1048576").End(xlUp).Row a =...

Re : liste(s) déroulante(s) et suppression automatique Ok danc ce cas rajoute dans le code les cellules que tu désires effacer. dans celui-ci j'ai rajouté la cellule dans la colonne D adjacente(Peut-être faudrait-il rajouter les cellules dans la colonne O et P correspondante --copie colle à la...

Re : liste(s) déroulante(s) et suppression automatique Ok, je parle des données comme date d'attribution (pour cela que dans les messages précédents je te demandais si tu désirais effacer toute la ligne ou juste la colonne C). essaye cette version (j'avais encore oublié la ligne :rolleyes:)

Re : liste(s) déroulante(s) et suppression automatique Ne t'en fais, j'ai mis le fichier en PJ. Il ne plante pas Si je peux me permettre c'est quand même assez risqué l'histoire de l'effacement, ereur manuel et aucun moyen de récupérer la donnée --pourquoi pas mettre la ligne d'une couleur...

Re : TCD - Comment compter les lignes uniques ..... Bonjour, je rejoins rachid , sois tu installes l'Add in du TCD, sois tu crées une nouvelle colonne sommeprod2 qui prenne en compte le champ date : en gros la formule =SI(SOMMEPROD((($A$2:$A2)=A2)*(($C$2:$C2)=C2)*(($B$2:$B2)=B2))>1;0;1) sur...

Re : liste(s) déroulante(s) et suppression automatique Private Sub Worksheet_Change(ByVal Target As Range) E = Range("A1048576").End(xlUp).Row a = ActiveCell.Row For i = 22 To E If i <> a Then If ActiveCell.Value = Range("c" & i).Value Then Range("C" & i).Value = " " End If End If...

Re : TCD - Comment compter les lignes uniques ..... pas certain de comprendre, il n'y a pas de champ date dans ton exemple. 1 solution qui me vient à l'esprit serait : mettre le champ sommeprod également dans le filtre du rapport du TCD et filtrer sur les 1. Si cela ne marche pas, merci de me...

Re : liste(s) déroulante(s) et suppression automatique oui, désolé j'avais modifié une donnée :). Ok, je vois le souci mais ma macro tombe dans une boucle infinie...Je planche :)

Re : TCD - Comment compter les lignes uniques ..... Bonjour, Une sommeprod (ou sumproduct) est une formule excel qui te permettra de résoudre pas mal de problèmes que tu rencontres (comme celui-ci par exemple). Dans cette utilisation, je lui spécifie d'attribuer de compter les valeurs...

Re : condition couleur avec date Bonjour, Tu as oublié de mettre le code. Clic droit sur l'onglet, visualiser le code, copie colle le code des posts précédents