Bir masa parçasının VBA verileri ile okuyun ve ihracat

[gio17]

Herkese merhaba

Bir sorunum var ve umarım uzmanlar bana yardımcı olabilir, sadece tüm masaya ihracat etmem gereken bir masa var, masayı vsa aracılığıyla okuma imkanı var ve ihtiyacım olan verileri okuyabiliyorum?

Bana düzelebilenlere teşekkürler

 

[tracciatura.net]

Bu makro ile çizimdeki tüm masaların tüm verilerini okuyun:

Public sub test_tabella()
dim acadentity olarak değil
dim table as acadtable
dim row as Full, column as Full

Her biri için budrawing.modelspace
Eğer (ent.objectname = "acdbtable") o zaman
Set table = ent
For row = 0 to table.rows - 1
sütun = 0 to table. sütunlar - 1
Debug.print "[r" & row & ",c" & column & "] -> " & table.getvalue(row, column, 0)
Bir sonraki sütun
Sonraki sıra
Sonunda, eğer sona erirse
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki

Sonunda alt alt