Microsoft Excel

Herbers Excel/VBA-Archiv

runtime error 13

Betrifft: runtime error 13 von: lars
Geschrieben am: 27.08.2004 09:04:48

hallo!

wenn ich mein makro starte erhalte ich einen runtime error 13 in folgender zeile meines codes

i = Cells(k, 6) - Cells(3 + j, 6)

i ist ein double
k,j sind integer
die jeweiligen zelleinträge sind ebenfalls double

allerdings tritt dieser error nur beim erstmaligen ausführen nach windows-neustart auf. startet man das marko erneut funktioniert dies! ich freue mich über einen tip!
lars

  


Betrifft: AW: runtime error 13 von: Udo
Geschrieben am: 27.08.2004 09:06:15

Nicht zu sehen, wo die Variablen ihre Werte herbekommen.

Udo


  


Betrifft: AW: runtime error 13 von: lars
Geschrieben am: 27.08.2004 09:40:23

es handelt sich um einen type mismatch


  


Betrifft: AW: runtime error 13 von: Udo
Geschrieben am: 27.08.2004 09:43:04

Schön, aber es ist dennoch nicht zu sehen, wo die Variablen ihre Werte herbekommen.

Udo


  


Betrifft: AW: runtime error 13 von: lars
Geschrieben am: 27.08.2004 09:46:14

Application.Worksheets(Sname).Activate

For j = 1 To 13 'Kopf der Tabelle
Cells(j + 3, 1).Copy Destination:=Cells(3, 2 + j)
Next j

Application.Worksheets("Berechnung").Activate

For k = 4 To 16 'Spreads
For j = 1 To 13
i = Cells(k, 6) - Cells(3 + j, 6)
Worksheets(Sname).Cells(k, 2 + j).Value = i
Next j
Next k


  


Betrifft: AW: runtime error 13 von: Udo
Geschrieben am: 27.08.2004 09:51:05

Besser, du deklarierst die Variablen. Wahrscheinlich ist einer der Werte i nicht
numerisch.

Udo


  


Betrifft: AW: runtime error 13 von: lars
Geschrieben am: 27.08.2004 10:28:58

Dim i As Double
Dim j As Integer
Dim k As Integer
Const Sname = "1d"

die verwendenten variablen wurden so deklariert.
lars


  


Betrifft: AW: runtime error 13 von: Udo
Geschrieben am: 27.08.2004 10:31:54

Der Code ansich ist ok, nur, wenn eine der Zellen keine Zahl enthält, kommts zu dem Fehler.

Udo


  


Betrifft: AW: runtime error 13 von: lars
Geschrieben am: 27.08.2004 10:55:21

besteht die möglichkeit die zellen so zu formatieren, dass ihr inhalt eine zahl vom typ double ist?
lars


  


Betrifft: AW: runtime error 13 von: Udo
Geschrieben am: 27.08.2004 11:28:30

Ich weiß nicht, was in den Zellen steht, wenns keine Zahlen sind, kannst du auch nichts formatieren.

Udo