Door laten lopen tabel bij aanpassen database

[mike564]

Goedemorgen,

Ik wil graag binnen Excel automatisch een tabel laten uitrollen aan de hand
van de aanpassingen die worden gedaan binnen de database. Ik heb dit geprobeerd
aan de hand van een draaitabel, maar kom er op deze manier niet uit omdat er
ook nog aanpassingen in moeten worden gemaakt.
In het bijgevoegde excelbestand heb ik het handmatig gedaan,
maar geeft wel een beetje een idee waar ik naar toe wil, namelijk dat de tabel wordt
uitgebreid (ook met opmaak, formules ed.) naarmate ik de database aanpas.

Bij voorbaat dank, ik hoor graag wat er mogelijk is

Mike

 

[Cobbe]

Maak er tabellen van.

 

[mike564]

Bedankt voor de snelle reactie!
Maar volgens mij lost dat mijn probleem niet op.
Ik wil namelijk dat de grootte van de tabel automatisch wordt aangepast
zodat het er uit komt te zien zoals in het voorbeeld (overal een regel tussen).
Ik zou het op deze manier (als ik het goed begrijp) alsnog elke keer handmatig
aan moeten passen. Misschien dat ik ook de verkeerde formule heb gebruikt in
de eerste kolom, maar ik kom er op deze manier in ieder geval nog niet uit.

 

[andre@home]

Excel is geen database... bij een database als bijv Access kun je rapporten in een gewenst format opmaken, vooraf... en dat is precies wat jij wilt...

 

[VenA]

Als je via een copy insert twee rijen wil invoegen dan moet je er eerst voor zorgen dat de formule consistent is.

=ALS(IS.EVEN(RIJ());INDIRECT("Database!A"&AFRONDEN((RIJ()-3)/2;0)+4);"")

Om een nieuw project toe te voegen heb je VBA nodig.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Address = Range("E" & Cells(Rows.Count, 5).End(xlUp).Row).Address And Target.Count = 1 And UCase(Target.Value) = "F" Then
   With Sheets("Weekplanning")
        lr = .Cells(Rows.Count, 1).End(xlUp).Row - 1
        .Rows(lr).Resize(2).Copy
        .Rows(lr + 2).Insert Shift:=xlDown
        .Cells(lr + 1, 4).Resize(, 50).ClearContents
        Application.CutCopyMode = False
    End With
End If
End Sub

 

[mike564]

Dit is precies wat ik zoek! duizendmaal dank!

Ik had eigenlijk ook nog een andere vraag.
wanneer er in het opdrachtenboek (de database) aan 2 criteria wordt voldaan,
namelijk wanneer een opdracht lopend is en de fabricage in moet, dat er bepaalde
gegevens moeten worden overgenomen in een nieuw werkblad 'lopende projecten'.
Nu is dit niet zo'n probleem, maar ik zou graag alle gegevens onder elkaar willen hebben
zonder dit met sorteren te doen. De bijlage geeft misschien meer duidelijkheid