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

    LOGOUT

    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

  • #50281 Lasersailing senior tag
    Új Válasz #50281
    Ú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

    Lasersailing

    senior tag

    Sziasztok,

    Excel 365 VBA kérdésem lenne:
    Van egy adatbázis, amibe makró segítségével szkennelek be adatokat. Teszt alatt 6 sora van, a sorból az első a megrendelés szám, ami tartalmilag egy 10 jegyű szám (csak szám). Az első 5 sorba beszkennelt adat valamiért text formátumban lett letárolva, most viszont ha beszkennelek adatokat, akkor azokat számként tárolja el. (gondolom azóta valamit átírhattam a makróban, de ez mindegy is, mert nem tudom, hogy mit...)

    Nem is lenne ezzel gondom. A makró egy másik részében kiolvasom ezeket a sorokat és az első oszlop adatát, mint kulcsot használva keresem vissza, hogy a felhasználó a lehetséges kulcsok közül melyikhez tartozó adatokat szeretné megnézni. A gondom itt kezdődik: Ha text-ként van letárolva a mező adata, akkor azt megtalálja, ha viszont számként, akkor nem találja meg. Pedid a beolvasott adatra keresek (felhasználó csak kiválaszthatja a beolvasott adatot, nem írhat be), azt gondolnám, hogy mindenképp meg kellene találja, de nem. :W

    Eltárolt adatok:

    A 2-6 sor között a zöld háromszög mutatja, hogy "text"-ként értelmezi az adatokat
    A 7-es sor viszont szám. Bár minden adat text típusú (fent jelőlve). Ha összehúzom a cellákat csak A7-et adja hozzá, a többi az excel szemében nem szám.

    Az alábbi sor keresi a "Seged" táblában az "ordervalaszto.value" (itt választja ki a user a 6 lehetséges érték valamelyikét) értékét.
    Ha pl a 2133990001-et választom ki megtalálja, ha a 2135480001-et akkor viszont nem találja meg, vidáman továbblép (F8-cal léptetve a futást látom):
    Do
      sm = sm + 1
    Loop Until Sheets("Seged").Cells(sm, 1).Value = ordervalaszto.Value Or IsEmpty(Sheets("Seged").Cells(sm, 1))

    Mi ennek az oka, és főleg hogyan tudnám ezt elkerülni?
    Biztosan minden orderszám kizárólag számból fog állni, de amúgy az sem gond, ha text-ként tárolom de találja meg "saját magát" mindig.

    (remélem érthetően sikerült megírni a kérdést)

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