Importare coordinate xyz da file xls, csv e ascii

[PlannerRoad]

IMPORT POINTS

http://www.abcautocad.it/download.a...load/ImportPoints/ABCAutoCAD_ImportPoints.exe

 

[PlannerRoad]

ImportXYZ

Excel, CSV, and any ascii file delimited with a space, comma, tab, enter (new line character) or any ascii file seperated by number of characters.
Import XY or XYZ coords from practically any type of file and:

• Draw a node on every point.
• Draw a circle on every point (input the diameter)
• Draw lines from point to point to point.
• Insert a block on every point.
• Insert a block and update the x y and/or z attributes on every point.

http://www.jefferypsanders.com/autolisp_IMPORTXYZ.html

Download:
http://www.jefferypsanders.com/IMPORTXYZ.zip

 

[PlannerRoad]

Ho fatto alcune modifiche all'utility ImportXYZ, in modo che ora possa funzionare anche sulla versione italiana di AutoCAD. La versione scaricabile dal sito JefferyPSanders gira, infatti, solo su quella inglese.
Non ho avuto modo di testare tutte le funzioni.
.

 

[zrarchitetti]

Ora c'è anche la versione aggiornata di ImportPoints. Permette di importare file di Excel, access, testo o tramite ODBC (praticamente moltissimi database) in AutoCAD.
Durante l'importazione da Excel a AutoCAD crea i blocchi convertendo le colonne di Excel (o della tabelle di origine) in coordinate x,y,z oppure attributi dei blocchi o anche usandole come indicazione del layer o del nome di blocco da inserire.
Lo si trova qui:
Plugin per importare da Excel a AutoCAD da ABC Corsi CAD

Ho fatto alcune modifiche all'utility ImportXYZ, in modo che ora possa funzionare anche sulla versione italiana di AutoCAD. La versione scaricabile dal sito JefferyPSanders gira, infatti, solo su quella inglese.
Non ho avuto modo di testare tutte le funzioni.
.

 

[leon25]

Salve. Ho scaricato il file .zip di IMPORTXYZ per la versione italiana di Autocad (il mio è Autocad Map 3D 2010) presente nel messaggio del 11-01-2012, posizionando nella cartella Support di Autocad i tre file presenti. Ho caricato il file .lsp nel gruppo di avvio con _appload, ho riavviato il programma, ho digitato IMPORTXYZ nella riga dei comandi, ma mi dà il messaggio di comando sconosciuto: vorrei sapere
- cosa sbaglio?
- quale formato e scrittura devono avere le coordinate da caricare e trasformare in punti in autocad?
- questa utility può funzionare anche sulle versioni di autocad in italiano successive alla 2010?
Grazie.

 

[GP.]

Cosa succede se da riga di comando digiti la stringa sottostante, comprese le parentesi?

(load "IMPORTXYZ")

 

[leon25]

Cosa succede se da riga di comando digiti la stringa sottostante, comprese le parentesi?

(load "IMPORTXYZ")

Nella riga di comando compare C:IMPORTXYZ e poi di nuovo Comando: e non accade nulla.
Ma con questa utility dovrebbe aprirsi una finestra?
Mi date qualche informazione? Grazie.

 

[GP.]

Nella riga di comando compare C:IMPORTXYZ

Questo vuol dire che il lisp è posto in una cartella (correttamente) letta dal path di AutoCAD.
Dopo questa operazione, ovvero il caricamento del lisp, devi solo digitare IMPORTXYZ, dovrebbe aprirsi una finestra di dialogo.

 

[ale.sap]

Ciao,
Ciao a tutti,
ho provato ad usare sia quello originale che quello caricato su questo blog, ma a me dà il seguente errore:
Extracting coords...; errore: tipo di argomento errato: numberp: nil
POtete aiutarmi a capire quale è il poblema?

Grazie,
Alessandra

 

[GP.]

Sembra non piacergli il file da importare, puoi postarlo?

 

[ale.sap]

Sembra non piacergli il file da importare, puoi postarlo?

Si infatti. Ho risolto,
ogni riga di coordinate era separata da una riga bianca.
eliminate quelle ha funzionato
stanotte alle 2 ho risolto ^^

Grazie mille, per avermi risposto! ))

Alessandra

 

[cicciocad]

