| Hvordan fortæller man i en makro, at man ønsker at arbejde på den aktuelle
 tabel - altså, den markøren eller afmærkningen er i. Problemet er, at jeg
 har mange tabeller i et dokument.
 
 Kan man aflæse tabellens nr. når man er i det - eller er der noget a'la
 "ActiveTable" (som ActiveDocument)
 
 Jeg har en kode, der ser sådan ud (uddrag):
 
 .......
 With Selection.Tables(1) <- her er problemet!!!!!!!!!!!!!!
 For I = StartRække To Selection.Information(wdEndOfRangeRowNumber)
 If Left(.Cell(I, Kol).Range, Len(.Cell(I, Kol).Range) - 2) <> ""
 Then
 Tekst = CDbl(Left(.Cell(I, Kol).Range, Len(.Cell(I,
 Kol).Range) - 2))
 TalTekst = Round(Tekst / 1000, 0)
 ActiveDocument.Tables(1).Cell(I, Kol + 2).Range.Text = TalTekst
 End If
 Next I
 End With
 ....
 
 Men det virker naturligvis kun på tabel 1 i dokumentet!
 
 Koden er i øvrigt en viderebygning på noget fra Mads - tak til dig Mads!
 
 
 --
 Henrik Hougaard
 fam.hougaard@nospam.stofanet.dk
 (Fjern .nospam i emailadresse.)
 
 
 --
 Henrik Hougaard
 fam.hougaard@nospam.stofanet.dk
 (Fjern .nospam i emailadresse.)
 
 
 
 
 
 
 |