Programma sneller maken.

[yaryd]

Hallo, trug een vraagje;

als je vba cad laat draaien zie je in een rap tempo wat er juist gebeurt met je programma, kan je dit uitschakelen? want dit vraagt veel werk van je processor. Als dit zou uitgeschakeld zijn, werkt je programma een beetje rapper.

in vba excel heb ik vernomen bij een mede stagestudent dat dit volgende code is en deze werkt niet in autocad

Application.DisplayAlerts = false

Mvg,

yaryd

 

[henkhoogerbrug]

dan krijg je de popups niet te zien, met onderstaande code wordt het scherm niet iedere keer ververst (werkt in Office, weet niet of dit in CAD ook werkt):

Application.ScreenUpdating = False

 

[yaryd]

hallo,

Nee, juist geprobeerd en in Cad werkt dit ook niet. Iemand een ander idee??
Toch bedankt om te helpen.

grtn

yaryd

 

[Floor E]

Is dat niet de echo functie?

 

[yaryd]

Is dat niet de echo functie?

Nog nooit van gehoord? Wat houdt dat juist in?

 

[AlexV]

Maak van je cad een object, die kun je vervolgens pas late zien als die klaar is.

Object.Visible = False

 

[yaryd]

Hallo,

dank isda dan "dim acad as object"?

grtz

 

[Floor E]

Over de Echo functie vind je hier infomatie.
Zie kopje Leaving Echo off. Inclusief voorbeeld code.

 

[yaryd]

Alvast een bedankt voor de mensen die (ons stagestudenten) willen helpen.

voor die echo zal ik maar achter het weekend kunnen kijken, werkdag bijna gedaan en int weekend trek ik mij daar niets van aan

mvg,

yaryd

 

[AlexV]

Ja maar daar naar moet je die ook nog

Set acad = New Application

Wel dan de rest van de code "acad" gebruiken.

Weet niet hoe die er uit ziet.

Hier een voorbeeld dan een Workbook/Sheet als Objects

Dim xlApp as Excel.Application
Dim xlSh1 as Excel.Worksheet

Set xlApp = New Excel.Application
xlApp.Visible = False

Set xlSh1 = xlApp.Workbooks(1).Worksheets(1)

xlSh1.Cells(1,1).Value = "Hallo Wereld"

xlApp.Visible = True

Set xlApp = Nothing
Set xlSh1 = Nothing