Hoe u gegevens automatisch van hoofd- naar subpagina's in Excel kunt overbrengen

Als u Excel gebruikt en automatisch gegevens van een basispagina naar bepaalde subpagina's wilt overbrengen wanneer aan een bepaalde voorwaarde is voldaan, wordt in dit artikel uitgelegd hoe u VBA ( Visual Basic for Applications ) gebruikt. Dit voorbeeld laat zien hoe u automatisch meerdere kolommen in één blad naar een ander overzet wanneer de waarde in een van de velden " Ja " is. De waarde van het voorwaardelijke veld kan naar behoefte worden gewijzigd.

Autotransfer Gegevens van Master naar Sub Sheets in Excel

Om te beginnen, opent u uw Excel- document en opent u het Microsoft Visual Basic for Applications-venster door op [Alt] + [F11] te drukken.

Zoek vervolgens uw bladen in de linkerkolom en dubbelklik op de master . De bladnamen zijn afhankelijk van wat u ze in Excel hebt genoemd. Het hoofdblad is het primaire blad waarop de gegevens voor het eerst worden ingevoerd en het subblad is de locatie waar de gegevens worden ingevuld. Plak vervolgens de volgende code in het grote witte veld:

 Particulier Subwerkblad_Wijzigen (ByVal-doel als bereik) Als Doorsnijden (doel, kolommen ("G")) niets is Verlaat dan Sub 'Wanneer er geen verandering is in' kolom G doe dan niets. 'De celwaarde die in kolom G is gewijzigd, wordt nu aangeduid als doel. If Target.Value = "Yes" Then 'Wanneer aan de voorwaarde is voldaan ("Ja" in kolom G), dan Bereik (Cellen (Target.Row, "A"), Cellen (Target.Row, "G")). Kopiëren _ Sheets (Target.Offset (0, -1) .Value) .Range ("A" & Rows.Count). End (xlUp) .Offset (1, 0) 'Kopieer de rij waar de wijziging is aangebracht in kolom A tot kolom G. 'Plak naar het blad vermeld in kolom F en naar de eerste beschikbare rij. End If End Sub

U kunt nu het venster Microsoft Visual Basic for Applications sluiten en uw bestand is nu gereed voor het automatisch overbrengen van gegevens die op het basisblad zijn ingevoerd naar de geselecteerde subbladen. Vergeet niet dat de macro alleen wordt uitgevoerd als er een wijziging is aangebracht in kolom G.

Bedankt aan TrowaD voor deze tip.