Planning avec mfc

[Regueiro]

Bonsoir le Forum.
Petite question :
Est-il possible de rupérer la valeur d'une cellule par MFC.
Exemple :

=SI(MOIS(J$19)<>MOIS(K$19);K$19;"")

En J19 = 31.10.2012
En K19 = 01.11.2012
S'applique à = =$K$15:$BG$15
Format MFC = Janvier 2012.
Merci de votre Aide.

PS : Je peux vous joindre mon fichier, je dois le purger et enlever pas mal de données confidentielle.

 

[Regueiro]

Re : Planning avec mfc

RE
Voilä mon fichier.
A+

 

[Regueiro]

Re : Planning avec mfc

Bonjour à tous.
Je relance mon post.
J'aimerais savoir si c'est possible par MFC ou non.
Merci de vos réponses
À+

 

[daniel1949]

Re : Planning avec mfc

Bonjour,
Je me disais en regardant le jalon : "Tiens tiens un petit air de déjà vu (ou plutôt déjà fait) !!!". Maintenant, j'attends les réponses à votre demande MFC pour les adapter à "l'original".;o)

 

[Regueiro]

Re : Planning avec mfc

Re
Oui en effet l'auteur de :

=SI(ET(OU($B26="P1";$B26="P2");L$19=$E26);"▼";SI(ET(OU($B26="P1";$B26="P2");L$19=$F26);"▼";SI(ET(OU($B26="P1";$B26="P2");L$19>$E26;L$19<$F26);"▄▄";0)))

Auteur : Daniel DEMILLY
Je crois que c'est vous. Très belle trouvaille.
Je l'ai adapter à ma sauce.

Je vous avais, il quelques temps envoyé un MP à ce sujet ?
Par contre auriez-vous une solution suite à ma requête.

Vu que vous êtes attentif à mon Mon Post.
Je cherche un code VBA pour transcrire votre code ci-dessus ?

a+

 

[daniel1949]

Re : Planning avec mfc

Je ne suis pas très doué en VBA. Essayez de poser la question sur le forum. Cdlt. Daniel

 

[Regueiro]

Re : Planning avec mfc

Bonsoir à tous.
Je relance mon post N°1
Soit par MFC ou code VBA.
Merci de votre Aide
A+

 

[job75]

Re : Planning avec mfc

Bonsoir,

Le problème du post #1 n'est pas vraiment clair.

Si l'on souhaite que la MFC mette la cellule sous un format date (ou nombre) c'est possible sous Excel 2010 (peut être aussi 2007 ?).

Mais une formule MFC doit toujours renvoyer VRAI pour que le format s'applique...

A+

 

[Regueiro]

Re : Planning avec mfc

Bonsoir
Je vous joint mon nouveau fichier.
En T32 :

=SI(ET(GAUCHE($B32;1)="S";T$19=$G32+1);$A32;"")

J'aimerais appliquer cette formule dans mon planning.
Ceci uniquement pour une meilleure compréhension.
En fait le N° de la tâche s'inscrit à la fin de sa tâche.
Il faut également fusionner la cellule avec la suivante.
Je pense que l'on peut le faire en VBA.
Je regarde encore de mon côté.
A+

 

[job75]

Re : Planning avec mfc

Il faut également fusionner la cellule avec la suivante.

C'est nouveau, et les problèmes à tiroir c'est assez agaçant.

De toute façon rien compris.

A+

 

[Regueiro]

Re : Planning avec mfc

Bonjour à Tous
J'ai besoin de votre aide pour terminer mon programme.
Voilà le code :

      If Not Intersect(Target, [zoneplanning]) Is Nothing And Target.Count = 1 Then
        Select Case Target.Value
        Case Is = Target.Value = Target.Value.End.xlToLeft
            Target.Offset(, 1).Merge

En fait j'aimerais que si la valeur de la cellule est égale à la valeur en colonne 1
alors fusionner la cellule active avec la suivante.
Je ne sais pas si c'est compréhensible.
Merci.

 

[Regueiro]

Re : Planning avec mfc

Bonsoir le Forum
Voilà mon code :

 Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(["zoneplanning"], Target) Is Nothing And Target.Count = 1 Then
     Target.Interior.ColorIndex = Range("couleurs").Find(Target).Interior.ColorIndex
     Target.Font.ColorIndex = Range("couleurs").Find(Target).Font.ColorIndex
     'Fusionner la cellule active avec la suivante
     Target.Offset(, 1).Resize(1, 2).MergeCells = True
     
   End If
End Sub

Celui-ci ne fonctionne pas sur mon fichier.
je vous joint également le fichier de J.Boisgontier que j'ai adapter sur mon fichier

Je vous joint également mon fichier.
Merci de votre Aide
A+

 

[Regueiro]

Re : Planning avec mfc

Bonsoir le Forum
Je relance mon dernier Post.
Merci de votre Aide.
A+

 

[Regueiro]

Re : Planning avec mfc

Bonsoir Le Forum.
J'ai contourner le Problème de Fusion de cellule.
Gràce et toujours au site de Boisgontier.
Formation Excel VBA JB
En fait j'ajoute à la fin un commentaire qui reprend automatiquement la valeur de la cellule de mon
choix :

=AfficheCmt(M32;(ET(GAUCHE($C32;1)="S";M$19=$H32));" "&$B32;1)

Je vous joint mon fichier pour ceux que cela intéresse.

J'aurais encore besoin de votre aide pour une autre MFC.
Voir sur mon fichier.

=MOD(ENT((COLONNE()+7)/7);2)<>1

En fait j'aimerais appliquer la MFC pour 2 cellules avec un pas de 2.

PS : Pour que les commentaires s'impriment sur Excel 2010.
Imprimer -> Mise en page -> Feuille -> Commentaires = Tel que sur la feuille.
A+

 

[Regueiro]

Re : Planning avec mfc

Bonsoir Le Forum
Il y aurait-il une personne attentionnée
Pour une éventuelle réponse sur mon Post #14
Merci
A+