Contenu récent par Sirberthoult

Bonjour le forum,fanch55, merci beaucoup !! c'est parfait !

Bonsoir le forum, apres plusieurs tests, je constate que le code ne reconnait pas le patterns des cellules sans motif. ( xlsolid, xlnone) je fais changer le motif des cellules testées par une mfc , est ce a cause de ca que le code ne reconnait pas le motif ? edit: je crois comprendre que mon...

Bonsoir, effectivement erreur sur plage 2... ceci dit, ca ne fonctionne pas mieux...j'ai mis mon fichier en piéce jointe ce doit etre le for each qui ne change pas les patterns... je souhaite que toutes les cellules qui n'ont pas de hachures dans les colonnes Q, R et S (celle-ci peuvent...

Bonjour le forum, j'ai ecris un code qui doit s'appliquer apres 12h, qui ne fonctionne pas mais je ne comprend pas pourquoi... pouvez vous m'aider ? Private Sub Workbook_Open() Dim plage As Range Dim cellule As Range Dim plage2 As Range Dim cellule2 As Range If Hour(Now) > 12 Then Set...

Bonjour le forum, j'essaye de réaliser un planning visuel simple pour gérer les places de stage que j'accorde. j'aimerai quand on renseigne la fiche (bouton nouvel étudiant) que les données s'inscrivent comme dans l'exemple dans l'onglet "2025" j'ai rarement un nom quand j'accorde une place...

Effectivement, je faisais le même constat... a priori je ne suis pas le seul a rencontrer ce comportement étrange... heuresement la version de mapomme ne provoque pas cette erreur. merci pour vos retour a tous !

Bonjour ma pomme, Tu me sauves... je venais de m'appercevoir apres plusieurs essais que j'avais une erreur avec certaine valeurs... si je faisait dans une cellule =Compte(G38) avec en G38 une valeur de 3 ou 5 ou 6 cela me donnais 1 ou -4146... mais sinon le code fonctionnait pour toute les...

Bonjour JP Merci beaucoup ! cela fonctionne à présent trés bien . j'avais cherché trop loin...

Bonjour le forum, Sylvanus, j'ai tenté de corriger le code en ajoutant IsEmpty... de différente facon pour que si on utilise cette formule sur une cellule vide cela considére = 0 mais je n'y arrive décidément pas... en fait j'additionne des cellules dont le contenu varie, pour obtenir une...

Bonsoir Sylvanus, c'est nickel ! Oups... par contre si j'utilise cette fonction sur une cellule qui ne contient rien alors cela fait erreur... or j'additionne plusieur de ces cellules...

Bonjour le forum, Bonne année et meilleurs voeux à la communauté. je tombe sur cette discution car je cherchais cette solution... y aurait'il une possibilité pour modifier le code de vgendron pour que les signes + et - soit également extrait et ainsi donc exécute le calcule : exemple ; 3...

Bonsoir le forum, Job75, Piga25 C'est Parfait ! exactement ce que je souhaitais ! merci à toi Job75, d'avoir repondu à ma demande initiale et d'avoir finaliser l'integration de la solution dans mon fichier. merci à toi Piga25, de m'avoir proposé des solutions et des pistes pour tenter de...

Re effectivement ton idée juste,... alors j'ai fais ca mais ca ne fonctionne pas... je dois zapper quelque chose. Private Sub Worksheet_Change(ByVal Target As Range) If ActiveCell.Column = 2 Or ActiveCell.Column = 4 Or ActiveCell.Column = 6 Then matin Else: aprem End If...

Bonjour le forum, Piga25, job75, Merci Piga25 d'avoir "combiner" les 2 codes, effectivement ca fonctionne bien mais que le matin, ce qui est deja pas mal ... j'ai tenter de faire comme toi pour faire appliquer le bout de code au bon moment mais ca bug... que penses tu de ma syntaxe ? Private...

Bonjour le forum, job75 Je n'arrive pas de moi même à apporter des modifications à votre code job75 qui fonctionne très bien avec 3 agents.(titi, toto, tata comme dans mon post initial) car parfois je n'ai que 2 agents ( j'ai laissé mon code en vert qui fonctionne bien aussi, mais QUE pour 2...