• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Cellen met vba laten invullen

Status
Niet open voor verdere reacties.

JoGoSoft

Gebruiker
Lid geworden
6 sep 2007
Berichten
13
Wekelijks worden er standen opgenomen die weer verwerkt worden in diverse bestanden.
Zie voorbeeld bestand!
Omdat het originele bestand 1200 rijen bevat is het opnemen een hele klus.
Om tijd te besparen voor degene die de standen opneemt wil ik cellen waar de stand niet veranderd is merken met een sterretje *.
Dit kunnen wel een paar honderd rijen zijn.
De * standen moeten nadien ingevuld worden en nu had ik bedacht om dit automatisch met vba te laten doen.
Is dit mogelijk en kan er iemand voor mij een opzetje maken met eventuele uitleg, mijn vba kennis is maar zeer beperkt.

Bij voorbaat dank,
Johan
 

Bijlagen

  • Voorbeeld.xls
    34,5 KB · Weergaven: 28
Zoiets

Code:
Sub tsh()
    Dim lRow As Long
    
    lRow = Cells(Rows.Count, 1).End(xlUp).Row
    Range("B2:B" & lRow) = Evaluate("if(B2:B" & lRow & "=""*"",A2:A" & lRow & ",B2:B" & lRow & ")")
End Sub
 
TimShel,

Bedankt voor de snelle oplossing. Werkt Perfect!

Bij deze is mijn vraag opgelost.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan