Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
664to668
664to668
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Laufzeitfehler, weshalb?

Forumthread: Laufzeitfehler, weshalb?

Laufzeitfehler, weshalb?
14.09.2005 16:18:16
gregor
Hallo zusammen
Ich habe in einer Prozedur folgenden Befehl:
Anzahl = WorksheetFunction.CountA(Range(Cells(Spalte_Regel, Streckenanfang), Cells(Spalte_Regel, Streckenende)))
Die Variablen werden zuvor zugeordnet und weisen beim Einzelschritt die korrekte Spalten- und Zeilenzahl auf.
Bei der 2. Ausführung des Makros erhalte ich folgende Fehlermeldung:
Laufzeitfehler 1004
Anwendungs- oder objektdefinierter Fehler
Wer kann mir weiterhelfen?
Vielen Dank
Gregor
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Laufzeitfehler, weshalb?
14.09.2005 16:29:41
Fred
Hi,
du musst das Blatt refenzieren, wenn es nicht das aktive Blatt ist.
mfg Fred
AW: Laufzeitfehler, weshalb?
14.09.2005 17:11:26
Gregor
Hallo Fred
Habe die Prozedur nun wie folgt geändert (Blatt referenziert?)
Worksheets("Master Datei").Select
Set Bereich = Worksheets("Master Datei").Range(Cells(Spalte_Regel, Streckenanfang), Cells(Spalte_Regel, Streckenende))
Dim Anzahl As Integer
Anzahl = 0
Anzahl = WorksheetFunction.CountA(Bereich)
Erhalte jedoch die gleiche Fehlermeldung.
Was läuft falsch?
Gregor
Anzeige
AW: Laufzeitfehler, weshalb?
14.09.2005 18:12:26
Fred
Hi,
vorausgesetzt, die Variablen sind alle ok:
Option Explicit

Sub til()
Dim Anzahl As Integer, Bereich As Range
With Worksheets("Master Datei")
Set Bereich = .Range(.Cells(Spalte_Regel, Streckenanfang), .Cells(Spalte_Regel, Streckenende))
End With
Anzahl = 0
Anzahl = WorksheetFunction.CountA(Bereich)
End Sub

mfg Fred
Anzeige
Danke
14.09.2005 21:39:32
Gregor
Fred
Ich werde deinen Vorschlag morgen im Büro testen.
Schon jetzt herzlichen Dank für deine nochmalige Unterstützung.
Gruss Gregor
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige