Vraag : De auto voegt een nieuwe rij in een vorm in Word toe

Ik heb een woordvorm die ik wil sluiten. Bij de bodem van de vorm heb ik een lijst van de tijdlijn die moet worden ingevuld. Wat ik wil gebeuren is dat wanneer een gebruiker in het gebeurtenisgedeelte van de tabel 1 wil de lijst aan auto binnengaat een rij toevoeg aangezien de gebruiker niet to. zal kunnen
Attachments:
van
Email-Related-Incident.doc (67 KB) Example file
Related Oplossingen: auto van de Lijst van de Cell- Lijst Row toevoegt

Antwoord : De auto voegt een nieuwe rij in een vorm in Word toe

Dit zal een nieuwe rij met nieuwe formfields toevoegen. Het maakt zich van de huidige cel los en verbindt het met de nieuwe laatste cel.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:

Sub NewRow ()
    Schemerige tbl als Lijst
    Schemerige rw als Rij
    Schemerig cl als Cel
    Schemerige ffld als FormField
    
    ActiveDocument.Unprotect 'wachtwoord
    Reeks tbl = Selection.Tables (1)
    
    'verwijder EntryMacro uit huidige laatste cel
    Plaats cl = Selection.Cells (1)
    Plaats ffld = cl. Range.FormFields (1)
    ffld.EntryMacro = ""
    
    Vastgesteld rw = tbl. Rows.Add
    Voor Elk cl in rw. Cellen
        ActiveDocument.FormFields.Add cl. Waaier, wdFieldFormTextInput
        Als cl.ColumnIndex = rw. Cells.Count toen
            Reeks ffld = cl. Range.FormFields (1)
            ffld.EntryMacro = „NewRow“
        Eind als
    Volgende cl
    ActiveDocument.Protect wdAllowOnlyFormFields, Waar ', wachtwoord
Sub van het eind
Andere oplossingen  
 
programming4us programming4us