title image


Smiley Re: Letzte beschriebene Zeile einer Tabelle per VBA :Nachtrag
Hallo Hubert,

scheint mit -2 richtig zu sein. Ich kann mich aber erinnern, da auch mal was ungewöhnliches gehabt zu haben. Finde es leider nicht mehr. Ich habe mal ein Bild beigefügt, auf dem man sieht, was ich meine.



GRuß

Artur



Public Sub TesteZelle()

Dim sText As String

MsgBox ActiveDocument.Tables(1).cell(1, 1).Range.text

sText = ActiveDocument.Tables(1).cell(1, 1).Range.text

sText = Mid(ActiveDocument.Tables(1).cell(1, 1).Range.text, 1, _

Len(ActiveDocument.Tables(1).cell(1, 1).Range.text) - 1)



sText = Mid(ActiveDocument.Tables(1).cell(1, 1).Range.text, 1, _

Len(ActiveDocument.Tables(1).cell(1, 1).Range.text) - 2)

End Sub



geschrieben von

Anhang
Bild 453 zu Artikel 51016

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: