Keresés

Részletes keresés

GrundfosUPS2560eladó15000 Creative Commons License 2014.06.03 0 0 25258

Sziasztok!

 

Adott egy excel táblázat az alábbi mezőkkel cirka 100 000termékkel

 

 

 

A-H oszlopig


 

Az A oszlop a beszerzési ár a B oszlop az eladási ár a C-H oszlopokban pedig a termék jellemzői találhatóak meg.

A termék jellemzőit lebontottam így azok szétválasztva jelennek meg. webes lekérdezést szeretnék alkalmazni az eladási árra úgy hogy adott oszlop adatait automatikusan lekérje a táblázat az árgépről. Mindezt úgy hogy a cellában szereplő részadatra rákeressen az árgépen és a kapott eredményt az eladási ár oszlopába illessze be,

 

 

 

 

makrós megoldás is szóba jöhet :)

Delila10 Creative Commons License 2014.06.03 0 0 25257

Csak most vettem észre az írásodat.

 

NEM kell rendezettnek lennie a tartománynak az FKERES függvénynek a pontos érték megtalálásához. Ellenkezőleg, a közelítőhöz szükséges a sorrend.

Előzmény: tbando (25244)
Sánta Kutya (SK) Creative Commons License 2014.06.03 0 0 25256

De, cella. Mező az adatbázis-kezelésben van.

Előzmény: ND7000 (25255)
ND7000 Creative Commons License 2014.06.03 0 0 25255

Rosszul fogalmaztam, nem cellának hívják ? :) esetleg mező ? 

Előzmény: Sánta Kutya (SK) (25254)
Sánta Kutya (SK) Creative Commons License 2014.06.02 0 0 25254

több mint 65000 üres cella is van ott

 

A börtönök meg túlzsúfoltak!

Előzmény: ND7000 (25252)
Fferi50 Creative Commons License 2014.06.02 0 0 25253

Nálam pont office2010 van és nem akarja az igazságot. Úgyhogy nem tudom, mi lehet a gond.

Talán mások is elnéznek errefelé és tudnak valamit hozzátenni.

Előzmény: ND7000 (25252)
ND7000 Creative Commons License 2014.06.02 0 0 25252

És még kicsit több mint 65000 üres cella is van ott :)

Hát igen, ha mindig a lista végén lennének csak üres cellák, nem is problémáznék rajta, hiszen a javítása elég egyszerű lenne. 

Amúgy az előfordulhat , hogy ez valami programhiba, mert azt vettem észre, hogy Office 2010-alatt csont nélkül működik !?

Előzmény: Fferi50 (25251)
Fferi50 Creative Commons License 2014.06.02 0 0 25251

Szia!

 

Úgy tűnik, ez az opció csak akkor működik, ha az érvényesítési listád végén vannak az üres cellák.

 

Üdv.

Előzmény: ND7000 (25250)
ND7000 Creative Commons License 2014.06.02 0 0 25250

Sziasztok

 

Tudnátok segíteni abban, hogy miért van az, hogy ha egy listát létrehozok (érvényesítés), és a hozzá tartozó adatbázisban (oszlopban) vannak üres cellák, azok a listában is mindig megjelennek üres adatként , hiába van bepipálva az "üres cellák mellőzése" opció az érvényesítésnél.  Office 2007-et használok. Nagyon köszi !

 

Delila10 Creative Commons License 2014.06.02 0 0 25249

Fájl | Beállítások | Bővítmények | Kezelés legördülőben Excel bővítmények, majd Ugrás.

Előzmény: maciti (25245)
Fferi50 Creative Commons License 2014.06.01 0 0 25248

Szia!

 

Lehet, hogy emiatt nem működik:

"=IFERROR(VLOOKUP(A1,Anyagok,2,FALSE),""...

mert ez működik:

"=IFERROR(VLookup(A1,Adatok!$A$1:$B$4, 2, False), ""...

 

Lehetséges, hogy az Anyagok név nincs definiálva és emiatt akad ki.

Én is csak most figyeltem fel rá - bár a próbamunkafüzetben rendben van a név és működik is.

 

Üdv.

Előzmény: tbando (25246)
maciti Creative Commons License 2014.06.01 0 0 25247

Szerintem egy csomó dologra nem fogunk soha választ találni, még szerintem azok sem akik írták a Windows-t.

OFF

Kb 20 évvel ezelőtt, egy általam nagyra tartott prof. azt mondta, hogy "a számítástechnika gyerekcipőben jár, ezért semmin nem kell csodálkozni".  A magam részéről ezt a mai napig szem előtt tartom...

Előzmény: tbando (25246)
tbando Creative Commons License 2014.06.01 0 0 25246

A 2. makrónak futnia kéne. Az elsőnek valóban nem, mert az IFERROR a 2007-ben még csak munkalapfüggvény, vba függvényként nem müködik.  Csak azt nem értem, hogy lecsekkoltam és akkor működött. És most mivel halott a gépem, nem tudom megnézni, hogy tulajdonképpen mit is csekkoltam. 

