Thema Datum  Von Nutzer Rating
Antwort
24.05.2014 14:57:30 Steffi
NotSolved
Blau Erstes Zeichen in einem String löschen (Word-Tabelle)
24.05.2014 16:49:57 Gast28096
NotSolved
24.05.2014 18:04:33 Gast54126
NotSolved
25.05.2014 03:10:45 Gast17122
NotSolved

Ansicht des Beitrags:
Von:
Gast28096
Datum:
24.05.2014 16:49:57
Views:
1464
Rating: Antwort:
  Ja
Thema:
Erstes Zeichen in einem String löschen (Word-Tabelle)

Die Zellen von Tabellen in Word kann man so abarbeiten:

Option Explicit

Public Sub Test()
  
  Dim objTable As Word.Table
  Dim objRow As Word.Row
  Dim objCell As Word.Cell
  
  Set objTable = ThisDocument.Tables(1) '<- ggf. anpassen
  
  For Each objRow In objTable.Rows
    For Each objCell In objRow.Cells
      With objCell.Range
        Debug.Print "Cell(" & objCell.RowIndex & "," & objCell.ColumnIndex & ") = " & Left$(.Text, Len(.Text) - 2)
      End With
    Next
  Next
  
'ODER auch so:
'  Dim r As Long
'  Dim c As Long
'
'  For r = 1 To objTable.Rows.Count
'    For c = 1 To objTable.Columns.Count
'      With objTable.Cell(r, c).Range
'        Debug.Print "Cell(" & r & "," & c & ") = " & Left$(.Text, Len(.Text) - 2)
'      End With
'    Next
'  Next
  
End Sub

Das vom Text die letzten zwei Zeichen verworfen werden, liegt daran, dass diese beiden Zeichen stets Steuerzeichen (nicht darstellbare Zeichen) sind.

In deinem Fall brauchst du nur die äußere Schleife und gibts den Spaltenindex jeweils mit 1 und 3 fest an.

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
24.05.2014 14:57:30 Steffi
NotSolved
Blau Erstes Zeichen in einem String löschen (Word-Tabelle)
24.05.2014 16:49:57 Gast28096
NotSolved
24.05.2014 18:04:33 Gast54126
NotSolved
25.05.2014 03:10:45 Gast17122
NotSolved