Posted By

qrist0ph on 01/07/10


Tagged

excel


Versions (?)

Make Trac Table


 / Published in: Visual Basic
 

  1. Sub makeTracTable()
  2. s = "||"
  3. For Each zeile In Selection.Rows
  4. For Each zell In zeile.Cells
  5. s = s & zell.Value & "||"
  6. Next zell
  7. s = s & Chr(13) & Chr(10) & "||"
  8. Next zeile
  9. Debug.Print s
  10. End Sub

Report this snippet  

You need to login to post a comment.