Questo vuol dire che il lisp è posto in una cartella (correttamente) letta dal path di AutoCAD.
Dopo questa operazione, ovvero il caricamento del lisp, devi solo digitare IMPORTXYZ, dovrebbe aprirsi una finestra di dialogo.

Ciao, a me da errore dicendo caricamento non riuscito. mi dici precisamente dove devo copiare i file? grazie

 

[GP.]

Ciao, a me da errore dicendo caricamento non riuscito. mi dici precisamente dove devo copiare i file? grazie

In una qualunque delle cartelle indicate in Opzioni\File\Percorso di ricerca dei file di supporto, puoi crearne anche una nuova, basta che poi l'aggiungi.

 

[cicciocad]

In una qualunque delle cartelle indicate in Opzioni\File\Percorso di ricerca dei file di supporto, puoi crearne anche una nuova, basta che poi l'aggiungi.

grazie ho risolto

 

[GP.]

Prego :smile:

 

[Luisi]

IMPORT POINTS

http://www.abcautocad.it/download.a...load/ImportPoints/ABCAutoCAD_ImportPoints.exe

perchè va in bug???
testo di debug:
OpenFile.lStructSize = Len(OpenFile)
OpenFile.hwndOwner = Application.hwnd
#End If
OpenFile.lpstrFileTitle = OpenFile.lpstrFile
OpenFile.nMaxFileTitle = OpenFile.nMaxFile
OpenFile.lpstrInitialDir = InitDir
OpenFile.lpstrTitle = strTitle
OpenFile.flags = OFN_HIDEREADONLY Or OFN_OVERWRITEPROMPT Or OFN_CREATEPROMPT
'OpenFile.flags = 0
lReturn = GetSaveFileName(OpenFile)

If lReturn = 0 Then
SaveDialog = ""
Else
SaveDialog = Trim(Left(OpenFile.lpstrFile, InStr(1, OpenFile.lpstrFile, vbNullChar) - 1))
End If
End Function

Public Function OpenDialog(strTitle As String, ByVal Filter As String, ByVal InitDir As String) As String
Dim OpenFile As OPENFILENAME
Dim lReturn As Long
If Right$(Filter, 1) <> "|" Then Filter = Filter + "|"
Filter = Replace(Filter, "|", Chr(0))
OpenFile.lpstrFilter = Filter
OpenFile.nFilterIndex = 1
OpenFile.lpstrFile = String(257, 0)
#If VBA7 Then
OpenFile.nMaxFile = LenB(OpenFile.lpstrFile) - 1
OpenFile.lStructSize = LenB(OpenFile)
OpenFile.hwndOwner = Application.HWND32
#Else
OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
OpenFile.lStructSize = Len(OpenFile)
OpenFile.hwndOwner = Application.hwnd
#End If
OpenFile.lpstrFileTitle = OpenFile.lpstrFile
OpenFile.nMaxFileTitle = OpenFile.nMaxFile
OpenFile.lpstrInitialDir = InitDir
OpenFile.lpstrTitle = strTitle
OpenFile.flags = 0
lReturn = GetOpenFileName(OpenFile)

If lReturn = 0 Then
OpenDialog = ""
Else
OpenDialog = Trim(Left(OpenFile.lpstrFile, InStr(1, OpenFile.lpstrFile, vbNullChar) - 1))
End If
End Function

 

[Luisi]

ho reinstallato tutto per altri motivi ed adesso la carica la lsp, mi esce la finestra di dialogo.....volevo capire solo con quale metodo esportare i miei punti in ASCII affinche la lsp li interpreta in maniera corretta???...ho provato l'estrazione ASCII con: virgola, punto e virgola, tabulazione, spazio; ma in nessun formato li legge in maniera corretta.
Qualcuno mi riesce a dar una dritta??

 

[Luisi]

nessuno usa la lisp???...c'è qualcuno che mi riesce a dare una mano??

 

[irsda75]

c'è qualcuno che mi riesce a dare una mano??

Buonasera,

ho fatto diverse prove, ma non riesco a importare in cad un file ascii contenente numero punto, x, y, z, descrizione. Avrei bisogno di avere tutti questi elementi su layer diversi. L'obbiettivo è inserire la quota di un punto a fianco del punto stesso. Vi allego il file txt. Grazie dei suggerimenti.

 

[smemo]

in http://www.sepram.it/lisp.html
al punto 8 - Carica punti da file .txt
trovi un file lisp che potrebbe aiutarti