emielDS

of deze met een fout afhandeling. Factuur betaling (3).xlsm

ik heb u nog een stapje verder geholpen. Test Februari 2019 (1).xlsm De code kan veel korter maar ik hoop dat je ze nu begrijpt.

op blad1 een samenvatting per naam en een totaal Test Februari 2019 (1).xlsm

en als we nu nog mogen weten waar de uitslag moet staan kunnen we beginnen.

ik heb een heel bijzondere tip. plaats een voorbeeldbestand

met een voorbeeld bestand bedoelen wij zoiets. vergelijken.xlsx

in e1 =als(a1=d1;c1;"") of anders een klein voorbeeldbestand

Ik heb gezocht maar kan geen voorbeeldbestand vinden.

Deze doet het ook niet slecht denk ik CSI Voorraadbeheer PCB + COMPONENTEN (1).xlsm

en werkt het als beide bestanden open zijn?

een bestand met macro's moetje opslaan als xlsm of xlsb, anders verdwijnen de macro's en geelt hij natuurlijk een fout

dit is er een zonder macro maar met een draaitabel Excelissue (1).xlsx

of zo zonder knop?

bedoel je dit

Wanneer moeten die waarden gekopieerd worden? En waarom niet rechtstreeks in die cellen zetten in a1 kopieren en plakken in i1 rechtstreeks plaatsen Automatisch waarden plakken (1).xlsm

tel uw kosten samen deel dat bedrag door het totaal aantal verhuurde dagen en vermenigvuldig dat met de individuele dagen huur. zo kan je de rekening achteraf maken. Als er ondertussen iemand een overdosis genomen heeft weet ik niet waar je het verschuldigd bedrag moet halen.

blad is beveiligd. maar sorteren kan enkel als er geen samengevoegde cellen zijn.

of een voorbeeldbestand plaatsen met realistische cijfers, nu is uw auto op een bepaald moment drie keer verhuurd.

zo. eerste bestand (1) (1).xlsm

De macro staat achter het blad. Klik met rechts op de bladtab --> progammacode weergeven

Private Sub Worksheet_Change(ByVal Target As Range) zegt dat de macro moet werken als er iets veranderd op het werkblad If Not Intersect(Target, Range("b2")) Is Nothing Then zorgt ervoor dat de macro alleen werkt als er iets veranderd in cel B2 Set wb2 = Workbooks("tweede bestand (1).xlsm") is feitelijk niet nodig dient enkel om de volgende regel te verkort wb2.Sheets("blad1").Range("a500").End(xlUp).Offset(1).Resize(, 2).Value = Range("a2").Resize(, 2).Value End If End Sub wb2 is de verkorte versie van vorige regel .Sheets("blad1").Range("a500").End(xlUp) zoekt de laatste gevulde cel in kolom A .Offset(1) gaat naar de volgende rij .Resize(, 2).Value vergroot het bereik naar 2 cellen = Range("a2").Resize(, 2).Value zegt welke cellen moeten overgenomen worden De macro in de 2° map mag weg.

het gemakkelijkst is met een macro. Voorbeeld voor vraag pc forum .xlsm

beide bestanden openen eerste bestand (1).xlsm tweede bestand (1).xlsm

en het voorbeeldbestand?

Een voorbeeldbestand zou veel duidelijk maken.