Thema Datum  Von Nutzer Rating
Antwort
Rot Prüfen ob Variable in Array enthalten ist
 12.04.2018 16:49:40 Manuel
NotSolved
12.04.2018 17:33:59 Gast72259
NotSolved
13.04.2018 15:01:40 Gast68
NotSolved

Ansicht des Beitrags:
Von:
Manuel		 Datum:
12.04.2018 16:49:40		 Views:
2114		 Rating:
     
Antwort:
  Ja
Thema:
Prüfen ob Variable in Array enthalten ist		 
Hallo,

ich möchte durch folgenden Code: If ws.Cells(2, i).Value = arrCriteria() then

bewirken, dass etwas passiert wenn der Wert der Zelle in Zeile 2 in Abhängigkeit von i dann etwas macht, wenn er gleich einem Wert eines Arrays ist.
Leider erhalte ich die Fehlermeldung "Typenunverträglichkeit". Kann mir jemand sagen wieso, bzw. was ich ändern muss?

Der komplette Code befindet sich unten.

Vielen Dank im Voraus
Manuel



Sub kopiereneinfügengundh()

Dim ws As Worksheet
Set ws = Tabelle1
Dim lrow As Integer
Dim Oldcell As Range
Dim arrCriteria() As String
Dim lngCriteriaCount As Long


lngCriteriaCount = 2

ReDim arrCriteria(0 To lngCriteriaCount - 1)
arrCriteria(0) = "Category"
arrCriteria(1) = "Part#"



lrow = ws.UsedRange.SpecialCells(xlCellTypeLastCell).Row

For i = 1 To 10
    Set Oldcell = ws.Cells(2, i)
If ws.Cells(2, i).Value = arrCriteria() Then
ws.Range(ws.Cells(2, i), ws.Cells(lrow, i)).Copy Tabelle4.Cells(10, 10) '10,10 zu was Sinnvollem anpassen
End If

Next


End Sub

 

Ihre Antwort
  • 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: Name: Email:



  • 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
Rot Prüfen ob Variable in Array enthalten ist
 12.04.2018 16:49:40 Manuel
NotSolved
12.04.2018 17:33:59 Gast72259
NotSolved
13.04.2018 15:01:40 Gast68
NotSolved