ID in een cel?

[gaskearl]

Geodenmiddag heren en dames,


laat ik eens een vraag stellen na het zoekwerk.

Als eerste het gedeelte code waardoor mijn vraag ontstaat:

For Each I In Range(Cells(Target.Row, StartKolom), Cells(Target.Row, WeekKolom))​

'tellen van opgegeven realisatie en bijwerken van prognose tot/vanaf deze week

If I.Value > 0 And I.FormatConditions(1).Interior.Color <> 10213316 And I.FormatConditions(1).Interior.Color <> GetalKleur Then​

provar1 = I.Interior.Color​

provar2 = I.FormatConditions(1).Interior.Color​

IDentificatie = I.ID​

adres = I.Address​

I.ID = "probeersel"​

' I.ClearContents​

End If​

Prognose = Prognose + I.Value​

Next​

ik probeer in de range (rij cellen) aan de hand van kleuren in .Interior te bepalen of er actie op de cel uitgevoerd moeten worden.
Nu loop ik tegen het probleem dat sommige cellen wel en sommige niet voorwaardelijk opgemaakt zijn terwijl dit juist de voorwaarde bevat voor de uit te voeren acties.

In het venster 'lokale variabelen' heb ik dus eens gekeken of er niet iets was waar ik kan schrijven en lezen en dit vond ik in I.Id en I.MDX. Zie ook het probeersel : I.ID = "probeersel"

Mijn vraag: Als ik via VBA iets schrijf in 'I.Id', blijft dit gegeven van de cel staan of wordt dit ergens anders in/door Excel nog veranderd?

Alvast erg bedankt voor jullie antwoord...

 

[VenA]

Om te kijken of er VO in het bereik staat.

For Each I In Range(Cells(Target.Row, StartKolom), Cells(Target.Row, WeekKolom)).specialcells(-4172)

 

[gaskearl]

Beste VenA,

uw antwoord doet precies wat ik zocht. Hartelijk dank hiervoor
Vandaag weer wat geleerd.

Echter moet ik wel ergens anders wat aanpassen maar dat gaat lukken...

Ik zet de vraag op opgelost en ga niet de ID van de cel gebruiken.