Macro om Tabel grote te wijzigen

[Tweety1]

Hi,

Ik heb Excel bestand waar ik 2 tabellen in heb zitten. Tabel 1 wordt gevuld met de gegevens uit een query (knippen en Plakken),tabel past zich automatisch aan. Zodra alles is gedaan zet ik in Kolom AF "JA" en druk ik op gegevens verplaatsen. De gegevens worden dan geknipt en geplakt op Blad 2. Op blad 2 wordt de tabel niet doorgetrokken. Hoe kan ik dit oplossen?


Bekijk bijlage 196325

Mvg
Kasper

 

[snb]

Bedoel je de tabel grootte ?

Maak van de tabel in Blad 2 een databasequery naar tabel 1.

 

[Tweety1]

Klopt gaat om de tabel grootte. De oplossing die je geeft zou ik kunnen realiseren door een extra tabblad te maken.
Tabel 1 op blad 1 wil ik de regel helemaal uit hebben. Het liefst zonder extra tabblad

 

[snb]

Jij hebt het zelf over Blad 2

 

[Tweety1]

Heb het ondertussen opgelost door de volgende macro:

Sub Tabelgrootte_Wijzigen()
Dim Bottom As Long
Bottom = Range("D65536").End(xlUp).Row
ActiveSheet.ListObjects("Test2").Resize Range("$A$7:$AL" & Bottom)
End Sub