Excel cel op werkblad vullen vanuit voorblad obv voorwaarde

[Verwijderd]

Goedemiddag, ik zit met de volgende situatie, mogelijk heeft iemand hier een oplossing voor:
ik zal het zo goed mogelijk proberen te verwoorden..

In Excel krijg ik data aangeleverd (input-file)
Hiermee wil ik op achterliggende werkbladen de cellen in laten vullen.

m.b.v. een macro, laat ik vanuit de input-file, Kolom A, nieuwe werkbladen (formulier) aanmaken voor zover kolom A gevuld is, met de waarde in kolom A van de betreffende cel als werkblad naam.

Bijv.: Cel A1 heeft als waarde "test1" dan heet het 1e werkblad "test1" en cel A2 heeft als waarde "probeer1" dan heet het 2e werkblad "probeer1", enz., enz..

Nu staan in de werkbladen (formulieren) cellen welke gevuld moeten worden met de waardes uit de input-file.
Diverse cellen op werkblad "test1" moeten gevuld worden met verschillende cellen uit de rij waar in kolom A "test1" staat.

bijv.: van het werkblad "test1" moet:
-cel B3 gevuld worden met de waarde afkomstig uit de input-file kolom H bij (rij) test1
-cel D4 gevuld worden met de waarde afkomstig uit de input-file kolom K bij (rij) test1

tegelijk moet in werkblad "probeer1":
-cel B3 gevuld worden met de waarde afkomstig uit de input-file kolom H bij (rij) probeer1
-cel D4 gevuld worden met de waarde afkomstig uit de input-file kolom K bij (rij) probeer1

ikzelf zit te denken om het te doen aan hand van voorwaarden.

Wanneer de naam van werkblad gelijk is aan waarde in kolom A van de input-file (deze rij selecteren) en cel B3 vulllen met waarde uit kolom H en cel D4 met de waarde uit kolom K.

-----------------------------

if sheetname = "value" in columnA row "x" > set row"x"
value B3 = value of worksheet input-file! H"x"
and
value D4 = value of worksheet inputfile! K"x"

------------------------------

ik hoop dat iemand een oplossing voor mij heeft.


Dit alles doe ik met Excel office 365


alvast bedankt voor jullie reacties..

[g0tanks]

Volgens mij zit je in de goede richting te denken. Wat weerhoudt je er van om het te implementeren in VBA en uit te proberen?

In ieder geval heb je nodig:

code:

Sheets.Add.Name = Range("A1").Value