Netz-Treff

Nachricht aus dem Archiv

Jörg Lorenz schrieb am 28.October.2005, 05:33:12 in der Kategorie web.coding

VBA - Kopfgesteuert mit WHILE

Moin moin,

ergänzend zu Andreas\' Antwort noch ein paar Bemerkungen:

> Dim p As Single
> p = 4

Da verschwendest Du Speicher, der Typ Byte reicht.

> K = InputBox(\" Kapital? \", \"Kapital\")

Wie Andreas auch schrieb, solltest Du die Variablennamen günstiger wählen, neben der besseren Lesbarkeit findet man Fehler auch schneller. Hier würde sich z. B. anbieten:

curKapital

cur, deshalb damit man den Datentyp gleich erkennen kann.

Und was passiert, wenn man einen Text in die Inputbox eingibt?

> y = K
> X = 2 * K
> Do While y > x
> ...
> Loop

Hier kann die Schleife erst gar nicht anfangen, weil y ja schon kleiner als x ist. Wenn es anders wäre, wäre es eine Endlosschleife, weil die Abbruchbedingung nicht erreicht wird (siehe Andreas\' Antwort).

Hast Du eigentlich Option Explicit gesetzt?

Viele Grüße und viel Erfolg

Jörg

VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 27.October.2005, 19:05:41 - (web.coding)
- VBA - Kopfgesteuert mit WHILE MrCJ [Gast] - 27.October.2005, 20:22:57
  - VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 27.October.2005, 20:50:03
- VBA - Kopfgesteuert mit WHILE MudGuard - 27.October.2005, 20:02:14
  - VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 27.October.2005, 20:40:06
    - VBA - Kopfgesteuert mit WHILE Jörg Lorenz - 28.October.2005, 05:33:12
      - VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 29.October.2005, 18:01:00
        VBA - Kopfgesteuert mit WHILE Jörg Lorenz - 29.October.2005, 19:09:16
        VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 30.October.2005, 12:24:30
        VBA - Kopfgesteuert mit WHILE Jörg Lorenz - 30.October.2005, 13:34:11
        VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 30.October.2005, 14:14:42
        VBA - Kopfgesteuert mit WHILE Jörg Lorenz - 30.October.2005, 14:34:01
        VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 05.November.2005, 13:36:01
        VBA: Select Case und If Jörg Lorenz - 05.November.2005, 14:28:03
        VBA: Select Case und If MudGuard - 05.November.2005, 15:33:50
        VBA: Auswertung bei If Jörg Lorenz - 07.November.2005, 07:37:58
        VBA: Auswertung bei If MudGuard - 07.November.2005, 13:22:10
        VBA: Auswertung bei If Jörg Lorenz - 07.November.2005, 19:03:35
        VBA: Select Case und If Natascha [Gast] - 05.November.2005, 16:25:17
        VBA: Select Case und If Jörg Lorenz - 05.November.2005, 16:10:26
        VBA: Select Case und If Natascha [Gast] - 05.November.2005, 15:19:24
        VBA: Select Case und If Jörg Lorenz - 05.November.2005, 15:57:30
        VBA: Select Case und If Natascha [Gast] - 05.November.2005, 16:16:10
    - VBA - Kopfgesteuert mit WHILE MudGuard - 27.October.2005, 20:56:24
      - VBA - Kopfgesteuert mit WHILE Natascha [Gast] - 27.October.2005, 21:22:27