Extra data toevoegen in bestaande documenten

[marc651]

Ik zou graag in de toegevoegde documenten het volgende willen;
In document BBH3; De waarde van de cellen C22 & C23 gekopieerd naar document BBH1 Kolom B & C als de docentcode in Kolom D Matcht met de waarde van Cel C21 in document BBH3.
Er staat al een code in document BBH3. Die zou ik graag aangevuld hebben.

Bekijk bijlage BBH1.xlsmBekijk bijlage BBH3.xlsm

 

[DutchOirs]

Goedemiddag Marc,

Zie alleen 1 bestand (BBH3 met 1 werkblad?

en geen knoppen?

 

[marc651]

BBH1 staat er naast. Vergeten een spatie er tussen te zetten.
De knop staat helemaal bovenaan in het document(BBH3) over L12.

 

[VenA]

De cellen C22 en C23 zijn leeg. Deze cellen staan al in de variabele ar dus het wegschrijven zou toch niet zo moeilijk moeten zijn.

If IsNumeric(r) Then
      .Cells(r, 7).Resize(, 86) = Split(c00, "|")
      [COLOR=#FF0000].Cells(r, 2).Resize(, 2) = Array(ar(2, 2), ar(3, 2))[/COLOR]
      Else
      MsgBox ar(1, 2) & " is niet gevonden. Controleer of de code juist is. Anders voeg hem toe onder aan de lijst"
    End If

 

[snb]

En begin met het verwijderen van alle samengevoegde cellen.

 

[marc651]

Veel dank wederom.
Werkt goed.