|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
24.08.2010 09:42:39 |
Helpless |
|
|
|
24.08.2010 14:54:06 |
Severus |
|
|
|
25.08.2010 12:32:51 |
helpless |
|
|
 Aw:Aw:Aw:beschleunigen von Berechnungen in VBA |
25.08.2010 13:58:29 |
Severus |
|
|
|
26.08.2010 11:05:08 |
helpless |
|
|
|
26.08.2010 11:26:19 |
Severus |
|
|
|
26.08.2010 12:07:38 |
helpless |
|
|
Von:
Severus |
Datum:
25.08.2010 13:58:29 |
Views:
997 |
Rating:
|
Antwort:
|
Thema:
Aw:Aw:Aw:beschleunigen von Berechnungen in VBA |
helpless schrieb am 25.08.2010 12:32:51:
Severus schrieb am 24.08.2010 14:54:06:
Sorry, das ist mir zu kryptisch!
Was genau willst Du wo berechnen und wohin soll es geschrieben werden?
Da braucht man schon ein bißchen mehr Informationen.
Du wirst ja kaum "5 x 100" berechnen lassen, oder?
Gruß Severus
Sorry bin halt nicht sonderlich erfahren mit VBA:-)
Also: Mein Programm bezieht aus einer Stoffdatenbank , Stoffeigenschaften wie ZB. die Molmasse eines Stoffes. Daraus berechnet er mir die Stoffanteile in einem zwei Komponenten gemisch. Sprich wieviel von jedem Stoff im Gemisch vorhanden ist. Nun rechnet er mir für jeden Prozent die dazugehörige Temperatur aus und gibt mir die Anteile des anderen Stoffes im Gemisch als Prozent aus. So bekomme ich pro Temperatur 5 Werte und das eben von 0-100% eines Stoffes in einem Gemisch! Gleicgewichtsberechnung nennt man das ganze!
So und eben das geht so laneg bis er die 100 Werte durchgerechnet hat. Das Programm funktioniert nur er braucht über eine Minute dafür. Weisst du warum oder was ich tun kann. Liegt es an den DIM's?
Tja, die genauen Rechenoperationen sehe ich so natürlich immer noch nicht.
Wenn sie nicht unter Urheberrecht fallen, maile mir das doch mal zu unter
severus at thebat dot net
Sonst fällt mir hier nur ein, daß Du eventuell die Daten direkt in ein Arbeitsblatte schreiben läßt und ggf. während der Berechnung verschiedene Zellen oder Arbeitsblätter selektierst. Wenn dazu die Bildschirmanzeige eingeschaltet ist kostet das viel Zeit. Das gilt auch, wenn in der Arbeitsmappe Events abgefangen werden, also Prozeduren wie
"Private Sub Workbook_Activate()"
"Private Sub Worksheet_Change(ByVal Target As Range)"
"Private Sub Worksheet_SelectionChange(ByVal Target As Range)"
oder andere definiert sind. Hier können diese Prozeduren, die bei jeder Änderung, die durch Dein Rechenprogramm in der Arbeitsmappe erfolgt, wieder unf wieder ablaufen.
Als "Erste Hilfe" schreib mal direkt nach den Deklarationen
Sub Irgendwas()
Dim abc As xyz...
Application.ScrenUpdating = False
Application.EnableEvents = False
... Deine Prozedur...
Application.ScrenUpdating = True
Application.EnableEvents = True
End Sub
Das könnte schon mal helfen.
Severus
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
24.08.2010 09:42:39 |
Helpless |
|
|
|
24.08.2010 14:54:06 |
Severus |
|
|
|
25.08.2010 12:32:51 |
helpless |
|
|
Aw:Aw:Aw:beschleunigen von Berechnungen in VBA |
25.08.2010 13:58:29 |
Severus |
|
|
|
26.08.2010 11:05:08 |
helpless |
|
|
|
26.08.2010 11:26:19 |
Severus |
|
|
|
26.08.2010 12:07:38 |
helpless |
|
|