Hoe de tabel uitbreidbaar te houden door een tabelrij in een beveiligd werkblad in te voegen in Excel?
De automatisch uitbreidende functie van de tabel gaat verloren nadat het werkblad in Excel is beveiligd. Er is bijvoorbeeld een tabel met de naam Table1 in uw beveiligde werkblad. Wanneer u iets typt onder de laatste rij, wordt de tabel niet automatisch uitgebreid met de nieuwe rij. Is er een methode om de tabel uitbreidbaar te houden door een nieuwe rij in een beschermd werkblad in te voegen? De methode in dit artikel kan u helpen om dit te bereiken.
Houd de tabel uitbreidbaar door de tabelrij in een beveiligd werkblad met VBA-code in te voegen
Zoals hieronder een screenshot wordt getoond, is een tabel met de naam Table1 in uw werkblad en de laatste kolom van de tabel een formulekolom. Nu moet u het werkblad beschermen om te voorkomen dat de formulekolom verandert, maar laat u de tabel uitvouwen door een nieuwe rij toe te voegen en nieuwe gegevens toe te wijzen aan de nieuwe cellen. Doe het als volgt.
1. klikken ontwikkelaar > bijvoegsel > Button (Form Control) invoegen van een Formulierbeheer knop in uw werkblad.
2. In het opduiken Macro toewijzen dialoogvenster, klik op de New knop.
3. In de Microsoft Visual Basic voor toepassingen venster, kopieer en plak de onderstaande VBA-code tussen de Sub en End Sub paragrafen in de Code venster.
VBA-code: houd de tabel uitbreidbaar door de tabelrij in een beveiligd werkblad in te voegen
1). In de code is nummer "123" het wachtwoord dat u zult gebruiken om het werkblad te beschermen.
2). Wijzig de tabelnaam en de naam van de kolom die de formule bevat die u wilt beschermen.
3). En verander de offset in de code Selection.Offset (1, -4). Selecteer de eerste doelkolom van de tabel. Als er bijvoorbeeld zes kolommen in de tabel staan, wijzigt u de offset in (1, -5).
4. druk de anders + Q om het venster Microsoft Visual Basic for Applications te sluiten.
5. Selecteer de cellen in de tabel die u nodig hebt om nieuwe gegevens toe te wijzen, met uitzondering van de kolom Formule en druk vervolgens op Ctrl + 1 toetsen om de te openen Cellen opmaken dialoog venster. In de Cellen opmaken dialoogvenster, verwijder het vinkje Op slot in en klik op de OK knop. Zie screenshot:
6. Bescherm nu uw werkblad met een wachtwoord dat u hebt opgegeven in de VBA-code.
Vanaf nu, nadat u op de knop Formulierbeheer in uw beveiligde werkblad hebt geklikt, wordt de tabel uitgevouwen door een nieuwe rij in te voegen zoals hieronder afgebeeld.