<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic AutoCAD Table sheet nos in Visual LISP, AutoLISP and General Customization Forum</title>
    <link>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537059#M93849</link>
    <description>&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Ask autodesk.png" style="width: 999px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/593330i9317E23BD0A46D03/image-size/large?v=v2&amp;amp;px=999" role="button" title="Ask autodesk.png" alt="Ask autodesk.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
    <pubDate>Mon, 21 Jan 2019 10:52:17 GMT</pubDate>
    <dc:creator>Automohan</dc:creator>
    <dc:date>2019-01-21T10:52:17Z</dc:date>
    <item>
      <title>AutoCAD Table sheet nos</title>
      <link>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537059#M93849</link>
      <description>&lt;P&gt;&lt;span class="lia-inline-image-display-wrapper lia-image-align-inline" image-alt="Ask autodesk.png" style="width: 999px;"&gt;&lt;img src="https://forums.autodesk.com/t5/image/serverpage/image-id/593330i9317E23BD0A46D03/image-size/large?v=v2&amp;amp;px=999" role="button" title="Ask autodesk.png" alt="Ask autodesk.png" /&gt;&lt;/span&gt;&lt;/P&gt;</description>
      <pubDate>Mon, 21 Jan 2019 10:52:17 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537059#M93849</guid>
      <dc:creator>Automohan</dc:creator>
      <dc:date>2019-01-21T10:52:17Z</dc:date>
    </item>
    <item>
      <title>Re: AutoCAD Table sheet nos</title>
      <link>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537066#M93850</link>
      <description>&lt;P&gt;&lt;SPAN class="tlid-translation translation"&gt;&lt;SPAN class=""&gt;We need more information.&lt;/SPAN&gt;&lt;/SPAN&gt;&lt;/P&gt;</description>
      <pubDate>Mon, 21 Jan 2019 10:58:18 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537066#M93850</guid>
      <dc:creator>maratovich</dc:creator>
      <dc:date>2019-01-21T10:58:18Z</dc:date>
    </item>
    <item>
      <title>Re: AutoCAD Table sheet nos</title>
      <link>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537105#M93851</link>
      <description>&lt;P&gt;anybody else.... please!!&lt;/P&gt;</description>
      <pubDate>Mon, 21 Jan 2019 11:21:30 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537105#M93851</guid>
      <dc:creator>Automohan</dc:creator>
      <dc:date>2019-01-21T11:21:30Z</dc:date>
    </item>
    <item>
      <title>Re: AutoCAD Table sheet nos</title>
      <link>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537306#M93852</link>
      <description>&lt;P&gt;With not really much information to go on, try this&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;(defun c:Test (/ T_Pick T_Object T_Row T_Col T_Text T_Return)
   (if
      (setq T_Pick (ssget ":S" '((0 . "ACAD_TABLE"))))
      (progn
         (foreach T_Table (vl-remove-if '(lambda (T_Item) (listp (cadr T_Item))) (ssnamex T_Pick))
            (setq T_Object (vlax-ename-&amp;gt;vla-object (cadr T_Table)))
            (setq T_Row 0)
            (repeat (vla-get-Rows T_Object)
               (setq T_Col 0)
               (repeat (vla-get-Columns T_Object)
                  (if
                     (wcmatch (strcase (setq T_Text (vla-GetText T_Object T_Row T_Col))) "\(SHEET*")
                     (setq T_Return (cons T_Text T_Return))
                  )
                  (setq T_Col (1+ T_Col))
               )
               (setq T_Row (1+ T_Row))
            )
         )
      )
   )
   (reverse T_Return)
)&lt;/PRE&gt;</description>
      <pubDate>Mon, 21 Jan 2019 12:41:13 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/autocad-table-sheet-nos/m-p/8537306#M93852</guid>
      <dc:creator>DannyNL</dc:creator>
      <dc:date>2019-01-21T12:41:13Z</dc:date>
    </item>
  </channel>
</rss>

