- Rap, Hip-hop 90'
- Luck Dragon: MárkaLánc
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Luck Dragon: Asszociációs játék. :)
- gban: Ingyen kellene, de tegnapra
- vrob: Az IBM PC és a játékok a 80-as években
- hdanesz: Elektromos autózás - első élmények
- Parci: Milyen mosógépet vegyek?
- zebra_hun: Hűthető e kulturáltan a Raptor Lake léghűtővel a kánikulában?
- Magga: PLEX: multimédia az egész lakásban
Új hozzászólás Aktív témák
-
vilag
tag
válasz
martonx #1799 üzenetére
Sajnos akkor mindkét megoldást (VB6, .NET) el kell vetnem, mert még ha tudom is a rendszergazda jelszót, nem lesz alkalmam feltenni minden gépre.
Még amik helyben vannak, azok csak-csak, mert mondjuk a kora reggeli órákban megcsinálom mikor nincs itt senki, de a másik két központban lévő gépekre nem tudom feltenni. Elmenni nem tudok (na meg nem is akarok), a gépneveket meg nem tudom.Innentől meg a rendszergazda jóindulatán múlik, hogy hajlandó e ennyit vacakolni....
de ahogy ismerem első szóra biztos nem csinálja meg. -
martonx
veterán
Azért eléggé nulla tudással állsz neki, ha életedben nem hallottál még a Visual Studio-ról és a .Net technológiáról. No sebaj sosem késő szintet lépni.
Ez esetben lehet mégsem lesz ujjgyakorlat átportolnod VB.NET-re a cuccot?
És bizony futtatáskor is kelleni fog a .Net, nem csak az exe elkészítésekor. Mivel a .Net nem fog elrontani semmit a felhasználók gépén, az illegás rendszergazdai hozzáféréseddel is nyugodtan feltelepítheted. -
sztanozs
veterán
VB és VB.NET-ben is megírhatod, de annak, hogy a VB runtime fent legyen egy gépen kb annyi a valószínűsége, mint hogy a .NET fent legyen (sőt mára már megkockáztatom, hogy az utóbbié nagyobb).
A .NET keretrendszer nem egy nagy dolog, fel kell rakni (meg kell patchelni) és már mehet is. Amúgy le tudod ellenőrizni, hogy az adott gépen fent van-e, csak meg kell nézni, hogy ez a könyvtár létezik-e és vannak alatta v* alkönyvtárak:
%systemroot%\Microsoft.NET\FrameworkVb6-ból és VB.NET-ből is exe-t lehet csinálni. Egyik sem interpreteres nyelv (mint a vba, vagy mondjuk dos-os időkből a qbasic).
-
vilag
tag
válasz
martonx #1795 üzenetére
Minden céges gépen XP van.
Sajnos azonban a legtöbb gépen még az SP3 sincs fent, nemhogy a .net keretrendszer...De azért lehet, hogy ha más nem kíváncsiságból megpróbálom majd átfordítani.
A későbbi futtatáshoz is kell majd gondolom a keretrendszer gondolom.
Azt azonban nem tudom, hogy ha abból exe-t csinálok akkor is kell? (mintha azt írtátok volna, hogy abból már lehet exe-t csinálni.)Üdv, vilag
-
martonx
veterán
Attól függ milyen .Net verzióval fordítod, olyan .Net futtató fog kelleni.
XP-ken alapból semmilyen sincs, win7-en már van 3.5-ös alapból, tehát ezekre nem kell külön telepíteni.
És igen az 5000 soros kódot újra kell írnod, noha a szintaktika hasonlósága miatt ez korántsem olyan vészes munka, mintha pl. C-re írnád át. -
vilag
tag
válasz
martonx #1792 üzenetére
A meglévő program átfordítása mekkora erőfeszítést igényelne vajon?
Illetve még ha le is fordítom, minden gépen menne vajon vagy esetleg kell hogy legyen hozzá telepítve valamilyen program, hogy fusson?Utóbbit azért kérdezem, mert a hálózatban nem rendelkezem rendszergazda jogosultságokkal. (legalább is nem egészen legálisan
)
-
vilag
tag
válasz
sztanozs #1791 üzenetére
Először is köszönöm a válaszokat!
Az első két megoldási javaslattal kapcsolatban nincs semmi tapasztalatom, szóval nem tudom, hogy vajon mekkora meló lenne egy több mint 5000 soros kód lefordítása.
Valakinek valami tapasztalat ezzel kapcsolatban?
A bat fájlra -mint írtam- azért van szükség jelenleg, mert ez a fájl tartalmazza az excel fájl nevére mutató hivatkozást. Vagyis inkább ez nyitja meg a benne megadott hivatkozást.
Minderre azért van szükség, mert a fájl nevét időnként változtatom. Erre a verziószám változások miatt van szükség. Ebből kifolyólag pedig az arra mutató parancsikonok érvénytelenek lennének.Azért keresek olyan megoldást amivel magában a fájlban lehet tárolni a parancsikont, vagy automatizálni annak lecserélését, mert a hálózat (illetve a program) felhasználóit 100 km is elválasztja egymástól, így nem mehetek oda minden egyes géphez és végezhetem el én az ikoncserét
Azt meg ne is mondjam, hogy a felhasználók milyen szinten állnak informatikából...
Vagy aki meg ért is hozzá, az esetleg tesz rá... -
sztanozs
veterán
1) háááát - szerintem elég meredek ötlet - bár vb.net-et kézzel is meg tudod írni és kézzel fordítani vbc.exe-vel (Windows\Microsoft.NET\Framework alatt keress), nem kell visual studio sem hozzá.
2) Excelből nem tudsz exe-t csinálni, esetleg szerezz be egy VB6-ot vagy egy VB.NET (Express ingyen van) és hacsak nem Office specifikusak a VBA tevékenységei, akkor át tudod tenni a projektedet (kis tanulással) VB6-ba, vagy VB.NET-be.
3) minek .bat fájl, ha egyszer az excelre kattintva is elindul - annak is ki lehet tenni parancsikont és annak is tudsz szerintem ikont változtatni. A .bat-ból indítsára meg (inkább .cmd-t használj), asszem ha call-al hívod meg a fájl akkor nem várja meg a futást, hanem kilép. -
vilag
tag
Sziasztok!
Szembe kerültem egy eleddig megoldhatatlannak tűnő problémával.
Több kiutat is látok belőle, csak nem tudom kivitelezhető e, illetve, hogy hogyan.Van nekem egy excelre épülő VBA projektem.
Ez gyakorlatilag a hálózatról is futtatható kis programocska.Jelenleg úgy működik, hogy egy .bat fájlra mutató parancsikont tetettem ki a felhasználókkal. Ez a .bat fájl indítja az abban megadott helyen lévő excel fájlt.
Ennek a .bat fájlra mutató parancsikonja azonban egy sima kötegfájl az ikonja.
Ez meglehetősen ronda.
Szeretném elérni valahogyan, hogy felhasználói beavatkozás nélkül legyen egy általam beállított kép az ikon.Nekem az alábbi megoldások jutottak eszembe:
1. Ne egy .bat fájl, hanem egy .exe fájl tartalmazza az elérési utat (elvileg az .exe már tárolhat ikont is). Sajnos lövésem sincs hogyan lehet exe fájlt programozni, és hosszas keresgélés után sem jutottam előrébb.2. Magából a projektből kellene valahogyan egy exe fájlt csinálni (ha egyáltalán kehetséges)
3. Egy .bat fájlt megírni úgy, hogy az elvégezze a felhasználó helyett a parancsikon kihelyezését az asztalra és az ikoncseré is. (ezt meg nem tudom megcsinálni).
Szóval szeretnélek titeket megkérni, hogy akár más megoldással, vagy akár a fentiek közül valamelyik megoldás kivitelezésével segítsetek megoldani a problémát!
Egy másik probléma, hogy a .bat fájl indításával egy parancsfájl ablak is megnyílik ami addig ott is marad míg az excel tábla nyitva van.
Nem lehetne valahogy megoldani, hogy ez az excel fájl megnyitásakor bezáródjon, vagy legalább láthatatlan legyen?Köszönettel, volag
-
sztanozs
veterán
html-ben (mármint pure html-ben) szerintem nem lehet megoldani. JS vagy VBS már működhet, de ahhoz meg nem szükségszerűen kell html.
Bár jobban belegondolva elég jól kiegészíthető egy vbs-ből nyitott és generált html oldal a vbs kóddal. Nem egyszerű dolog, de megoldható.
Google: manipulate excel with vbsript
Google: vbscript html form
Mindkét keresésben az első oldal szinte összes találtata releváns. -
EkSYS
senior tag
Sziasztok !
Tudna nekem valaki egy olyan html rövid kis kódsort írni ami egy adatok.xlsx -be bepakol pár adatot amit a html felületen lehet beadni?
Az számít ha az xlsx egy a hálózaton lévő másik gépen van?köszi!
b -
martonx
veterán
Sub Count()
Dim var As Variant
For i = 9 To 1500 Step 13
var = Application.Match(1, Rows(i).Cells, 0)
If Not IsError(var) Then
'ilyenkor az i mutatja, hogy melyik sorban találtunk, var mutatja, hogy melyik oszlopban
'azaz e két info ismeretében bármit meg tudsz csinálni
MsgBox ("találtam")
End If
Next
End Sub -
krokk
senior tag
srácok kellene ötletet, hogy az alábbit, hogy tudom megvalósítani accessben, illetve meg lehet-e egyáltalán....
Szabaság nyilvántartás.
Hónap szinten kellene megjelenítenem, hogy az emberek melyik napokon vannak szabadságon.
Kb ilyen kellene:
Első oszlop egymás alatt a nevek a többi oszlopban meg a hónap napjai.
A sorokba meg napoknál beixelve vagy más háttérszínnel a szabadság napjai.
Adatbázisban a tól ig dátumot tárolom.Excelben szépen néz ki, de Access és VBA segítségével, hogy hogy kéne adatbázisból ezt prezentálni...
Nemrég kezdtem csak VBA-zni meg Accessben szöszmötölni, htmlben jobban otthon vagyok ott simán megrajzolok egy ilyen táblát és feltöltöm adatokkal.
De itt pl ha input mezőkbe vagy címkékbe tenném az nem épp a legjobb főleg mert nem nagyon tudom őket dinamikusan létrehozni és címezni vagy legalábbis nagyon macerás.De ha lekérdezésre, vagy diagrammra van valami ötletetek, hogy miként lehetne látványosan megjeleníteni az is segítség lenne... csak jelen pillanatban ötlettelen vagyok, hogy miként és hogyan lehetne ezt megvalósítani.
Keresgéltem neten szoba foglalásos programra mert ez áll legközelebb, de vagy fizetős volt ha találtam, vagy a forráskód nem volt publikálva, stb....
Remélem tudtok ötletet adni rá...
Köszi.
-
shiz
csendes tag
válasz
martonx #1776 üzenetére
Szia!
Ide feltettem a táblából egy darabot: Tábla
"BK"-ban látszi, hogy mi is az amire szükségem lenne eredményként.
Nem valószínű, hogy előfordul de egy hibakeresés csak kell szerintem arra az esetre ha az adott sorba nem szerepelne 1-es érték(erre írtam volna a match-hez egy "nincs" szöveget.A segítséget előre is köszönöm.
Üdv:
-
shiz
csendes tag
válasz
martonx #1774 üzenetére
Gondoltam kicsi részletezem mire is kellene mert még így sem működik.
A oszlopban termékek 2. sortól 13 soronként.
CJ-ben különböző adatok a termékekhez.
A tábla 9. sorától kezdve 1500 ig minden 8 sorban meg kellene vizsgálni szerepel e benne az "1" érték.
Találat estén ettől a cellától jobbra és és fel illetve jobbra és le található cellák különbségét ki kellene íratnom BK oszlopba az 1 találati érték sorától 7 sorral feljebb.
(illetve hiba helyett vmi szöveget kellene kiíratnom arra az esetre ha a match nem találna semmit. -
martonx
veterán
node minek ide with egyáltalán?
Ez is feleslegesenek tűnik:
Dim ml As Worksheet
Set ml = Worksheets("Munka1")Ez egyértelműen zárójel hibás:
Set erdmeny = keszlet - felhet / 2) Debugolás a barátod
Ez így működésképtelen. Ismétlem, minek ide with?
With eredmeny
If eredmeny > 0 Then
.Range("BK" & sor).Value = 0
Else
.Range("BK" & sor).Value = eredmeny
End If
End WithEhelyett simán csak valami ilyesmi kellene neked:
If eredmeny > 0 Then
Range("BK" & sor).Value = 0
Else
Range("BK" & sor).Value = eredmeny
End If -
shiz
csendes tag
Üdv!
A következő kód javításában kérnék segítséget.
A hiba a végén van. Ha jól gondolom akkor a with blokk-hoz nem jól deklarálok de nem tudom hol a hiba.
Sub Gomb2_Kattintás()
Dim sor As Integer
Dim oszlop
Dim ml As Worksheet
Set ml = Worksheets("Munka1")
With ml
For sor = 9 To 1500 Step 8
oszlop = Application.Match(1, .Range("C" & sor & ":BJ" & sor), 0)
If VarType(oszlop) = vbError Then
felhet = "nincs"
keszlet = "nincs"
Else
felhet = .Cells(sor, oszlop).Offset(-6, 2).Value
keszlet = .Cells(sor, oszlop).Offset(2, 2).Value
End If
Next
End With
[B]Dim eredmeny As Variant
Set erdmeny = keszlet - felhet / 2)[/B]
With eredmeny
If eredmeny > 0 Then
.Range("BK" & sor).Value = 0
Else
.Range("BK" & sor).Value = eredmeny
End If
End With
End Sub -
Lefty
addikt
sziasztok!
azt, hogy tudom megcsinálni, hogy adott egy tábla, melynek 2. oszlopában x mezőnként van egy szám, a számok nem egyeznek. majd a szám mellett mellett pár oszlopra van egy pár oszlopból álló tábla üres sorokkal megszakítva változó hosszal, de a 2. oszlopban levő szám nem ismétlődik. ezen oszlopok mellé a 2. oszlopban levő szám tartozik, így melléjük kéne kíratni a számot. mindig addig tartozik a többi adathoz a 2. oszlopban levő szám, míg ott új szám nem jön, utána az azt követőekhez már az új szám tartozik így annak kellene melléjük kerülnie. a 2. oszlopban levő számok mindig ugyanazzal a 3 számmal kezdődnek, többi részük más.
arra gondoltam, hogy ha a 2. oszlopban levő érték ezzel a bizonyos 3 számmal kezdődik, akkor betöltöm változóba majd ebből a változóból beíratom a megfelelő oszlopba olyan feltétel mellett, hogy az előtte levő oszlop nem üres. de a változóba hogy kerül bele az új szám a 2. oszlopban ha majd újat talál? hogy adja át a változó az új értéket egy másik változónak? Köszi
-
Homer
tag
válasz
Cafu19900916 #1768 üzenetére
És mi a kérdés?
-
Cafu19900916
csendes tag
Sziasztok! A segítségeteket kérném, mivel én nem vagyok járatos Visual BAsicben, ezért hozzátok fordulnék segítségért: kaptam eg ynagyon jó ismerősömtől egy kódrészletet, ami a szakdogájához kellene, de mivel ő műszaki menedzsernek tanul távol áll tőle a programozás. A programkód a következő lenne:
Function Szoveget_General(Hossz As Integer, Seed As Integer) As String
Const Kisbetuk = "aábcdeéfghiíjklmnoóöőpqrstuúüűvwxyz"
Const Szamjegyek = "0123456789"
Const Egyeb = "'!%$/=<>()\/[]#&@{}<,;:.?+-_ "
Dim i As Integer, db As Integer, Karakterek As String, st As String
Rnd (-1)
Randomize (Seed)
Karakterek = Kisbetuk + UCase(Kisbetuk) + Szamjegyek + Egyeb
db = Len(Karakterek)
st = ""
For i = 1 To Hossz
st = st + Mid(Karakterek, Int(Rnd * db) + 1, 1)
Next
Szoveget_General = st
End FunctionElőre is köszönöm a segítségeteket.
-
Homer
tag
válasz
himre82 #1764 üzenetére
Szia Himre82!
Nem lett még kész a progim, de apránként azért haladok vele.
Nem akartam leírni az egész problémát mert hát nem várom el senkitől, hogy megodja helyettem, és tulajdonképpen csak egy-egy részében akadok el mindig. Ezekre itt-ott mindig találok is megoldást, csak később mindig máshol futok hasonló zsákutcákba. Na de akkor már ezt is közkincs tárgyává teszem:
Sajna nem tudok sql servert használni, mert a progimat munkahelyi környezetben használnám majd, és ott nincs lehetőségem adatszolgáltatót üzemeltetni. :\ Ezért maradtam az access file-nál. Hogy ezt is magyarázzam egy picit, az Excel kezelésével a kollégák nagy része már találkozott, így nem okoz gondot nekik a táblák módosítgatása az eddig használt VBA makrós nyilvántartásban (...ezzel persze hibákat generálva a program futásában...). Tudom, itt is le lehetne védeni a munkalapokat jelszóval, de úgy gondoltam, ha már VB, akkor kicsit fejlesztem a tudásomat és gyakorlásképpen megpróbálom inkább megcsinálni az adatkezelő progit, ami már nem excel táblákat módosítgat, hanem igazi adatbázis motorra épül. (Most jöhetnek a kritikák, hogy akkor meg miért nem tisztán accessben csinálom meg? A kérdés jogos! A válsz: azért, mert tanulom a VB-t! Mivel nem szakmám a programozás, csak hobbi szinten űzöm! Szerintem ez is nagy dolog már, hogy idáig eljutottam önszorgalomból.) Az Exceles táblával amúgy azóta semmi gond nincs. Az első pár hiba után, amit manuálisan javítottam, elmagyaráztam többieknek, hogy mi okozta, és azóta mindenki rendesen használja, csak amikor azt megírtam, akkor még nem volt arra igény, hogy mind az állapotfigyelt, és mind a nem állapotfigyelt szerszámot egy rendszerben kezeljük. (A másik dolog, hogy a VB tudásom is sokat fejlődött azóta, és egy csomó dolgot már nem úgy csinálnék meg mint anno.)
Az SQL áttanulmányozása egyébként jó ötlet! Egyet is értek veled, de egyelőre megmaradnék az SQL alapoknál. Később biztos ráfekeszem majd erre is, ha még érdekel majd a dolog. Tényleg jó dolgokat meg lehet csinálni vele, az eddigi tudásoml már elég ahhoz, hogy ezt belássam.
-
himre82
csendes tag
időközben kész lett a programod?
egyébként hagyd az acces-t, de még az mdf fájlokat meg az sql lite-ot is. Lassúak. De nagyon.
Még ha fejlesztői környezetben gyorsnak is tűnnek, a kliens gépén "kínhalál".
Amilyen futó környezetet vázoltál, arra alkalmas lehet egy postgresql szerver (pgadminIII-mal), van hozzá net connector, és iszonyú gyors. És még az adatokat sem lehet manipulálni fájl szinten, nem úgy, mint egy acces mdb esetében.
Egyébként ajánlanám az sql áttanulmányozását. Hihetetlenül leegyszerűsítené a dolgodat szerintem.
És nem kell félni a bonyolult sql utasításoktól. Pont erre találták ki.
-
vilag
tag
válasz
#90999040 #1761 üzenetére
Igen, ezzel csak az a baj, hogy ez rengeteg plusz melót igényel, tekintve, hogy minden egyes vezérlő Enter() eseményéhez meg kellene írni.
Az ActiveControl-al már próbákoztunk másik programban, hasonló ok miatt de az nem működik megfelelően.
Ha pl. van egy formod amin belül van egy frame, amint belül pedig egy vezérlő és a kurzor a vezérlőben villog, tehát elvileg ugye a vezérlő az aktív, az ActiveControl azt fogja eredményül adni, hogy az aktív kontrol a userform.
Ezúton is köszönjük neki. Így el nem tudom képzelni, hogy ez mire lehet jó.Egyébként találtunk akkor erre megoldást, de az hack volt.
Szóval nekem valami jóval egyszerűbb megoldásra lenne szükségem, mert a framen belül és kívül is van jónéhány vezérlő.
Üdv, vilag
-
#90999040
törölt tag
Gondolom exit eseményt akartál írni, mert az exit sub egy kicsit más.
A lényeg az, hogy ez nem csak akkor következik be, ha az utolsó aktív vezérlőről van szó, hanem amikor egy frame-n belüli vezérlőről átváltasz egy frame-n kívülire. Ugyanis ilyenkor nem a frame-n belül levő vezérlő exit-je fut le, hanem a frame exit-je.
Ezt pl. így ki lehet kerülni:
A userformon belül létrehozol egy Control típusú változót, pl.: Private active As Control
Ezután az adott frameben levő minden vezérlőjének Enter() eseményébe beírod ezt: Set active = Me.<Frame neve>.ActiveControl
Az adott vezérlőd exit()-jébe pedig ezt:
Private Sub <Vezérlőd>_Exit(.........
If Not active Is Nothing Then
'itt lehet meghívni az eseményt
End If
End SubEz mellett persze még a frame exit()-jét is le kell kezelni:
Private Sub <Frame neve>_Exit(.......
If Me.<Vezérlőd>.Name = Me.<Frame neve>.ActiveControl.Name Then
Set active = Nothing
'itt ugyanúgy meghívod a vezérlőd exit()-jénél végrehajtandó kódot
End If
End Sub -
vilag
tag
Üdv!
A következő problémára keresek választ:
Adott egy userformon több frame, melyek szintén több vezérlőt tartalmaznak.
Egy közbenső frame léptetési sorrendben utolsó vezérlőjének exit subjába írtam meg egy vizsgálatot, amely ebből következőleg a vezérlőből való kilépéskor elvégez bizonyos ellenőrzést.
A probléma azonban az, hogy ha ez az adott frame utolsó (aktív) vezérlője, akkor az exit sub nem fut le sem akkor ha tabbal közlekedem, sem pedig akkor ha egérrel. Akkor fut le az említett exit sub ha újra visszatérek a frambe (mondjuk egérkattintással)Valakinek van ötlete, hogy mi okozza ezt, illetve, hogy hogyan lehet meggyógyítani vagy kitrükközni?
Előre is köszönöm!
-
mezis
félisten
-
martonx
veterán
válasz
ArchElf #1757 üzenetére
én személy szerint egy tömb sorba rendezését tényleg úgy oldanám meg excelben, hogy eleve cellákba tölteném az adatokat, majd a cellákat sorba rendezném, és kész is. Egyébként az egész VBA-n látszik, hogy a tömbök kezelése eléggé mostoha gyerek benne.
Ugyanígy fenti módszerrel szoktam tömbben keresni is, azaz erre is a cellákat, és az FKERES-t használom inkább.
Ráadásul, amennyivel macerásabbnak tűnik cellákban keresni, sorba rendezni annyival gyorsabb, mint VBA-ban for ciklusokat pörgetni, mindenféle feltétel mentén.
És erre mondtam, hogy excel makróban koncepcionális hiba nem a cellákat, és az excel built-in funkcióit használni tömb műveletekre.
De mindez csak a véleményem, tapasztalatom. Nem mondom, hogy ez az egyetlen járható, ürdözítő út.
-
martonx
veterán
válasz
tomi0829 #1754 üzenetére
http://www.cpearson.com/excel/VBAArrays.htm
Ugyan továbbra is alapvető koncepcionális hibának tartom a tömbök erőltetését Excel makróban, mikor az egész excel egy nagy két dimenziós tömb, de itt hátha találasz megfelelő példa kódot. -
tomi0829
csendes tag
válasz
tomi0829 #1752 üzenetére
Igen ebben igazad van.
Viszont ez a pár sor csak egy része egy nagyobb programnak, ami a végén sorba rendezi a talált sorszámokat illetve később szelektál. Az a gond, hogy a sorba rendezésnél megakadtam, pedig nagyon egyszerű lenne.
A lényeg, hogy van 2 tömb amiben vannak tárolt adatok.
masolander(I)
346
1096
5600
6826
8301
10205
11611
12035
13523
14663
15640Második tömb:
ker_hatar(l_j)
400
1150
9654Ezeket kellene rendeznie, úgy hogy a kapott érték ez legyen:
Eredmény
400
1150
6826
8301
9654
11611
12035
13523
14663
15640
16617I = 0
j = 0For I = 0 To talalat
If masolander(I + 1) < ker_hatar(j) Then
vegleges_hatar(I) = ker_hatar(j)
Cells(16 + I, 4) = I & ". " & vegleges_hatar(I) & " |" & ker_hatar(j) & " 1< " & masolander(I + 1)
j = j + 1Else
vegleges_hatar(I) = masolander(I + 1)
Cells(16 + I, 4) = I & ". " & vegleges_hatar(I) & " |" & ker_hatar(j) & " 2> " & masolander(I + 1)End If
Next
Nem tudom, hogy ebben mit rontottam el...
-
martonx
veterán
válasz
tomi0829 #1752 üzenetére
Excelben egyrészt minek használsz tömböket? Ott van erre egy millió excel cella.
Másrészt nem tudom mit is akarsz pontosan, de az excel beépített FKERES, VKERES függvényeivel próbálkoznék első körben, a felesleges makró programozás helyett.
És amikor megvannak az eredmények, akkor a cellákat könnyen sorba is tudod rendezni. -
tomi0829
csendes tag
Sziasztok!
Szeretném kérni a segítségeteket egy egyszerű Excel makróval kapcsolatban.
Annyi lenne a gond, hogy van két adat tömb, ami számokat tárol, és sorrendbe kellene rendeznie.ker_hatar = Array("400", "1150", "9654")
masolander = Array("346", "1096", "5600", "6826", "8301", "10205", "11611", "12035", "13523", "14663", "15640", "16617")TALALAT = 11
For l_j = 0 To 3
For I = 0 To TALALAT
If masolander(I + 1) > ker_hatar(l_j) Then
vegleges_hatar(I) = masolander(I)
Cells(16 + I, 3) = I & ".Határ >2 = " & vegleges_hatar(I) & "|| L_I= " & I & "|| L_J= " & l_j
Elsevegleges_hatar(I) = ker_hatar(l_j)
Cells(16 + I, 3) = I & ".Határ 1< = " & vegleges_hatar(I) & "|| L_I= " & I & "|| L_J= " & l_j
l_j = l_j + 1End If
Next
Next
Azt szeretném, hogy a kapott eredmény ez legyen:
masonader ker_hatar eredmény
346 400 400
1096 1150 1150
5600 9654 6826
6826 8301
8301 9654
10205 10205
11611 11611
12035 12035
13523 13523
14663 14663
15640 15640Remélem tud valaki segíteni!
Köszi előre is!
Üdv -
martonx
veterán
Érteni véllek, és szerintem ez alapján egyrészt erősen túlbonyolítod a dolgot.
Másrészt ez itt egy VB szakmai topik, aminek nem feladata programozni tanítani, programozás technikákat, design patterneket, DB séma módszertanokat oktatnia.
Mivel rendes, értelmes tagnak látszol, privátban, mailben szívesen segítek, amikor időm engedi. Egyébként jó nyomon jársz, próbálgatásokkal tudod csiszolni a tudásodat. -
Homer
tag
válasz
martonx #1749 üzenetére
Tulajdonképpen egy "egyszerű" szerszámnyilvántartó progit szeretnék csinálni. A különböző féle szerszámokat egy táblában tartanám nyilván, a jellemzőiket egy másikban. A progival lehetne új szerszámot felvenni, átkönyvelni két tárhely közt, életutat figyelni (azaz mikor lett kikönyvelve és mikor kaptuk vissza). A "gond" az hogy a szerszámok közt van olyan amik egyformák, de meg kell különböztetni őket egymástól. Ezeket a rajzszámuk és egy egyedi azonosító alapján lehet egyértelműen meghatározni, de értelem szerűen a jellemzőik egy másik táblában ugyan azok. Remélem érthető vagyok.
Nah, és itt jön az amit kérdeztem. Teszem azt az első Form-on megjelennének egy listbox-ban, vagy comboboxban, vagy datagrid-ben, vagy datagridview-ban ha már VB2010- de tulajdonképpen tök mindegy - a jellemzőkben felsorolt szerszámok. Ha valamelyiket kiválasztom, akkor egy új ablakban (hogy miért új ablakban, annak is megvan az oka) egy listbox-ban már csak az ehhez tartozó egyedi azonosítók jelennének meg. Itt kiválasztom a megfelelő egyedit, majd egy könyvel gombon meg kellene adni hogy egyrészt kifelé, vagy befelé történt a könyvelés, egy állaptra vonatkozó típusú érték paramétert kellene megadni, és tulajdonképpen ennyi.
Ezt a feladatot már többféle módon is megoldottam.
Legegyszerűbb az volt, amikor a dataset megfelelő tábláit hozzákötöttem a vezérlők datasource tulajdonságaihoz. Itt ott akadtam el amikor egy kapcsolótáblával kellett volna dolgoznom. Tehát mondjuk a második ablakban a szerszám neveit - típus alapján - egy harmadik táblából (PL.: Szerszám neve a jellemzők táblában csak egy kód, amit a harmadik táblából tároltam) kellett volna kiválasztani. Ekkor gondoltam arra, hogy adatkészletből feltöltök egy objektum kollekciót (itt minden objektum már létrehozásakor kikeresi számára a hozá tartozó infókat (név, azonosító, tulajdonságok, állapotinfók...stb), majd ezeket már egyszerűen tologathatom a Formok közt. Így is megcsináltam. Itt tök egyszerű a szerszám beazonosítása ID alapján, és az SQL parancsok is végtelenül leegyszerűsödtek. A formok közt is már csak egy kis kollekciót kell átadni. Véleményem szerint nem túl elegáns dolog viszont az, hogy feltöltök egy adatkészelet, aztán azt még "átképzem" objektummá, és innen ered a kezdeti kérdésem... Még arra gondoltam hogy egy (-két..-öt?) datareaderrel is meg lehetne oldani ugyan ezt, így még nem próbáltam, de a visszaíráskor akkor megint SQL-ben kellene megírni az utasítsokat, ami (szintén) nem erősségem. Meg hát szerintem még 100 más módon is meg lehetne oldani.
-
Homer
tag
válasz
martonx #1747 üzenetére
Köszönöm a sok infót amit írtok! Az a helyzet, hogy nem tudok ilyen megoldásokat használni. Nézegettem már a MySQL-t, meg az SQL-t korábban, hogy képben legyek valamennyire miről is szól a kliens-szerver megoldás, de mivel munkahelyi gépen szeretnék kezelni adattáblákat, ott nem tudom megoldani, hogy adatkiszolgáló(ka)t telepítsek. A mezei futtatható exe-t viszont el tudom indítani majd, és egy megosztott mappába helyezett mdb file-t meg "egyszerű" lesz kezelnem, és létrehoznom is. ...gondoltam én, kis naív...
Tudom, hogy igazatok van, VB és .NET majdnem ég és föld, viszont itthon azt telepítek amit akarok, ezért feltettem a VS2010-et, azonban benn a cégnél csak egy régi VB2003 van feltelepítve. (Ez is agyonra kicsontozva, de ez most mellékes. Még súgó sincs benne...) Ezért mondom, hogy felváltva használom mind a kettőt, így számomra mindegy, hogy .NET vagy sem, hogy 2003 vagy 2010, vagy akár az is hogy VS vagy annak csak egy része, azaz VB.
Amúgy, nem kenyerem a programozás, mm nem szakmám. Csak úgy mellékesen tanulgatom ráérő időmben, mert néha sokat tud segíteni egy-egy excel makró is.Ennek sincs köze ugye a .NET-hez. .NET-ről olvasgatva meg, van pár(száz) oldalnyi eltérés, de sztem tök érthető a kód, ha eltérés van is. Az alapok hasonlók, ha nem is ugyan azok. Pl.: az alapok megértéséhez, kapcsolódáshoz szükséges objektumok megértéséhez hasznosnak találtam, de ízlések és pofonok kérdése.
Am. az EF-ről eddig még nem hallottam, szal már kaptam hasznos infót tőletek, ezért jó fórumozni! Köszi még 1x!
Visszatérve az alap kérdéseimre: Ti hogyan oldanátok meg ilyen feltételek mellett a program működését? Arra lennék kíváncsi, hogy minden egyes rekordot egy-egy objektum-ként kezelnétek és az objektumok felelnének az adatkészlebe írásért, vagy inkább az adatkészlettel "trükköznétek" közvetlenül?
A másik kérdésem pedig az volt eredetileg, hogy az ablakok közti adatcserét hogyan oldanátok meg? Az egész adatkészlet public-ká minősítésével a programban, objektumok (objektum kollekciók) átadásával, új rekordkészletekbe másolnátok az első készlet megfelelő mezőit, esetleg valami más módon? (Belegondolva..., tulajdonképpen ebből ered az első kérdésem is)
-
martonx
veterán
Ez esetben első lépésként tanulj meg rendes adatbázist használni. Az Access felejtős (mondom én, aki rendszeresen programozok Access makrót is akár
)
Javaslataim:
Egy jó kis SQL 2012 Express, vagy Local, vagy SQL Compact 4.
Esetleg SQLite.
De pl. MySQL-hez, és Oracle-höz is vannak normális EF providerek.
Hidd el a fekete könyv VB6-os tudása mit sem ér. VB.Net szintaktikailag sem egyezik meg VB6-tal, maximum ránézésre. MSDN, Gugli lesz a barátod. -
-
Homer
tag
válasz
martonx #1741 üzenetére
:$
Igazából nekem tök mindegy, hogy VB6 vagy VB net.Lehet furán hangzik ez így, de alapnak sztem jó volt a könyv, és hozzá tudok nyúlni bármikor, ha éppen nem jut eszembe egy kifjezés szintaktikája.
Nézegettem amit javasolsz! Lehetséges, hogy tényleg ezt keresem.Köszi!
-
martonx
veterán
úristen ez a kiolvastam a fekete könyvet már rosszul indul. Mikor is írták 2001-ben?
Te most VB6-ozni tanulsz, vagy VB.NET 4-ezni? Sőt szólok, hogy még idén befut a VB.NET 4.5 (vagy 5?) is.
Entity Framework-öt keresed úgy vélem. Tele van az internet hozzá tartozó tutorialokkal, a hivatalos honlapján vannak minta programok is. -
Homer
tag
Sziasztok!
Mint már korábbi hsz-eimben is írtam, autodidakta módon próbálom elsajátítani a VB-t, ezért előre is elnézést kérek, ha valami gagyi dolgot kérdeznék, amit természetes, hogy mindenki tud, csak persze én nem. :$
Kérdésem annyi lenne, hogy oop-ban milyen módon érdemes felépíteni az objektumokat adatbázis kezeléshez? Honnan tudnám ezt megtanulni? Tudtok valami jó könyvet hozzá? A VB fekete könyvet végigolvastam, de számomra nem derül ki belőle, hogy mi lenne az optimális út.? Tulajdonképpen megismertem általa magát a nyelvet, csak nem tudom optimálisan használni. :S
Egy konkrét, egyszerű példa, pl:
oldedb-vel beolvasok egy adatkészletbe pár táblát, amik közt kapcsolatokat is definiálok. (Teszem azt személyeket tartok nyilván, ID alapján, mellette egy másik táblában a szemük színét. A két tábla közt pedig egy fordítótábla van. Pl: Az első tábla 1. személyéhez tartozik a második tábla 6. sorában található kék szín. Ezt tárolja a 3. tábla.) Eddig gyönyörű is a történet, megvannak a kapcsolatok, tudok vezérlőket kötni a táblák adataihoz is, ez alapján akár még szűrni is a grid megfelelő sorait. Mondjuk módosítani akarok bizonyos adatokat vezérlőkkel, és nem közvetlenül egy kapcsolt datagrid-ben, esetleg egy új formon, amiben ki akarom választani egy combobox-ban a személyt, majd szemszínt egy listbox-ból. A változást vissza akarom írni az Access mdb file-ba.
Itt jön a kérdésem. Ha a fenti módon járok el, akkor a formok közti adatátadás során a készlet szűrt sorainak átadása jelent gondot, hiszen a szülő form adatait csak a sorszámuk alapján tudom elérni, vagy generálni kell hozzá egy key-t, ami véleményem szerint plusz adatokat generál. Sikerült így is megcsinálnom a progit, ami hellyel-közzel működött is.
Csinálhatnék az új formon is egy új adattáblát, amibe „átmásolom” a szülő form eredménylistáját a form deklarálása után.
Aztán gondoltam személy-objektumokkal próbálom megoldani. Ekkor csináltam minden egyes emberről egy objektumot. Az objektum tartalmazta a személy ID-jét is, így egyszerű volt kikeresni a táblában, hogy melyik személyre vonatkozik a módosítás. Megúsztam a formok közti adatcsere gondját is, hiszen egy kollekcióban át tudtam adni az összes módosítani kívánt személyt, ID-vel együtt. Itt viszont azért kellett plusz adatokat generálni, mert beolvastam az adattáblák adatait az adatkészletbe, aztán onnan megcsináltam az objektumokat, ergo mindent 2x kellett memóriába tölteni, cserébe viszont egyszerű volt megkeresni, hogy melyik sort kell módosítani a készletben, és az adatkészlet tábláinak update-elése is tötrénhetett egy-egy sima dataadapter.update(dataset) procedúrával.
Még arra is gondoltam, hogy a kettő fenti megoldást lehetne ötvözni, és olyan objektumokat létrehozni, amelyek nem az adatkészletből generált komplett adatobjektumokat kezelnek, csak bizonyos rekordmezőket tárolnék bennük aztán ez alapján beazonsítom a kívánt sort, majd elvégzem a kívánt módosítást az adatkészletre való közvetlen hivatkozással.
Remélem értitek a kérdésemet! Ezt hogy szokta megoldani egy vérbeli, ultraexpert, unatkozó programozó? Tudtok esetleg olyan oldalt ahol példákat találhatnék hasonló tipikus feladatokról? Nem kód érdekelne tehát, hanem az alapelgondolás. Mire építsem fel az objektumok rendszerét, és mikor? Úgy értem, esetleg egy datareader ismegoldás lehet, ahol nem kell adatkészletet feltölteni. Így egyből tudnék objektumokat létrehozni.Előre is köszi minden válaszra méltónak!
-
EkSYS
senior tag
Sziasztok!
Érdekes problémával találkoztam, s nem tudom mi a megoldás:
Adott egy leltári kivét forma. Az első kombó ami be is van pipálva gyakorlatilag beadja az összes alkatrészgyártót. Majd a nagy kombó ami le is van gördítve meg kiadja minden olyan tétel típusát ami az első kombóban kiválasztott értéknek megfelel. Egyszerű. Ehhez az alábbi megoldásokat használtam:
1.kombó betöltése:
Do While Worksheets("alkresz").Range("A" & sor2).Value <> ""
sor2 = sor2 + 1
leltar1.ComboBox2.AddItem Worksheets("leltarpivo").Range("I" & sor2).Value
Loop
sor2 = sor2 - 1
Worksheets("alkresz").ActivateMajd betöltöm a nagy kombót:
Public Sub alkatcombo5toltes()
Dim sor As Integer
Dim xkeres(1 To 10) As String
xkeres1 = ""
xkeres2 = ""
sor = 2If leltar1.CheckBox1.Value = True Then
xkeres1 = leltar1.ComboBox1.Value
Else
End IfIf leltar1.CheckBox2.Value = True Then
xkeres2 = leltar1.ComboBox2.Value
Else
End Ifleltar1.ComboBox5.Clear
Do While Worksheets("alkresz").Range("A" & sor).Value <> ""
'PME
If Worksheets("alkresz").Range("I" & sor).Value = xkeres1 Then
leltar1.ComboBox5.AddItem Worksheets("alkresz").Range("E" & sor).Value
'Alk.gyártó
ElseIf Worksheets("alkresz").Range("H" & sor).Value = xkeres2 Then
leltar1.ComboBox5.AddItem Worksheets("alkresz").Range("E" & sor).ValueEnd If
sor = sor + 1Loop
A probléma az hogy a képen látható a nagy kombóban kiválasztott érték a helyes, csakis az a másik 3 nem. De az mindig benne marad. mindent szépen megtalál, csak ez a nyomorult 3 marad bent mindig.
Valakinek hasonló tapasztalata? Ötlete? -
#90999040
törölt tag
Van rá lehetőség, winapi mouse_event(), vagy SendInput() függvényével.
A mouse_event() használata egyszerűbb, de a MS már új fejlesztésekhez nem ajánlja. A SendInput() bonyolultabb, de ezzel pl. billentyűlenyomást is lehet generálni, és a MS ezt ajánlja inkább...
-
Oly
őstag
Sziasztok.
Van arra lehetőség, hogy Visual Basic 6.0-ban olyan programot csináljak, ami az egér kurzort egy megadott helyre mozgatja és ott kattint?
Van egy elég monoton munkafolyamatom, ahol a monitor adott pontjaira kattingatok.
Már fáj a csuklóm.
Arra gondoltam, hogy csinálok egy olyan makrót, vagy akár VB6-os programot, ahol csak egy helyre kattingatok, és az előre megadott kordinátákra viszi az egeret, kattint, majd vissza az egér (hogy tudjak újra kattintani...).Nézegettem angol fórumokat, de nem nagyon értettem.
Előre is köszi.
-
ArchElf
addikt
-
wikings2
őstag
válasz
martonx #1731 üzenetére
Nem kész kódot, csak valami struktúrát, amire lehet ilyen típusú feladatokat építeni és tudom hogy valami logika is van benne, mert mondjuk itt elég sok szaki van aki eltudná magyarázni hogy mit hogy csináljak meg.
Nem lenne bajom ezzel mert ha leülnék és napokat gondolkodnék rajta biztos kitalálnék valamit rá, de az emelt érettségin lesz kb 45 percem erre a részére a feladatsornak és ezért próbálom típus szerint begyakorolni a feladatokat. Ha a beolvasás megvan utána az ilyen a már beolvasott adatbázisban keresgélő és sorba rakó feladatokkal már nincs bajom. -
wikings2
őstag
válasz
martonx #1729 üzenetére
1 éve "tanulom" autodidakta módon mivel az infó tanárom egy seggfej és előre megoldott programokat kommentel ki és magyaráz el. Na most egy előre megírt programról nekem is lesül, hogy mi hogy megy, de magamtól új feladatot megoldani elég nehéz úgy hogy kb 4 séma van a fejemben.
A sorok külön kezelése érdekelne igazából. Valami olyasmire gondoltam hogy 2*n és 2*n+1 edik tagonként olvasnám be őket (de hogy hogy az jókérdés) ,de eléggé hiányos a háttértudásom hozzá.
-
martonx
veterán
-
wikings2
őstag
Szevasztok. Egy szerintem nektek pofon egyszerű feladatra kérnék segítséget.
Van egy forrás txt formátumban amihez szimplán csinálok egy FileStreamet meg egy StreamReadert szal megnyitom.Dim v(20, 2) As Integer
For i = 1 To 20
WriteLine(i & ". sorszám")
v(i, 1) = ReadLine()
Next
For n = 1 To 20
WriteLine(n & " név:")
v(n, 2) = ReadLine()
Next
ReadKey()Na most valami hasonló ciklussal szeretném belőle az adatokat beolvasni különböző rekordokba.
A gond az hogy nem tudom hogy hogy kéne megoldani azt hogy:A txt belseje:
342342342301 (dátum)
pista béla (hozzá tartozó név)
21312312312
janjó ferenc
.
.
.Akkor ha egy sorban lenne szimplán valamilyen stringtöréssel szétkapnám és mehetnének külön, de így ilyen formában erre sajnos nem tudok ciklust, hogy egymás mellé kerüljenek az összetartozó rekordok :\
Ha valaki tudna rá valami egyszerű módszert akkor megköszönnémemiatt b.szom el sorra az emeltszintű programozási feladatokat mert nem sikerül értelmesen beolvasni.
Köszi! -
ArchElf
addikt
Úgy rémlik, hogy az automata üzenetküldö férgek letöréséért a nem Office-ból meghívott Outlook objektumok nem tudnak automatikusan levelt küldeni. Van valami registry beállítás (vagy group/local policy elem), amin keresztül ezt lehet engedélyezni. De nagyon rég volt már amikor ezzel szmbekerültem (6-7 éve), szóval egy kis googlizásba belekerül, mire megtalálom...
Esetleg próbáld meg C# (.NET) alkalmazással...
AE
-
Oly
őstag
válasz
ArchElf #1722 üzenetére
Szia
Private Sub Command1_Click()
Dim objOutlook, objMail, oAddSig
Set objOutlook = CreateObject("Outlook.Application")
objOutlook.Session.Logon
Set objMail = objOutlook.CreateItem(olMailItem)
Set objOutlook = objMail.GetInspector
With objMail
.SentOnBehalfOfName = "nemazennevem@valami.hu"
.To = "to"
.Cc = "cc"
.Subject = "Subject"
.Body = "body"
.Display
End With
Set objOutlook = Nothing
Set objMail = Nothing
End SubOutlook2007-nél átírja a feladót, Excelből indítva 2010-nél is.
HTML-ből, vagy VB6-tal csinált exe-nél már nem.
2010-nél egy lenyíló listából tudom kiválasztani az eddig használt feladókat. Lehet, hogy itt valami objektumként kezeli már? -
Oly
őstag
Sziasztok
Van egy Excel makróm, ami új outlook levelet kreál.
A feladót a SentOnBehalfOfName-mel adtam meg.
Excelből hibátlanul megy még a 2010--es Outlookkal is.
Most kitaláltam, hogy futtatható EXE-t csinálok belőle. Így viszont nem működik a feladó beállítása.
HTML-be illesztve sem hajlandó a 2010-es Outlookkal a feladót beállítani.
Mi lehet a gond?
-
EkSYS
senior tag
Sziasztok !
Találkozott már valaki a 2029-es hibával?
Nálam most jött elő először és nem tudom hogyan lehetne megoldani. Röviden.
Adott egy xls. amiben van több munkalap. az egyikben az egyik oszlop tartalmát szétszedem (9 oszlopra), majd kikopziok 7-et és átmásolom egy másik munkalapra ahol beszúrom A-tól. J-ig, és J től megint jönnek oszlopok, de az már máshonnan.
A feladat egyszerű összehasonlítgatós /keresős adott feltétel rendszer alapján.
A keresés A - F oszloptartományban zajlik. Ma kiderült a H I -ben is kell, átírtam a keresős algoritmust, és amikor ebbe a két új oszlopba kéne nyúlnia kiáll type mismatch-csal error 2029 (megnéztem a neten, de erre nem találtam megoldást)
valakinek ötlet? -
vilag
tag
válasz
martonx #1710 üzenetére
Az addig világos is (eddig is az volt), hogy amikor az adott vezérlőhöz kötött cella értéke megváltozik akkor annak a change lefut. Ez eddig sem volt kérdés. Viszont ez a change lefut ha kell hanem, minden egyes alkalommal amikor valamelyik másik vezérlő értékének a kiírása történik, sőt ennek a vezérlőnek semmi köze az egészhez.
-
martonx
veterán
Biztonsági beállításokban nem tudok segíteni. Amit írtál, és ha jól értettem, ilyen eset nem fordulhat elő, csak direkt felhasználói átállításkor.
A miértjét már ezerszer leírtam. A combobx rá van kötve a cellára. Amikor a cella értéke változik, a combobx értéke is változik, azaz lefut a change esemény. Tényleg ennyire nem lehet felfogni?
-
martonx
veterán
-
vilag
tag
válasz
martonx #1702 üzenetére
Nagyon szépen köszönöm a megoldást!!!! Ezzel sok bonyodalomtól mentettél meg!
Pedig mennyi féle megoldást kipróbáltunk mielőtt megkérdeztem....
A biztonsági beállításokban nem tudsz esetles segíteni?
A futkározással kapcsolatban annyit, hogy rendben, hogy működik a dolog hogy ki kell kapcsolni az automatikus újraszámolást, de szeretném megérteni a dolog miértjét.
Szóval miért van ez így? Mi az oka?
-
EkSYS
senior tag
Sziasztok!
Van valakinek egy jól működő dátum szűrője (date filter)?
Jó pár verziót megpróbáltam de mindig ugyanaz lett a vége: nem szűrtDim MyDate
MyDate = Format(DateSerial(2012, 3, 13), "éééé.hh.nn")
ActiveSheet.AutoFilterMode = False
Range("A1").AutoFilter
Range("A1").AutoFilter Field:=1, Criteria1:=MyDate
valakinek valami ötlet?
-
martonx
veterán
form bezárás:
Private Sub CommandButton1_Click()
Unload Me
End SubPrivate Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
End If
End SubJól sejtettem, hogy a vezérlők rá vannak kötve cellára
Ez a nem azonnali hatály, nem túl biztató, immár tuti, hogy itt lesz a hiba. -
vilag
tag
válasz
martonx #1700 üzenetére
Szia!
A vezérlők valóban rá vannak kötve egy egy excel cellára, de nem azonnali hatállyal. A kiírás csak egy gomb megnyomása (és a megfelelő ellenőrzések futtatása) után történik meg.
Nem tudom ez változtat e a nézőpontodon valamit.A többi kérdésben esetleg tudsz segíteni? (Előbbi hozzászólásom)
Üdv, vilag
Új hozzászólás Aktív témák
Hirdetés
- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- Viccrovat
- Macron betiltatná az EU-ban a közösségi médiát a 15 év alattiaknak
- Milyen notebookot vegyek?
- Hivatalos a OnePlus 13 startdátuma
- Samsung Galaxy Fit 3 - keveset, de jól
- Házimozi belépő szinten
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- OLED TV topic
- Vezeték nélküli fülhallgatók
- További aktív témák...
- Azonnali készpénzes INTEL CPU NVIDIA VGA számítógép felvásárlás személyesen / postával korrekt áron
- ÁRGARANCIA!Épített KomPhone Ryzen 5 5500 16/32/64GB RAM RTX 4060 8GB GAMER PC termékbeszámítással
- Maximális teljesítmény és biztonság, csak az ARCTIC mx-4-el! Adj új erőt a gépednek!
- LG 27GR95UM - 27" MiniLED - UHD 4K - 160Hz 1ms - NVIDIA G-Sync - FreeSync Premium PRO - HDR 1000
- HP ProBook 430 G4 Pentium 4415U (bios jelszavas)
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: CAMERA-PRO Hungary Kft
Város: Budapest