Az „Excel” fórum célja, hogy keretet adjon az Excel felhasználók széles táborának tapasztalataik megosztására, és lehetőséget a segítséget kérőknek. Az alábbi összefoglaló azért készült, hogy segítse a helyes kérdésfeltevést.
– Írd le szabatosan a problémát. Úgy fogalmazz, hogy ne csak te magad, de a szakértő is megértse, mire szeretnél választ kapni.
– Írd le, hogy milyen verziójú Excellel dolgozol. (Vagy ha nem – ill. nem csak – Excel, akkor micsoda?)
– Írd le, hogy milyen úton indultál el, és hol akadtál el rajta.
– A kérdés megértése szempontjából sokat segíthet, ha feltölteszt egy képet, amin látszik, hogy mit szeretnél, vagy illusztrálja azt.
– Még jobb, ha feltöltesz egy minta munkafüzetet valahová (pl. data.hu). Feltöltés előtt távolítsd el belőle a nem publikus adatokat.
– Ha a feladat jellege olyan, célszerű az "előtte" és "utána" állapotokat bemutatni. (Miből kellene csinálni mit?)
– Ha VBA kódon kell javítani, másold be a releváns kódrészt. Rövid kód mehet hozzászólásba, hosszú kód inkább ide: http://pastebin.com/
– Ha valami nem úgy működik, ahogy kellene, add meg a rendellenes viselkedés jellemzőit, a hibaüzenetet, és a hibát okozó programsort.
Sziasztok ! 1 napja kínlódok egy problémával amire nem találok megoldást. Van egy munkalapom A oszlopban típus jelöléssel ( P, K, SZ, M ) a B oszlopban nevekkel, F oszlopban árakkal. A nevek és a típusok többször is szerepelnek, de egymástól függetlenül, tehát egy névhez tartozhat P, K M stb is, de egy sorban csak egy fajta természetesen. Egy külön munkalapon meg szeretném jeleníteni, hogy ABC nevű anyagból pl M típussal mennyi volt az össz ár. Próbáltam szum szumha, szorzatösszeg, stb de semmi sem akar működni. Valamit nyilván én rontok el. Egy kritériummal sikerül megoldani, kettővel nem.
Sub DistanceQuery() Dim IE As Object, Doc As Object Dim oFr As Object, oTo As Object, oBut As Object, oSum As Object Dim t As Long, s As String, myHwnd As Long Set IE = CreateObject("InternetExplorer.Application")
(az itt kimaradt kódrész nem változott)
s = Mid(s, t + 1) Range("B3") = s myHwnd = FindWindow(vbEmpty, "Microsoft Excel - " & ThisWorkbook.Name) SetForegroundWindow myHwnd End Sub ----------------------------------------------------------
Szerintem a többpontos útvonalterv is lehetséges, de ehhez minimum meg kellene adnod, hogy hogyan képzeled el a táblázat felépítését, működését.
Elnézést, hogy akaratlanul hagytalak itt "magadban beszélni",
Hát, rólad sem feltételezem, hogy "itt laksz"
Közléskényszer... kicsit nézne hülyének a kollégám ha neki kezdeném el mondani :) Működik ez tökéletesen, csak az az egy apró mozzanat maradt ki az információból.
Elnézést, hogy akaratlanul hagytalak itt "magadban beszélni", de nem voltam gépközelben. Végül megtaláltad a megoldást. Nálam a 2003-ban tökéletesen működik az ofszetes.
Ezen a verzión kívül dolgozom a 2007-ben, és a 2010-ben is, de csak ha muszáj (#16434-es kérdésedre). :)
Egyik esetben sem szabad módosítania a munkalap-hivatkozásokat. Ha például az Értékek mező értéke =Munka1!$B$2:$B:1624, a Munka1! részt hagyja érintetlenül, és csak a cellatartomány abszolút címét cserélje az új tartománynévre.
Nálam a G5-ben cím van, ezért vontam le a darab2 értékéből 1-et. Ha a címen és az adatokon kívül más, nem üres cellák is vannak az oszlopban, azokat is vond le.
Illetve még annyival egészíteném ki a 2-vel ezelőtti kérdésem, hogy a makró-val lehet az IE ablakot a háttérbe (Excel mögé) helyezni amellett, hogy nem záratom be vele?
A második kérdésem körútra értettem több állomással, pl. Budapest-Miskolc-Debrecen-Budapest. Végülis utazási csomagokról van szó, ahol a kiindulás és érkezés mindig azonos, ha kicsit hosszabb az út, akkor több állomás van benne.
