Variables en/of Bookmarks op meerdere plaatsen

[sarges]

Beste mensen,

Graag zou ik bij het volgende jullie hulp willen gebruiken.
Ik ben bezig om lijsten op te stellen die overeen komen met elkaar.
Ik heb bijvoorbeeld een ComboBoxen waar ik de keuze heb uit:
cbo1 cbo2. cbo3
KW01 DWL MU
WW01 KZA EA
KW02 USG BA
WW02...enz ILC......enz AA...enz

in cbo1 komen ook opvolgend 1,2,3,4...enz voor.
Als de specifieke KW01, KW02..enz wordt gekozen, dan zou ik in een andere tabel in het zelfde document deze gegevens ook willen plaatsen.

Voorbeeld gekozen in tabel A: KW01.....DWL........MU......EA...

Ook in tabel BA: KW01.....DWL........MU......EA...

Nu heb ik een frame met een dubbele rij comboboxen.
Als het een nummer betreft 1,2,3..enz dan hoeft de invoer niet naar tabel B
Maar met de invoer KW01..enz wel
De keuze 1,2,3 is met een bookmark
De keuze KW01.enz zijn met een docvariables.

Groeten Serge

ActiveDocument.Bookmarks("cm1").Range.Text = cbo1.Value
ActiveDocument.Bookmarks("cm2").Range.Text = cbo2.Value
    
With ActiveDocument
    For j = 1 To 2
      .Variables("cmo" & j) = Me("cbo" & j).Value
    Next
    .Fields.Update
  End With

Rijnummer = cbo1.ListIndex + 2
         Rijnummer = cbo2.ListIndex + 2

 

[sarges]

Het lukt om de ingevoerde gegevens op meerdere plekken te plaatsen.
Alleen als ik een volgende regel invoer, kom ik er niet uit hoe ik de docvariable over kan zetten zonder dat deze de eigenschap mee neemt van de vorige invoer.
Of dat de vorige invoer gewist wordt, want die moet juist blijven bestaan.

Serge

 

[snb]

Zoek in de hulpfunktie wat een docvariable is.
Als je de inhoud van een docvariabele wijzigt, wijzigt de tekst van ieder docvariable-veld.
Het is me niet duidelijk wat je vraagt.

 

[sarges]

Ik begrijp wat de docvariable inhoud.
Ik heb een bijlage als voorbeeld bijgevoegd.
Hoop dat het dan wat duidelijk wordt met wat ik bedoel.

 

[snb]

With ActiveDocument
    For j = 1 To 2
      .Variables("cmo" & j) = Me("cbo" & j).Value
    Next
    .Fields.Update
[COLOR="Blue"]    .Fields.Unlink[/COLOR]
End With

 

[sarges]

Geweldig, weer een stuk verder.
Weer enorm bedankt.

Serge

 

[snb]

Maar dit had je ook in de hulpfunktie van de VBEditor kunnen vinden.

 

[sarges]

Ik probeer alles eerst op te zoeken.
Maar voor een hobby/beginner is het best lastig zoeken.
Kheb nog nooit zo vaak een boek in mn handen gehad, of de helpfuntie geopend.

 

[snb]

Volgordesuggestie:
1. kijk in de hulpfunktie van de VBEditor
2. neem een macro op om na te gaan waarnaar je moet zoeken
3. bestudeer een boek (bijv. van Guy Hart Davis)
4. zoek op Officeforum of helpmij