Robert Smidt
Gebruiker
- Lid geworden
- 26 mei 2009
- Berichten
- 901
Dag beste helpmijers,
Ik ben met een macro bezig dat een nummer zoekt in een van de vele bestanden in de mappen: C:/zoekmap1 en C:/zoekmap2. Als het nummer niet gevonden wordt hoeft het systeem niet verder te zoeken en wil ik een melding "nummer niet gevonden" en verder geen actie.
Mocht het nummer wel aanwezig zijn, dan wil ik diverse gegevens vanuit die regel kopi�ren naar een bestaand bestand (bibuoverzicht). Voor de duidelijkheid: al deze bestanden hebben dezelfde lay-out en bevatten dezelfde kolommen, alleen de data verschilt.
voorbeeld van kopi�ren van de gegevens van het bronbestand naar het bestemmingsbestand.
Workbooks("bibuoverzicht.xlsm").Sheets("Invulblad").Range("ir3").Offset(0) = ActiveCell.EntireRow.Range("bb1") 'personeelsnummer kopieren.
Ik hoop dat iemand mij hiermee kan helpen.
Alvast hartelijk bedankt.
Groeten, Robert
Ik ben met een macro bezig dat een nummer zoekt in een van de vele bestanden in de mappen: C:/zoekmap1 en C:/zoekmap2. Als het nummer niet gevonden wordt hoeft het systeem niet verder te zoeken en wil ik een melding "nummer niet gevonden" en verder geen actie.
Mocht het nummer wel aanwezig zijn, dan wil ik diverse gegevens vanuit die regel kopi�ren naar een bestaand bestand (bibuoverzicht). Voor de duidelijkheid: al deze bestanden hebben dezelfde lay-out en bevatten dezelfde kolommen, alleen de data verschilt.
voorbeeld van kopi�ren van de gegevens van het bronbestand naar het bestemmingsbestand.
Workbooks("bibuoverzicht.xlsm").Sheets("Invulblad").Range("ir3").Offset(0) = ActiveCell.EntireRow.Range("bb1") 'personeelsnummer kopieren.
Ik hoop dat iemand mij hiermee kan helpen.
Alvast hartelijk bedankt.
Groeten, Robert
Laatst bewerkt: