ワードテーブルから整数データを取得

Question

カラムの最後の行の値に基づいて編集したいワードテーブルがいくつかあります。最後の行の値が20を超える場合は、列の内容を削除します（指定した列の最後の行を除く）。

私は. Range. Textを使用しましたが、実装上の課題があります。私はこれを持っています

セルの内容を文字列ではなく計算用の整数として返すようにするにはどうすればよいですか？

Answer 1

VBAのVAL（）関数は、数値を含む文字列を数値に変換します。この関数は、左から始まり、数字以外の文字が現れるまで数字を認識し、その後のすべてを無視します。テキストに含まれるテキストの場合、テキストに含まれるEnd-Of-Cellマーカーが無視されるため、非常に便利です。

Dim C As Long 

For C = 1 To 3 
    With ActiveDocument.Tables(1) 
     If Val(.Rows.Last.Cells(C).Range.Text) > 20 Then 
      Debug.Print "Delete rows above" 
     End If 
    End With 
Next C