XL pour MAC Problème de code

[tdenis]

Bonjour à tous,
j'ai une erreur de code 91 sur celui-ci...
pouvez vous m'orienter s'il vous plait ..

Sub Trouve_la_date()
Dim CibleDate As Range
Dim Recherchedate As Date
Dim RenvoieDate As Range
CibleDate = ("B6;P100")
Recherchedate = ("Q4;FES4")
RenvoieDate = ("Q6;FES100")
Set CibleDate = Cells.Find(what:=FormatDate, lookat:=xlValue)
If Not CibleDate Is Nothing Then
Recherchedate = CibleDate.Select
Active.Offset(0, 0).Select
Selection.Range.Interior.Color = RGB(255, 0, 0)
Else
End If
End Sub

bonne journée a vous
Cordialement
Tdenis

 

[sylvanu]

Bonjour Tdenis,
Je ne sais pas ce que vous voulez faire, mais il y a quelques erreurs :
1- CibleDate = ("B6;P100"). Si c'est la plage que vous voulez spécifier :
CibleDate =Range ("B6: P100")
2- Recherchedate = ("Q4;FES4") : Recherchedate est déclarée comme date pas comme range.
3-Set CibleDate = : Vous déclarer CibleDate alors que vous venez de la définir.
4-Recherchedate = CibleDate.Select. RechercheDate est une date alors que CibleDate est un range.
Pourriez vous préciser ce que vous voulez faire, ou mettre des commentaires dans le code.

 

[tdenis]

Bonjour sylvanu,
merci de ton aide.
mon souhait
dans la plage cibledate , je cherche a repérer des cellules avec une date .rechercher ces dates dans la ligne recherchedate et si cela coïncide, colorier la cellule de croisement des deux dates dans la plage renvoiedate
je ne sais pas si je suis clair.
merci d'avance
tDenis

 

[sylvanu]

Vous n'auriez pas un petit fichier exemple ?
Ne serait ce que pour voir l'agencement des différentes plages.

 

[tdenis]

Vous n'auriez pas un petit fichier exemple ?
Ne serait ce que pour voir l'agencement des différentes plages.

voila le fichier
feuille 3
je tente mes recherches avec un si pour comparer mes dates ...;(

 

[sylvanu]

Re Tdenis,

Là je ne m'engage pas. C'est trop une usine à gaz.
Un planning avec 4189 colonnes ! Faire un planning sur un an avec une résolution de 2H !
Pourquoi avoir mis 11 colonnes pour un jour ? et non pas 12 ?
D'autant que les N° de jours sont fusionnés, donc il vous faudra faire des décalages pour trouver le jour en cours.

"Si j'étais vous", je ne mettrais qu'une colonne par jour, et la mise en couleur se fait simplement avec une MFC.
Je vous souhaite bon courage. Sorry.

 

[tdenis]

Re Tdenis,

Là je ne m'engage pas. C'est trop une usine à gaz.
Un planning avec 4189 colonnes ! Faire un planning sur un an avec une résolution de 2H !
Pourquoi avoir mis 11 colonnes pour un jour ? et non pas 12 ?
D'autant que les N° de jours sont fusionnés, donc il vous faudra faire des décalages pour trouver le jour en cours.

"Si j'étais vous", je ne mettrais qu'une colonne par jour, et la mise en couleur se fait simplement avec une MFC.
Je vous souhaite bon courage. Sorry.

Re
pourquoi mettre 11 colonnes par jour:
je prévois de varier mes horaires selon les décisions de timing et retroplaning
dans les cases de prévisionnel si je mets 5/6/7 jours travaillés et 8/9/10h par jour cela va modifier mon retroplaning pour mon optimisation de commencement ( en quelque sorte, c'est un gantt version excel )
je vais rechercher avec les MFC
Merci pour le temps passé en tout cas
Bon courage
Tdenis

 

[sylvanu]

Ce qui me choque c'est d'avoir un planning annuel avec une résolution d'une heure.
Déjà gérer un planning avec une résolution d'un jour c'est difficile à lire.
Sinon si vous voulez un Gantt, il y en a un magnifique sur ce site :

Project Tracker

FR / EN Outil de planification et de suivi de projet, conçu pour les ONGs, mais pouvant être transposé à d'autres types d'utilisation. Project planning and monitoring tool, designed for NGOs, but which can be transposed to other types of use...

www.excel-downloads.com

 

[tdenis]

Ce qui me choque c'est d'avoir un planning annuel avec une résolution d'une heure.
Déjà gérer un planning avec une résolution d'un jour c'est difficile à lire.
Sinon si vous voulez un Gantt, il y en a un magnifique sur ce site :

Project Tracker

FR / EN Outil de planification et de suivi de projet, conçu pour les ONGs, mais pouvant être transposé à d'autres types d'utilisation. Project planning and monitoring tool, designed for NGOs, but which can be transposed to other types of use...

www.excel-downloads.com

En fait,
j'ai un prévisionnel avec des fiches de suivi en relation avec ce fichier ....
chaque poste de l'atelier a une fiche est avec une fourchette de temps de fabrication
donc je voulais être le plus précis possible
merci pour l'info
Tdenis