- Huawei Mate 50 Pro - blendemonda
- Fotók, videók mobillal
- Féltucat régi Samsung kapott új One UI-t, köztük az A52s
- iPhone topik
- Redmi Note 13 Pro+ - a fejlődés íve
- Poco X6 Pro - ötös alá
- Milyen okostelefont vegyek?
- Samsung Galaxy A54 - türelemjáték
- Redmi Note 12 Pro - nem tolták túl
- Xiaomi 13T és 13T Pro - nincs tétlenkedés
Hirdetés
-
Kihagyták az NVIDIA-t egy új AI-hálózati szabványból
it Számos big tech cég összefogásával készült el egy új AI-hálózati szabvány, mindebből viszont kihagyták az NVIDIA-t.
-
[SoP] Konzolokra is megjelenik a Marvel Rivals
gp A következő zárt béta júliusban érkezik, ez már mindhárom platformon futni fog.
-
Mobvoi TicWatch Pro 5 Enduro - kitartás kartárs?
ma WearOS 3.5, két kijelző, hosszú üzemidő, és zavaró apróságok a legújabb TicWatch modellben.
-
Mobilarena
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
-
Fferi50
őstag
válasz zoli03 #29077 üzenetére
Szia!
Talán a legegyszerűbb:
A képleteket át kell másolnod egy másik munkalapra - vagy a munkalap másik részére szövegként.
Ezután cellánként az alábbi képlettel tudod meghatározni az összeadott számok darabszámát:
=HOSSZ(D1)-HOSSZ(HELYETTE(D1;"+";""))+1
A képlet megadja a D1 cellában levő képletben szereplő összeadott számokat.Egy adott tartományban levő darabszámot hasonlóan tudod megállapítani, de a képletben össze kell fűzni a tartomány celláit:
= HOSSZ(D1 & D2 & D3) - HOSSZ(HELYETTE(D1 & D2 & D3;"+";""))+3
A plusz a végén a cellák darabszáma, ez is meghatározható függvénnyel pl. DARAB2(D1:D3)Üdv.
-
Fferi50
őstag
válasz #91703552 #29115 üzenetére
Szia!
Ha egyszerű excel fájlt kaptál, akkor nem tudod a változtatásokat megnézni.
Illetve akkor igen, ha az eredetit elmentetted magadnál - egy harmadik munkafüzetben:
A munkafüzet 1. munkalap A1 cellájába beírod a következő képletet (egérmutatóval is "játszhatsz")
=Amunkafüzet1munkalapA1cella=Bmunkafüzet1munkalapA1cella
Ha a két érték egyezik, akkor igaz lesz a cella értéke, ellenkező esetben hamis. Ha figyelsz arra, hogy az egérmutatós címben a $ jeleket ki kell gyomlálni, akkor húzhatod a képletet sorra és oszlopra is.Ha közös használatú a munkafüzet, akkor a korrektúra menüben a változások követése megmutat(hat)ja, ki mikor, mit változtatott. Azért a zárójeles rész, mert ez beállítástól függ, lehet, hogy nincs változástörténet.
Ha nincs eredetid, vagy nincs közös használat, akkor "így jártál" sajnos.
Üdv.
-
Fferi50
őstag
válasz lenkei83 #29174 üzenetére
Szia!
Egyrészt, akkor ne az activesheet legyen amin keresel, hanem a másik.
Set myRange = ActiveSheet.UsedRange helyett set myRange=Sheets(1).UsedRange
Másrészt javaslom, hogy ne a range változóban tárold a találatokat, hanem egy stringváltozóban a találatok címeit.
pl.
Dim fm as String
fm = FoundCell.Address(external:=True) ' az external paraméter a teljes címét adja a tartománynak (fájlnév, munkalapnév - ha ugyanazon a fájlon belül van a munkalap, akkor a képlet beírás után "elveszti" a fájlnevet.)
'A következő találatnál pedig:
fm = fm & "," & FoundCell.Address(external:=True)
'A végén pedig a képlet:
Range("A1").Formula = "=sum(" & fm & ")"Üdv.
-
Fferi50
őstag
válasz lenkei83 #29181 üzenetére
Szia!
Nézd meg lsz, hány karakter hossznál akad ki.
Ha csak az értéket szeretnéd betenni, akkor viszont a következőt javaslom:
Nem kell a címeket megjegyezni, hanem egy változóban adod össze az értékeket.
pl. erteke=foundcell.value az elsőnél, majd erteke=erteke+foundcell.value a többieknél. A végén pedig az erteke változót teszed be a cellába, range("A1").value=erteke.Üdv.
-
Fferi50
őstag
válasz bozsozso #29220 üzenetére
Szia!
Ha minden igaz, a következő segíthet:
Ráállsz a diagramra, kiválasztod azt az adatsort, aminek a sorrendjét módosítani szeretnéd egy egérkattintással - figyelj, hogy az egész ki legyen jelölve.
A szerkesztőlécen megjelenik az adatsor képlete, pl. így:
=ADATSOR(Munka1!$X$61;(Munka1!$T$1;Munka1!$AB$1:$GX$1);Munka1!$AA$61:$GX$61;4)
A végén levő zárójel előtti szám jelzi az adatsor sorrendjét a diagramon - és a jelmagyarázatban. Ezt a számot írd át - természetesen csak akkora számot írhatsz, ahány adatsor van a diagramon. Ezután enter.
Ezzel automatikusan megváltozik a diagramon a többi adatsor elhelyezkedése is.
Kicsit kísérletezel vele és kialakul a neked tetsző sorrend.
Remélem táblázatból készítettnél is működik a módszer.Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
Szia!
A konstans definiálásakor nem lehet semmilyen függvényt megadni (sajnos).
Kerülő út: Az immediate lapon megnézed a CHRW függvényed értékét, kimásolod és azt teszed be a VBA -ba. (Bár ez nem biztos, hogy megy.)
Ha nem megy, akkor ne konstansnak definiáld, hanem szövegváltozónak, akkor biztosan "megeszi".
Nálam ez egy kérdőjel, nem tudom, Te milyen karaktert szerettél volna.Üdv.
-
Fferi50
őstag
válasz lenkei83 #29246 üzenetére
Szia!
Az elég kevés információ, hogy kiakad. Milyen hibával áll le?
Miért is mész végig egyesével a cellákon, amikor a területen lehet keresni. Amikor egy-egy nem színes cellához érsz, akkor Nothing lesz értéke a szinescellának, ezt pedig nem lehet zárolni, sem felszabadítani.
Itt ugyanazt a ciklust kell lejátszani, mintha értéket keresnél a területen. Első cellát megkeresed és utána addig keresed, amíg vissza nem jutsz hozzá.
(set szinescella=ws.usedrange.find(what:="",searchformat:=true)Ha pedig ezt a ciklust csinálod, akkor egyszerűen meg kell nézni a cella háttérszínét és ha sárga, akkor levenni a zárolást.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
válasz lenkei83 #29283 üzenetére
Szia!
Sajnos a SpecialCells metódusnak ez a sajátossága - nem fűlik a foga a hibakezeléshez (Redmond logikájába nem fér bele úgy látszik). Még egy range változóba sem teszi bele a Nothing értéket...
De miért keresel cellát a csak diagramot tartalmazó sheeten, hiszen a tipusát meg tudod állapítani és akkor át tudod lépni a keresést.
Ezen túlmenően szerintem a mutatott iserror kifejezés nem túl szerencsés, hiszen nemlétező cellának a címét sem lehet megállapítani.
Ebben a szituációban úgy gondolom, az on error hibakezelést kell alkalmazni.
Üdv.
-
Fferi50
őstag
válasz #75376384 #29284 üzenetére
Szia!
Nem egészen értem a problémát, de amit csináltam:
g34 cellába beírtam a képletet =B34-E34
Ezután a célérték keresésben ennek a cellának a célértékét 0 értékre állítottam és változó cellának a b18 cellát jelöltem meg.
Kijött hogy 53 % mellett a g34 értéke 0 és minden feltételnek megfelel minden szám.Üdv.
(Persze lehet, hogy ez véletlen...) -
Fferi50
őstag
válasz lenkei83 #29286 üzenetére
Szia!
Nem tudom, nekem nem szedte szét az egyesített cellákat az
union(range("E3"),range("F8"),range("E7")).formatconditions.delete sor.
Az E3:F6 cellák egyesítve voltak és együtt lett rá feltételes formázás kiadva.Mivel törlöd a feltételes formázást?
Más: Redmondnál nemigen lehet logikát találni, mért pont a hibakezelés lenne az.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
válasz nemlehet #29295 üzenetére
Szia!
A helyettesítő karaktert nem használhatod, ha egyenlőséget vizsgálsz a ha függvénnyel, mert az "centire" azt nézi, amit beírtál - tehát nem helyettesítő karaktert "lát", hanem csillagot/kérőjelet.
A hasonlító, kereső függvények viszont működnek a helyettesítő karakterrel.Üdv.
-
Fferi50
őstag
válasz pirit28 #29300 üzenetére
Szia!
Mivel jelen esetben egyetlen cella tartalmát vizsgálod, továbbá a countif csak azt mondja meg, hogy a cellában van olyan érték (lehet, hogy több is, de ezt nem tudja megmondani!!!), ezért én a sok countif helyett a like operátort javasolnám:
if range("C11").value="" then range("D11").value=""
else
if hattorf,Győr,Ford,Pors" like "*" & range("C11").value & "*" then ' a felsorolást természetesen ki kell egészíteni - igaz, ha a c11 cella értéke valahol előfordul a megadott szövegben
range("D11").value="OE"
else
endif
endifAz else ágakat az előttem szóló alapján alakíthatod ki.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
válasz pirit28 #29304 üzenetére
Szia!
Ezt a makrót beteszed egy modul lapra (de akár az adott munkalap kódlapjára is teheted), majd elindítod. Persze tetszés szerint átnevezheted.
A makró végigmegy a C oszlopon az utolsó nem üres celláig és beírja a C oszlopban levő érték alapján a D oszlopba a kívánt értéket (ez utóbbit csak remélem, hogy eltaláltam).
Annyiszor futtatod, ahányszor akarod, mindig újraírja a D oszlop celláit az aktuális C oszlop szerint.Sub kitalalo()
Const oes = "hattorf,Győr,Ford,Pors,BMW,AUDI,hmmc,kms,Sassenburg,Figueruelas,Grossmehring,Sindelfingen,Bremen,Koeln,Voelklingen,Seat,emden,Genk,Daventry,VW,BENZ,Swarzedz,Hannover,(OE)"
Const whs = "WH,W/H"
Dim beir As String, cl As Range
For Each cl In Range("C11:C" & Cells(Rows.Count, "C").End(xlUp).Row).Cells
If cl.Value = "" Then
beir = ""
Else
If oes Like "*" & cl.Value & "*" Then
beir = "OE"
Else
If whs Like "*cl.value" & "*" Then
beir = "W/H"
Else
beir = "DFC"
End If
End If
End If
cl.Offset(0, 1).Value = beir
Next
End SubÜdv.
-
Fferi50
őstag
válasz m.zmrzlina #29426 üzenetére
Szia!
A probléma igazából nem probléma (vs: az excelnek mindig igaza van ), szerintem abból adódik, hogy az rng_Tempcell.Row a cellának a munkalapon elfoglalt helyét adja vissza és nem az rng_Dkioszt tartományban elfoglalt helyét -> a két szám csak akkor ugyanaz, ha az rng_Dkioszt tartomány az első sortól kezdődik. Egyébként le kell vonni belőle a tartomány induló sorának számát.
Ezen kívül van egy ilyen sorod:
If rng_Tempcell.Value = int_Csomag Then
Ami után jön a következő:
If rng_Tempcell.Value <> "" And rng_Akioszt.Cells(rng_Tempcell.Row, 1).Value = "" ThenSzerintem itt az első feltétel felesleges, hiszen az előző vizsgálatban már megállapítottad, hogy nem üres az rng_Tempcell.
Üdv.
[ Szerkesztve ]
-
Fferi50
őstag
válasz m.zmrzlina #29439 üzenetére
Szia!
Az "Application.WorksheetFunction.Large((rng_Akioszt), 1)" eredménye hiba akkor, ha nem tudja az adott tartományon végrehajtani a műveletet. Mivel az int_Maxcsom tipusa integer, a hiba értékét nem kapja meg, ezért fut hibára.
Oka: lehetséges, hogy az rng_Akioszt tartomány nem kapott értéket, azaz Nothing az értéke,vagy nincsenek benne adatok. Tehát azt meg kellene nézni, mielőtt a műveleteket elindítod. Vagy
Másik megoldás, hogy a Maxcsom, Mincsom változódat Variant -nak deklarálod és a művelet után megnézed, hogy hiba-e az értéke.Üdv.
-
Fferi50
őstag
válasz m.zmrzlina #29441 üzenetére
Szia!
"Csak akkor miért működik n+1-szer úgy is, hogy nincs kizárva a szöveges cella?" Ezt a kérdést szerintem itt nem fogjuk tudni megválaszolni. Én max arra tudok gondolni, hogy maga a keresési tartomány esetleg valamilyen ok miatt egy cellából áll és abban nem szám van."Először a int_Mincsom, int_Maxcsom változó tipusát állítottam Variantra de nem jutottam közelebb. A leálláskor is szám (1 és 9 ami reális) volt az értéke nem pedig hiba."
Csak az a kérdés, hogy a leállás melyik sorban volt, esetleg az előző értékeket láttad még az adott változókban. Nyilván ezt mostmár nehezen fogod tudni ismételten produkálni....Üdv.
-
Fferi50
őstag
válasz PETEE78 #29457 üzenetére
Szia!
A csillag karakterrel keresésben operálhatsz.
Próbáld meg a dir() függvénnyel megnézni, hogy milyen fájlok vannak a keresett helyen:
filename= dir("221_ALMA_20" & sdateform & "*.csv")
Ide beírhatod hozzá az elérési utat is, ha szükséges.
Ha filename="" akkor nem talált olyan fájlt, ami megfelelt a keresési feltételeknek - vagy nem abban a könyvtárban kerestél, amiben a fájl van, vagy egyáltalán nincs ilyen fájl.Utána a filename értékét - ha szükséges, kiegészítve az elérési úttal - már használhatod a megnyitáshoz, mert ott már nem lesznek benne csillag karakterek, hanem konkrét fájlnevet fog tartalmazni.
Üdv.
-
Fferi50
őstag
válasz m.zmrzlina #29470 üzenetére
Szia!
Mi lenne, ha a keresésnél kihagynád az első oszlop celláit. (Ez megoldható vba-ban offset metódus használatával, vagy a tartományt e nélkül definiálod - a tartomány előtt levő cellára is lehet hivatkozni (!) így pl. tartomány(xsor,0) a tartomány x-edik sorában a tartomány előtt levő cellát adja meg.)
Üdv.
-
Fferi50
őstag
válasz poffsoft #29574 üzenetére
Szia!
Lehet, hogy olyankor, amikor nem frissül az érték, ki van kapcsolva az automatikus számolás.
Másrészt:
Delila válaszában szerintem tulajdonképpen benne volt a 2. kérdésedre is a felelet. A függvényeidben használni kell az
Application.Volatile
metódust, ekkor a függvényértéket azonnal újraszámolja az excel automatikusan, amint az adott munkalapon egy cellának megváltozott az értéke.
Hátránya, ha sok volatile függvényed van, az bizony lassítja az excelt rendesen (cserébe az azonnali számolásért).Egyébként csak akkor számolódnak újra a függvények, ha valamelyik tényezőjük megváltozik - de ehhez is az automatikus számolásnak kell élnie.
Üdv.
-
Fferi50
őstag
válasz hengelhof #29601 üzenetére
Szia!
Ha csak két 0 lehet előtte, próbáld meg az alábbi szövegfüggvény kombinációval:
=HA(BAL(A1;1)="0";HA(KÖZÉP(A1;2;1)="0";JOBB(A1;HOSSZ(A1)-2);JOBB(A1;HOSSZ(A1)-1));A1)Az eredeti szám legyen szövegformátum (mert egyébként már beírás után átalakítja tudományossá), a képlet eredménye mindig szöveg lesz.
A tudományos beállítás mellőzését sajnos nem tudom, hogyan lehet megoldani (ugyanez igaz az automatikus dátummá alakításra is ....
Üdv.
-
Fferi50
őstag
-
Fferi50
őstag
válasz the radish #29645 üzenetére
Szia!
=jobb("0" & Abs(A1);3)
Üdv.
-
Fferi50
őstag
válasz bobsys #29652 üzenetére
Szia!
'"akkor mikor mar szetszedtem az osszes raklapot akkor a kor fele ilyen a fele olyan, tehat 200 a teljes a kor"
Ez a természetes, hiszen az A1 celládban mindig 100 marad az érték, csak a B1 cellában változtatod...
Ahhoz, hogy mindig 100 maradjon az összeg, egy harmadik cellába (C1) a maradékot is be kell tenned (A1-B1), a kördiagramot pedig a B1-C1 cellákra kell csinálnod.Üdv.
-
Fferi50
őstag
válasz MCGaiwer #29723 üzenetére
Szia!
"Egy olyan kimutatást kellene csinálnom, ami gombnyomásra összesíti az adott ember egész éves munkanapjait, és mutatja, hogy bizonyos hónapokban mennyit volt távol."
Próbálkoztál már a kimutatással? Nagyon sokféle lehetőséget rejt magában. Excel verzió függő a varázsló, de mindegyikben van (legalábbis 2010-ig).
Oldal mezőnek (vagy szűrőnek) felvenném a dolgozók nevét tartalmazó oszlopot.
Oszlopcimke az év, a hónap és a nap.
Lehet, hogy előtte a "fejléc" sorokat 3 szintűvé kellene tenni az előzőek szerint.De ha felteszel valahova egy pár soros kitalált neveket tartalmazó táblát, biztosan lesz, aki gyakorlati példát is csinál számodra.
Üdv.
-
Fferi50
őstag
válasz PistiSan #29835 üzenetére
Szia!
Ebben az esetben az INDEX függvényt kell kombinálnod a HOL.VAN függvénnyel:
A képlet pl. Munkalap1!B1 cellába:
=INDEX(Munkalap2!$A$1:$A$2000;HOL.VAN(Munkalap1!$A1;Munkalap2!$A$1:$A$2000;0)-1)
Ezután ezt kell végighúznod az oszlopon.
Fontos, hogy a keresési tartományok $-osan legyenek megadva.Ilyen esetekben az INDIREKT függvényt nem tartom igazán jónak, mert lassítja az excelt.
Üdv.
-
Fferi50
őstag
válasz firemanus82 #29928 üzenetére
Szia!
Gondolom, akkor a kiválasztott nevet valahova máshova beírod (képlettel v. makróval - ez utóbbi a jobb eset). Az adatérvényesítési listád pedig egy külön tartományban van. Az eredeti listádat másold le egy másik helyre.
Ebben az esetben egy kis makróval, ami a kiválasztáshoz kapcsolódik, kitörölheted a listából a kiválasztott nevet.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$1" Then
Application.EnableEvents = False
Range(Target.Validation.Formula1).Find(what:=Target, LookIn:=xlValues, lookat:=xlWhole).Delete shift:=xlUp
Application.EnableEvents = True
End If
End SubA fenti makró a H1 cellában levő érvényesítés listájából törli a kiválasztott elemet. Ha az érvényesítési listát a következő formában adod meg: =$A$1:$A40 - vagyis a sor száma nem abszolút módon van megadva - akkor az érvényesítési lista tartománya automatikusan módosul, nem marad benne üres sor.
Természetesen a fenti pár sort (3-5) beteheted abba a saját makróba, amelyik a kiválasztott adatot beírja a megfelelő hely(ek)re.
Üdv.
-
Fferi50
őstag
válasz dellfanboy #29935 üzenetére
Szia!
A végeredményben nem látom, hogy összegezve lennének az értékek. Ez nem kellene?
Egyébként javaslom a kimutatás készítését - szerintem az megoldja a kérdéseidet.
Üdv.
-
Fferi50
őstag
válasz DisRespect #29938 üzenetére
Szia!
Talán próbálkozhatnál a feltételes formázással. A hét napjait a Hét.napja (Weekday) függvény adja meg, ezt kell a feltételes formázásba bevinni. Cellák kijelölése képlettel lehetőséget kell választani.
Üdv.
-
Fferi50
őstag
válasz DisRespect #29947 üzenetére
-
Fferi50
őstag
Szia!
Ha egyébként nem kell azokat az eljárásokat megcsinálni bezáráskor, amiben az üzenet feldobó makrók vannak, akkor szerintem elég kikapcsolni az eseménykezelést az Application.Enableevents=False sorral a fájl bezárása előtt, utána pedig (ha szükség van rá) akkor az Application.Enableevents=True sor visszakapcsolja az eseménykezelést. (Csak a legvégén ne felejtsd el visszakapcsolni. :)
Üdv.
-
Fferi50
őstag
válasz Des1gnR #30090 üzenetére
Szia!
40.000k sor nem sok egy kicsit?
Én azt tenném, hogy lemásolnám a munkalapot (jobb egérgomb a fülön, áthelyezés vagy másolás - legyen másolat) egy új füzetbe (gondolom a tábla alatt munkalapot értesz), majd a másolatból kitörölném azt az 50 oszlopot, amire nincs szükségem.
Üdv.
-
Fferi50
őstag
válasz Adebayor #30136 üzenetére
Szia!
Néha azért nem árt elolvasni, amit az excel képességeiről írnak.
A jelenség oka egyszerűen az, hogy a számokat az excel 15 jegy pontosságig tárolja, utána csak 0 következik.
Ha a teljes számsort szeretnéd a cellában látni, akkor formázd meg a cellát szövegként - vagy beíráskor legyen az első karakter egy aposztróf (ez ugyanazt jelenti).Üdv.
-
Fferi50
őstag
válasz Morphy #30215 üzenetére
Szia!
Azt jelenti, hogy az A1 cellához nem fűztél megjegyzést. Delila előző hozzászólása tartalmazza, hogy fűzz megjegyzést a cellához. Ezt meg kell tenned "kézzel" - továbbá a megjegyzés szöveg kitörlését is - , mielőtt a makró elindulna.
De ki is egészíthető a makró a következő sorral:Target.AddComment Text:=""
Ezt a kep= sor után kell beírni.Üdv.
-
Fferi50
őstag
válasz Sir Pocok #30257 üzenetére
Szia!
Az Fkeres függvény ad gyors megoldást.
Két oszlopban felviszed a táblázatot, első oszlopban a határ 0,20,33,49,100 (mert az 50 % már a felső kategória) akár abszolut számként, akár %-kal, attól függően, hogy milyen formában van a keresendő számod, a második oszlopba beírod a kategóriákat0 Egyéb rész.
20 Társult
33 Közös vezetésű
49 Leányvállalat
100Ezután a képlet =FKERES( A1;$D$1:$E$5;2;IGAZ), ahol A1-ben van a "tulajdonrész", D1:E5 a paraméter táblád.
Üdv.
-
Fferi50
őstag
válasz Stanlee #30266 üzenetére
Szia!
Nagyon gyanús nekem a HOL.VAN 3. paramétere.
A képlet első részében az 1 paraméter érték van, kivonandóban pedig a 0 paraméter érték. Ez utóbbi azt jelenti, hogy az első pontosan egyezőt fogja megkeresni, míg az 1 paraméter az első olyat, ami kisebb vagy egyenlő az adott értéknél. Mivel pedig több egyforma értéked van, ebből szép bonyodalmak jöhetnek össze szerintem.
Ha jól sejtem, akkor az előző mérés eredményétől való eltérést szeretnéd megkapni, ha rosszul gondolom, akkor segíts ki lsz. Lehet, nem is ez a jó út....
Szerintem ezt a táblát feltehetnéd "közösbe", a megoldandó feladat pontosításával, biztosan többre mennénk és nem kellene saját táblát csinálni hozzáÜdv.
Új hozzászólás Aktív témák
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Új, bontatlan World of Warcraft gyűjtői kiadások
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Autómatricák a legjobb minőségben, több ezer minta! PH tagoknak 30% kedvezmény!
- Vírusirtó, Antivirus VPN kulcsok
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Promenade Publishing House Kft.
Város: Budapest