|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
05.06.2020 13:23:15 |
Kai |
|
|
|
05.06.2020 13:29:57 |
Torsten |
|
|
 Laufzeitfehler 13 Typen unverträglich |
05.06.2020 14:06:46 |
Gast46140 |
|
|
|
08.06.2020 11:46:33 |
Torsten |
|
|
|
09.06.2020 10:14:04 |
Kai |
|
|
Von:
Gast46140 |
Datum:
05.06.2020 14:06:46 |
Views:
806 |
Rating:
|
Antwort:
|
Thema:
Laufzeitfehler 13 Typen unverträglich |
|
Danke für die schnelle Antwort.
Ich dachte ich hätte die rw2 schon als Rows in der For Schleife definiert.
Nun zeigt er mir nach der Implementiertung noch eine andere Fehlermeldung an.
Sub Lagerplatzzuteilung()
Dim wb As Workbook
Dim Produkte As Worksheet
Dim Stellplaetze As Worksheet
Dim rw As Range
Dim rw2 As Range
Dim RowCount As Integer
Dim WerteBereich As Range
Set wb = ActiveWorkbook
Set Stellplaetze = Worksheets("Lagerplätze")
Set WerteBereich = Stellplaetze.Range("A1:I217")
Set Produkte = Worksheets("Quelldaten")
Stellplaetze.Cells(14, 1).Value = 1
For Each rw In Produkte.Rows
For Each rw2 In Stellplaetze.Range("2:217").Rows
If Not Application.WorksheetFunction.IsNull(Stellplaetze.Cells(rw2.Row, 3).Value) Then
Der neue Fehler lautet :" Objekt unterstützt diese Eigenschaft oder Methode nicht!" Laufzeitfehler 438!
Kann es sein, dass er die rw2.row als reihe wahrnimmt, und somit die Funktion ungültig wird?
Viele Gruesse,
Kai
|
- 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
|
|
05.06.2020 13:23:15 |
Kai |
|
|
|
05.06.2020 13:29:57 |
Torsten |
|
|
Laufzeitfehler 13 Typen unverträglich |
05.06.2020 14:06:46 |
Gast46140 |
|
|
|
08.06.2020 11:46:33 |
Torsten |
|
|
|
09.06.2020 10:14:04 |
Kai |
|
|