Előzmény: maciti (25234)
maciti Creative Commons License 2014.06.01 0 0 25245

A 2010-esben hol van?

Előzmény: Delila10 (25243)
tbando Creative Commons License 2014.06.01 0 0 25244

Az FKERES 4. paramétere analóg a HOL.VAN 3. paraméterével, csak érthetetlen módon valamiért butább,  mert míg a HOL.VAN a pontos egyezésen kivül növekvő és csökkenő sorrendű tartományokban is keres, addig az FKERES a pontos egyezés mellett csak a növekvőben.

Előzmény: Sánta Kutya (SK) (25229)
Delila10 Creative Commons License 2014.06.01 0 0 25243

Kapcsold be a 2 db, Analysis kezdetű bővítményt. Ezek adnak egy halom új függvényt a füzetedben, és a VBA-ban.

 

Nem tudom, hol találod, nálam a legmagasabb verzió a 2010-es.

Előzmény: maciti (25242)
maciti Creative Commons License 2014.06.01 0 0 25242

Valószínűleg ez történt...

 

További szép napot!

Előzmény: Fferi50 (25241)
Fferi50 Creative Commons License 2014.06.01 0 0 25241

Szia!

 

Akkor valaki biztosan "belestoppolta" - és kiszedte a 2014-esből -:)

 

Üdv.

 

Előzmény: maciti (25240)
maciti Creative Commons License 2014.06.01 0 0 25240

Szia!

 

Ez valami elfajzott lehet mert feladja!

 

Üdv

Előzmény: Fferi50 (25239)
Fferi50 Creative Commons License 2014.06.01 0 0 25239

Szia!

 

A 2014-es office már nagyon távol áll tőlem (ne is akarjon közelebb jönni).

 

Az viszont majdnem biztos, hogy a 2007-es nem ismeri az IFERROR függvényt, ezért csodálkozom a négysoros lefutásán.

Kipróbálhatod, ha egy cellában elkezded beírni a HAHIBA függvényt, feljön-e. Ha csak az jön fel, hogy HIBÁS akkor nincs benne az IFERROR függvény.

 

Ennyit nézz még meg lsz.

 

Köszi.

Előzmény: maciti (25237)
maciti Creative Commons License 2014.06.01 0 0 25238

Igen ez lefut hibátlanul:

 

Sub Kereso_negysoros()

usor = Range("A" & Rows.Count).End(xlUp).Row

With Range("B1:B" & usor)
.Formula = "=IFERROR(VLookup(A1,Adatok!$A$1:$B$4, 2, False), ""Nincs adat!!"")"
.Value = .Value
End With

End Sub

 

 

Előzmény: Fferi50 (25235)
maciti Creative Commons License 2014.06.01 0 0 25237

Köszi!

 

Ez már működik!

Bár a másik gépen (most nem tudom megnézni csak holnap) 2014 es office van. Ismernie kéne az IFERROR függvényt. És ott is hibaüzenetet irt ki. A súgóban olvastam, hogy lehetséges ok a hiányzó *.dll file, és pipáljam be a kívánt funkciót. De ott nem tudtam elképzelni sem melyik kellhet neki...

 

Mindenesetre még egyszer köszönöm a segítséget!

Előzmény: Fferi50 (25236)
Fferi50 Creative Commons License 2014.06.01 0 0 25236

Illetve azt akartam írni, ha hiba az eredmény, akkor beírni a hibaüzenetet. (Először fordítva kezdtem el írni és úgy maradt...)

Előzmény: Fferi50 (25235)
Fferi50 Creative Commons License 2014.06.01 0 0 25235

Szia!

 

A korábban irt 4 soros is ezen a gépen fut le hibátlanul? Ne hiszem, az alábbiak miatt:

 

Nagyon úgy néz ki, hogy az IFERROR függvényt az Excel 2010-es verziójában vezették be. Ezért nem szeresse a 2007. Ott sajnos más képlet kell.

Vagy meg kell vizsgálni az iserror függvénnyel az eredményt és ha nem hibás akkor beírni. Nézd meg ezzel:

Sub keresoA()

Dim sor As Long
Dim usor As Long
usor = Range("A" & Rows.Count).End(xlUp).Row
 For sor = 1 To usor
  Range("B" & sor) = Application.VLookup(Range("A" & sor), Worksheets("Adatok").Range("A1:B4"), 2, False)
  If IsError(Range("B" & sor)) Then Range("B" & sor) = "Nincs adat!!"
Next sor
End Sub

 

Üdv.

Előzmény: maciti (25234)
maciti Creative Commons License 2014.06.01 0 0 25234

Szia!

 

Ez az egyik kód:

 

 

Sub Kereso()
 
Dim sor As Long
Dim usor As Long
 
