CADsite forum

Na het importeren "import stp_1" krijg je een pop-up venstertje zie "import stp_2" klik op sluiten, dan moet je even geduld hebben tit de stp file is geladen, je krijgt hiervoor een waarschuwing zoals in "import stp_3" klik op de blauwe tekst en zoom all, je stp komt te voorschijn "import stp4"

Succes 

Citaat van: EddyBeerke op di 08 12 2015, 13:13:33
Wellicht moet je alleen "Excel2013Test.LSP" laden en starten.
Probeer het eens en vertel wat er gebeurd.

Opgelost dank zij goede raad van Eddy

Geraak er niet uit 
Is er dan echt niemand die mij hier kan mee helpen 

Niemand die weet wat er hier fout gaat?

Dit probleem heb ik vroeger al eens gehad bij overschakeling van office 2007 naar 2010 en ik geraak er opnieuw niet uit.
Het heeft volgens mij te maken met de type library.

Ik krijg volgende fout bij het starten van mijn lisp:

Command:
RESET

Command:

Opening Excel Spreadsheet file...; error: no function definition: MSXL-GET-ACTIVESHEET


Wanneer ik dan de 2013Test.lsp laad en uitvoer werkt mijn lisp daarna wel.

Command: (LOAD "C:/Users/RS/Documents/Drawings/LISP/Constructie/Excel/Excel2013Test.lsp")
Gebruik het commando Test of Excel2010Test

Command: TEST

Initializing Microsoft Excel XP...
Creating new Excel Spreadsheet file...
De waarde in cel A1 is: NUM
De waarde in cel B1 is: LEN [m]

Nu roep ik mijn programa op en het werkt;

Command:
RESET

Command:

Opening Excel Spreadsheet file...
Specifieer invoegpunt:
Specifieer rotatie: rotate
Current positive angle in UCS:  ANGDIR=counterclockwise  ANGBASE=0.0000

Select objects:   1 found

Select objects:   1 found, 2 total

Select objects:
Specify base point:
Specify rotation angle or [Copy/Reference] <0.0000>:
Command:


Wat loopt hier fout ?

Citaat van: roy_043 op vr 04 12 2015, 09:42:55
Omdat de 2 macro's grotendeels hetzelfde zijn moet je in staat zijn om dit zelf te doen.

Gelukt 
Dank u nogmaals Roy 

Citaat van: roy_043 op do 03 12 2015, 21:48:15
De oplossing zou dus kunnen zijn:
Maak stap voor stap een lange string en zend die in 1x met ThisDrawing.SendCommand.

Dank u Roy deze oplossing werkt   
Maar zoals reeds gemeld ben ik niet zo goed in deze zaken, zou ik je mogen vragen de andere macro ook aan te passen ik zal je eeuwig dankbaar zijn 

Rudy

Is er dan niemand die me kan helpen 

Ben nog wat aan het experimenteren geweest en heb de macro aan de praat gekregen door hem te runnen vanuit het programma zelf (afb.1).
Als ik het echter opstart vanuit autocad (afb.2) krijg ik de fout in zoals de zien in (afb.3).
Dus denk ik dat er in de 2016 iets gewijzigd is wat invloed heeft op het runnen van een macro...

Iemand enig idee wat er hier fout loopt 

Citaat van: roy_043 op wo 02 12 2015, 15:22:25
Het is jou blijkbaar niet duidelijk dat de twee macro's nog meer variabelen aanpassen.
Ik zou allereerst eens proberen die 'Sys Var Monitor' helemaal uit te zetten.

Dat heb ik dus gedaan maar fout blijft zoals hierboven beschreven.
Het is dus wel degelijk zo dat deze programma's in autocad 2013 werken op deze moment
en als ik ze laad in 2016 doen ze het niet meer.

Hier nog 2 tekstbestanden met verloop van de programma's in acad 2013.
Daaronder het programma zelf.

Stephan,

Ik heb filedia uit de monitoring gehaald, maar fout blijft enkel melding is anders.
Volgens mij is er bij vba in acad 2016 iets gewijzigd waardoor deze niet meer hetzelfde werkt als in 2013.

Hier nogmaals de foutmelding met de nieuwe instelling

Command: _-vbarun
Macro name: C:/Users/RS/Documents/Drawings/VBA/layouttitelhoek-rsa.dvb!ThisDrawing.schaal

Command: filedia

Enter new value for FILEDIA <0>: 0

Command: Execution error


Ik denk dat de programma's niet worden afgewerkt maar weet niet hoe dit komt 

Niemand die mij hier kan helpen 

Citaat van: sschevers op di 01 12 2015, 09:49:48
Rudy,

Je kunt hier eens naar kijken:
https://www.cadlinecommunity.co.uk/hc/en-us/articles/203405742-AutoCAD-2016-System-Variable-Monitor

stephan

Ik denk dat dit niet van invloed is op mijn programma's
Mijn probleem blijft.

Hier nog wat uitgebreidere informatie over de foutmeldingen:

command: _-vbarun Initializing VBA System...
Macro name: C:/Users/RS/Documents/Drawings/VBA/kader+titelhoek-rsa.dvb!ThisDrawing.schaal
Command: grid

Specify grid spacing(X) or [ON/OFF/Snap/Major/aDaptive/Limits/Follow/Aspect] <10.00>: 20

Command: Execution error

En bij de andere:

Command: _-vbarun
Macro name: C:/Users/RS/Documents/Drawings/VBA/layouttitelhoek-rsa.dvb!ThisDrawing.schaal
Command: filedia

Enter new value for FILEDIA <1>: 0

Command: Execution error
**** System Variable Changed ****
1 of the monitored system variables has changed from the preferred value. Use SYSVARMONITOR command to view changes.

Ik hoop dat dit iets duidelijker is...