Nutzen Sie die Excel-Datei über AutoCAD vba

[Pombia]

Hallo an alle, ein kleines Forum zu diesem Thema lesen konnte ich keine Lösung für dieses Problem finden.

mit diesem Code:

dim reg als acadtext
dim textreg als String
Dim ip(0 bis 2) als doppelt
dim x als Doppel, y als Doppel, z als Doppel, rot als Doppel

textreg = regionetext.text
x = 2.875
y = 10,4
Z = 0
ip(0) = x: ip(1) = y: ip(2) = z

set reg = thisdraw.modelspace.addtext(textreg, ip, 0.2)
reg.layer = 0
reg.color = acbylayer
reg.alignment = acalignmentcenter
reg.textalignmentpoint = ip

Ich möchte, dass der Textreg = aus einer Zelle einer Excel-Datei außerhalb des dgw genommen wird und nicht aus dem Textfeld, das ich in der Benutzerform eingegeben habe.

Kann mir jemand helfen?

 

[rpor66]

dim excelsheet als Objekt
Dateiname als Zeichenkette

Dateiname = "c:\tuofile.xls"
set excelsheet = getobject(Dateiname)

excelsheet.application.visible = true
Zelle = excelsheet.application.cells(1, 1)

Zelle contiene il valore della cella a1

buon divertimento

 

[Pombia]

Immer noch Probleme, wenn ich den Code hinzugefügt habe, verdirbt mich nicht dasselbe.

andere Lösungen?

 

[rpor66]

dvb enthält eine Funktion, die eine Zelle von Excel liest, die durch Dateiname, Zeile und Spalte beschrieben wird.
vba Verifikation, Werkzeuge/Referenzen müssen sich auf die Version von Excel im Einsatz beziehen.Wenn Sie Probleme haben, fragen Sie.
Bye

 

[Pombia]

Ich habe mit einem anderen Code gelöst und die Referenzen aktiviert. Dank für die Hilfe habe ich Probleme, weil sie an den ersten Armen sind

 

[rpor66]

ein seguito richiesta, posto un esempio di richiamo della funzione vlookup in excel

Sub testvlookup()

dim prova als String
dim obxls als Objekt
dim wkfile als Arbeitsbuch
dim shfile als Arbeitsblatt

set obxls = getobject(, "excel.application")

obxls.application.visible = true

wkfile = obxls.activeworkbook
set shfile = wkfile.activesheet
'set shfile = wkfile.worksheets(combobox1.text)prova = wkfile.application.worksheetfunction.vlookup("c", shfile.range("f1:g8"), 2, false)
'prova = shfile.application.worksheetfunction.vlookup(listbox2.list(x), shfile.range(l9, l28), 3, false)msgbox Test

Ende

p.s.: für Kinder
blaue Teile enthalten Ihre Einstellungen, Swap.
Bye

 

[kAndreak]

Bye to all,
Ich bin neu auf dem Feld und ich müsste eine vbs und vba realisieren.
autocad erlaubt es, die Attribute der ausgewählten Blöcke im Excel-Format zu exportieren.
was ich tun möchte, ist, den umgekehrten Prozess zu erstellen oder eine externe Tabelle in Excel in Autocad zu importieren, um die Blöcke zu aktualisieren, die ich will.
Ist das möglich?
Danke.

 

[rpor66]

in den Express-Abschnittsblöcken finden Sie den Befehl <import attribute="" information=""> Das ist es, was es braucht.</import>

 

[kAndreak]

in den Express-Abschnittsblöcken finden Sie den Befehl <import attribute="" information=""> Das ist es, was es braucht.</import>

Du meinst Express-Tools von Autocad, oder? Dann muss ich es in die Installation stecken.

 

[rpor66]

Code schreibt es Form. Wenn Sie diese Methode verwenden möchten und vba üben möchten, erstellen Sie eine Software in Excel, mit der Sie die txt-Datei bearbeiten können.

 

[kAndreak]

Code schreibt es Form. Wenn Sie diese Methode verwenden möchten und vba üben möchten, erstellen Sie eine Software in Excel, mit der Sie die txt-Datei bearbeiten können.

Ich habe es einfacher gelöst.
Ich importiert aus excel die .txt-Datei und sucessivamnete re beläuft die .txt-Datei modifiziert in autocad.

Danke.
ihr habt geholfen