Excel-sheet

[Mighty Mask]

Is het mogelijk dat als je (Zie voorbeeld.zip) cel C1 of D1 selecteert door bijv een x te plaatsten dat de getallen eronder worden gekopieert naar kolom F.

Dus als je C1 selecteert dan komt erin F3:1 F4:3 en in F4:5 te staan.

Als je D1 selecteert dan komt erin F3:3 F4:3 en in F4:5 te staan

Alvast bedankt.

 

[Jhon van der Bo]

In cel B1 en C1 heb ik een drop-down menu geplaatst zodat men hier allen maar NIETS of een KRUISJE kunt ingeven.
Met een formule gaat het wel. Het nadeel hierbij is dat je zelf géén gegevens in deze kolommen kunt ingeven (E3:F26) >> anders is de formule weg.

Zie bijlage

Jhon

 

[Ingrid B]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Intersect(Target, [C1:D1]) Is Nothing Then
    Dim k, r As Integer
    k = Target.Column
    For r = 3 To 5
      Cells(r, 6) = Cells(r, k)
    Next r
  End If
End Sub

Kopieer de macro naar de werkblad-code.