Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
356to360
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
356to360
356to360
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Problem mit Makro

Problem mit Makro
27.12.2003 19:09:57
Tom
Hi,

brauche Eure Hilfe, was ist hier falsch:
(Ich bekomme in Excel bei .Cells(IngRow, 1) = Range("C4") einen Objektorientierten fehler angezeigt)



Function GetRow(strAufNr) As Long
On Error Resume Next
With Sheets("Daten")  'dort werden die Aufträge abgelegt
GetRow = WorksheetFunction.Match(strAufNr, .Range("A:A"), 0)
If Err Or GetRow = 0 Then
GetRow = .Rows(.Rows.Count).End(xlUp).Row + 1
End If
End With
On Error GoTo 0
End Function


Sub SaveChanges()
Dim lngRow As Long
lngRow = GetRow(Range("B1").Value)
With Sheets("Daten")
.Cells(IngRow, 1) = Range("C4")
.Cells(IngRow, 2) = Range("L4")
.Cells(IngRow, 3) = Range("C6")
.Cells(IngRow, 4) = Range("L6")
.Cells(IngRow, 5) = Range("C8")
End With
End Sub


Dankeschön an alle

Tom

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Problem mit Makro
27.12.2003 19:28:21
Nepumuk
Hallo Tom,
1. Weil du lngRow deklarierst aber IngRow benutzt. Benutze die Option Explicit-Anweisung um solche Fehler zu vermeiden.
2. SaveChanges ist ein Schlüsselwort in VBA und sollte zu nichts anderen eingesetzt werden. Das kann zu Problemen führen.
Gruß
Nepumuk
AW: Problem mit Makro
27.12.2003 19:31:02
Jens
Hi

Überprüfe mal den Inhalt von IngRow.
Möglicherweis steht da eine 0, "" oder gar Fehler drin.

Wie?
Markiere IngRow -> rechtsklick -> Überwachung hinzufügen
Danch mit F8 das Programm Zeile für Zeile durchgehen.
Im Überwachungsfenster kannst du den Inhalt von IngRow sehen.

Vielleicht hilft es bei der Fehlersuche.
Gruß Jens
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige