VBA probeer op waarde te zoeken in cellen met verwijzingen,

[Haghina]

In VBA ben ik het volgende aan het proberen:

Op het tabblad "voorraadcontracten" heb ik een opvoerscherm gemaakt waar nieuwe contracten met goederen kunnen worden opgevoerd.gekoppeld aan bepaalde transporteurs.

Op het tabblad "saldo voorraadcontracten" moet er vervolgens in kolom a naar de juiste rij gezocht worden voor de betreffende transporteur..
En vervolgens in rij 2 naar de overeenkomstige goederen om de juiste kolom te bepalen.

Dit lukt prima zolang ik de namen van goederen en transporteur rechtstreeks in de cellen invoer. Wat ik echter graag wil is dat ik deze cellen een verwijzing laat zijn naar het tabblad "adressen". Ofschoon er in de cellen ogenschijnlijk hetzelfde blijft staan worden nu de juiste waardes niet meer gevonden.

Wat ik nu gebruik is:
Dim Transporteur As String
Dim finalrow As String
Dim finalrow2 As String
Dim I As Integer
Dim j As Integer
Dim k As Integer

finalrow = Sheets("Voorraadcontracten").Range("A3").End(xlDown).Row 'definieer het aantal nieuwe contracten
finalrow2 = Sheets("SaldoVoorraadcontracten").Range("A3").End(xlDown).Row 'definieer het aantal bestaande transporteurs met een contract

For I = 3 To finalrow
Transporteur = Sheets("Voorraadcontracten").Cells(I, 1)
For j = 3 To finalrow2
If Sheets("SaldoVoorraadcontracten").Cells(j, 1) = Transporteur Then

Heb iig ontdekt dat ik Transporteur kan laden door er .Value achter te zetten. Het dikgedrukte gedeelte dient echter nog aangepast te worden zodat deze "door de verwijzing heen kijkt".

Wie heeft er een tip?

[xFeverr]

Dus je wil de waarde van 'Transporteur' vergelijken met de waarde voor de '=' (de cel) ? Dan zul inderdaad .Value (= een property van Transporteur) moeten gebruiken, daarmee krijg je de waarde van ’Transporteur'. Wellicht dat er voor de Cel ook zo'n property is?

Ik weet zelf niet zo veel van Excel + VBA.

Tip: zet je code is tussen code-tags.

[ Voor 15% gewijzigd door xFeverr op 18-02-2018 20:17 ]