Andre175
Gebruiker
- Lid geworden
- 2 feb 2018
- Berichten
- 351
goedemorgen
Onderstaande code zou moeten starten wanneer de waarde van Sheets("Bijlage_2").Range("D8") wijzigt.
waar (en hoe) moet ik code plaatsen zodat deze alleen actief wordt zodra de waarde van Sheets("Bijlage_2").Range("D8") wijzigt.
Als ik de code hier plaats
dan zal deze actief worden bij elke wijziging op dit blad, hetgeen overbodig is lijkt me
Onderstaande code zou moeten starten wanneer de waarde van Sheets("Bijlage_2").Range("D8") wijzigt.
Code:
Sub ID_Deb_bepalen()
With Sheets("debiteuren")
For i = 2 To .Range("A" & Rows.Count).End(xlUp).Row
If .Cells(i, 3) = Sheets("Bijlage_2").Range("D8") Then
Sheets("Bijlage_2").Range("B1") = .Cells(i, 1)
End If
Next i
End With
End Sub
waar (en hoe) moet ik code plaatsen zodat deze alleen actief wordt zodra de waarde van Sheets("Bijlage_2").Range("D8") wijzigt.
Als ik de code hier plaats
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub