Re : Recherche sans trouvé?
Re,
En fait Par F8 cela fonctionne dans les deux classeur.
Ce que je veux rechercher est inscrit dans le classeur "analyse du système" en même temps que dans le classeur "planning" donc la concordance entre les cellules est exacte par une autre macro.
Par la suite l'exécution de la macro Visa doit changer la couleur de la bonne cellule dans le classeur "planning".
Ce que je ne comprend pas c'est que les classeur s'ouvre bien, tout fonctionne à part la concordance et pourtant ce sont les deux même cellules.
La cellule dans "planning" et dans "ANA syst." sont obtenues de la fusions de deux autres cellules, est-ce que cela à de l'importance?je ne pense pas mais bon voici une partie du code utilisé
en lien hypertexte)
For n = 1 To 3000
If Sheets("Informations").Range("B" & n) = r Then
Sheets("Informations").Range("E" & n) = e
Cells.Hyperlinks.Add Anchor:=Sheets("Informations").Range("A" & n), Address:=l, TextToDisplay _
:=p & t
End If
Next n
ActiveWorkbook.Save
ActiveWindow.Close
Workbooks.Open Filename:="H:\GESTION DE PRODUCTION\Planning.xlsm", UpdateLinks:=0
ActiveWorkbook.Sheets(NomFeuil).Select
Range("a1").Select
j = 1
For j = 1 To 31
If j = y Then
ActiveCell.Offset(0, 1).Select
j = 32
Else: ActiveCell.Offset(1, 0).Select
End If
Next j
z = 1
For z = 1 To 14
If ActiveCell.Value = "" Then
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
l, TextToDisplay _
:=p & t
Merci de votre aide...