usor = Range("A" & Rows.Count).End(xlUp).Row
 
For sor = 1 To usor
  Range("B" & sor) = Application.WorksheetFunction.IfError _
(Application.VLookup(Range("A" & sor), Worksheets("Adatok").Range("A1:B4"),  2, False), "Nincs adat!!")
 
 
Next sor
 
End Sub

 

Ez a másik kód:

 

Sub KeresoDelila()
 
Dim sor As Long
Dim usor As Long
 
sor = 1
usor = Range("A" & Rows.Count).End(xlUp).Row
 
Range("B" & sor & ":b" & usor) = "=IFERROR(VLOOKUP(A1,Anyagok,2,FALSE),""Nincs adat!!"")" 'IDÁIG KÉPLET
Range("B" & sor & ":b" & usor).Copy         'EZEK MEG FIXÁLJÁK A KÉPLETET COPY PASTE VALUE-VAL
Range("B" & sor).PasteSpecial xlPasteValues
 
End Sub

 

Mindkettőnél a hibaüzenet: Compile error: Sub or Function not defined

 

A gépen Win Xp van és 2007-es Office

Előzmény: Fferi50 (25233)
Fferi50 Creative Commons License 2014.06.01 0 0 25233

Szia!

 

Leírnád pontosan, hogy melyik megoldás nem működik és milyen környezetben? Másold be lsz. a makrót.

 

Csak valami elgépelési hiba lehet benne szerintem.

 

Üdv.

 

 

Előzmény: maciti (25232)
maciti Creative Commons License 2014.06.01 0 0 25232

Valószínűleg a hiba az én készülékemben van, ezért megpróbáltam egy másik gépen. Ezen XP fut és 2007-es Office.

Ez a hibaüzenet jelenik meg

Compile error: Sub or Function not defined

Ez már többször fejtörést okozott nekem. Valószínűleg valami hiányzik???

A másik gépen, amin szintén ez a hiba ott Win8 van 2014-es Office.

Tehát nem múlt el a tanácstalanságom.

Az utolsó megoldás, az viszont tökéletesen működik, pedig abban is  vannak függvények…

Ez ami műkszik:

With Range("B1:B" & usor)
    .Formula = "=IFERROR(VLookup(A1,Adatok!$A$1:$B$4, 2, False), ""Nincs adat!!"")"
    .Value = .Value
End With

 

Szerintetek kidobjam, vagy ráérek még? Mármint a gépet…

Előzmény: maciti (25231)
maciti Creative Commons License 2014.06.01 0 0 25231

Sziasztok!

Bocs, de egy pár napig (2) hírzárlat volt a közelemben, ezért nem tudtam elolvasni a reagálásokat, de Fferi 50 és tbando teljeskörűen kielemezte a problémámat.

Köszönöm!

Valóban elírás volt a keresésnél az oszlop száma, mert egy másik feladatból rövidítettem egy részletet a tanácstalanságom kiemelésére. Én csak egy amatőr programszerkesztő vagyok. Innen-onnan összeszedet, már működő részleteket rakok össze, néhol rögzített makrókat is belefűzök a cél érdekében. Teljeskörű átgondolástól mentesek ezek a kódok, profiknak nem akarom eljuttatni, mert megint leesik egy monitor...

Az, hogy milyen gyorsan és milyen erőforrással dolgozik arról álmodni sem merek, hogy figyelembe vegyem. Bár nagyon elgondolkodtató az okfejtés, és a próba idő mérés az értékadások esetében. Persze gondolom az összes többi művelet esetében is. Hiszen gyakorlat teszi a mestert... És a gyorsan működő programot!

Előzmény: tbando (25227)
Delila10 Creative Commons License 2014.06.01 0 0 25230

A súgóból:

 

FKERES(keresési_érték;tábla;oszlop_szám;tartományban_keres)

 

Tartományban_keres: Logikai érték, amellyel az FKERES függvény pontos vagy közelítő keresését adhatjuk meg. Ha értéke IGAZ vagy hiányzik, akkor a visszaadott érték közelítő lehet, azaz ha pontos egyezést nem talált a függvény, akkor a következő legnagyobb, de a keresési_érték argumentumnál kisebb értéket adja vissza. * Ha az argumentum értéke HAMIS, akkor az FKERES pontos egyezést keres, és ha ilyen nincs, akkor a #HIÁNYZIK hibaértéket adja eredményül.

 

A * jel tőlem származik. Ide jön, hogy rendezett állományban.

Előzmény: Sánta Kutya (SK) (25229)
Sánta Kutya (SK) Creative Commons License 2014.06.01 0 0 25229

Én sem ismertem, mióta van neki? Én ezer éve rászoktam az index/hol.van párosra, azóta egyszer sem éreztem hiányát az fkeresnek.

Előzmény: Delila10 (25228)

Ha kedveled azért, ha nem azért nyomj egy lájkot a Fórumért!