2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    Fototrend

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

Új hozzászólás Aktív témák

  • #27423 m.zmrzlina senior tag
    Új Válasz #27423
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    m.zmrzlina

    senior tag

    A problémám a következő: össze kell hasonlítani kér oszlop tartalmát (cellánként egy egy szöveges érték és ha van közöttük különbség akkor a helyet ahol hiba van és a hibák darabszámát egy MsgBox-ban a felhasználó tudomására hozni.

    Úgy próbálkozom, hogy tömb változóba írom a két tartományt és a tömb elemein végzem az összehasonlítást de az értékadásnál a "Object doesn't support this property or method." hibaüzenetet kapom

    arr_Analist() = wb_Temp.ws_Kabelo.Range(Cells(2, 1), Cells(int_usor, 1))
    arr_Digilist() = wb_Temp.ws_Kabelo.Range(Cells(2, int_uoszlop + 1), Cells(int_usor, int_uoszlop + 1))

    For intI = 1 To UBound(arr_Analist)
    If Trim(arr_Analist(intI, 1)) <> Trim(arr_Digilist(intI, 1)) Then
    int_Hibakszama = int_Hibakszama + 1
    str_Hibahely = str_Hibahely & intI + 1 & ".sor, "
    End If
    Next

    If int_Hibakszama > 0 Then
    MsgBox "Összesen " & int_Hibakszama & " különbség a következő helye(ke)n: " & str_Hibahely
    Else
    MsgBox "A két lista azonos."
    End If

Új hozzászólás Aktív témák