Új hozzászólás Aktív témák
-
vilag
tag
válasz
Apollo17hu
#2998
üzenetére
Köszönöm!
Meg fogom tenni.
-
DasBoot
aktív tag
válasz
Apollo17hu
#2655
üzenetére
Ezek control-ok.
-
Delila_1
veterán
válasz
Apollo17hu
#2571
üzenetére
Mindenképp kapcsold be a bővítményeknél az Analysis Toolpak, és az Analysis Toolpak VBA nevűeket.
Ha más gépeken is alkalmazod a füzetedet, ott is be kell kapcsolnod. Az első a füzetben tesz elérhetővé egy rakás új függvényt, a második a VBA-ban kell a vezérlők kezeléséhez szükséges utasítások eléréséhez.
-
válasz
Apollo17hu
#2571
üzenetére
kompatibilitási problémák léphetnek fel, ha terjeszteni szeretnéd
-
Delila_1
veterán
válasz
Apollo17hu
#2538
üzenetére
Mikor leáll hibával a makró, a Debug gombra kattints, ne az End-re.
Sárga háttérrel lesz jelölve a sor, amelyikbe belebukott. Ott az egyes változók fölé mutatva (nem rákattintva) megmutatja a pillanatnyi értéküket. Ezekből lehet következtetni a leállás okára.
-
Delila_1
veterán
válasz
Apollo17hu
#2536
üzenetére
A VB szerkesztőben a füzetedhez tartozó ThisWorkbook lapra kattints rá bal oldalon, akkor jobb oldalon megtalálod a leírt események makróit.
A "gyorsító" makrók valószínűleg az egyes munkalapjaidhoz vannak rendelve, a fenti leírás szerint találod meg, a munkalapokra klikkelve egyenként.
-
Delila_1
veterán
válasz
Apollo17hu
#2532
üzenetére
Remélem, sikerül kiszűrni.
-
Delila_1
veterán
válasz
Apollo17hu
#2530
üzenetére
A BeforeClose ez az esemény. Rendszerint a ThisWorkbook laphoz rendeljük. Próbáld meg lépésenként futtatni, úgy könnyebben felfedezheted a hiba okát.
-
[HUN]Zolee
őstag
válasz
Apollo17hu
#695
üzenetére
mi volt a hibaüzenet, és mi volt a feltételed?
-
[HUN]Zolee
őstag
válasz
Apollo17hu
#691
üzenetére
ha mindkét feltátelnek telejesülnie kell, akkor And el kapcsolod össze, ha csak az egyiknek akkor Or -al.
-
lapa
veterán
válasz
Apollo17hu
#253
üzenetére
küttem mintafájlt mailen, mert nekem még mindig műxik.
-
lapa
veterán
válasz
Apollo17hu
#251
üzenetére
hát nemtom értem-e mit szeretnél, de ez tuti műkszik:
OpenDialog_Filter = ''Excel (*.xls), *.xls''
OpenDialog_Caption = ''Válassza ki a feldolgozni kívánt fájlt''
opendialog_selectedfile = Application.GetOpenFilename(OpenDialog_Filter, , OpenDialog_Caption)
Workbooks.Open Filename:=opendialog_selectedfile
csinál ''megnyitás'' ablakot és a kiválasztott fájlt megnyitja szépen. két aposztrófokat kicserélted macskakörömre? az előzőben volt egy sortörés is, ebből kivettem hátha az kavart be.
egyébként nem jó egy olyan megoldás, hogy az excelben csinálsz egy gombot neki és ahhoz rendeled hozzá a makrót? -
lapa
veterán
válasz
Apollo17hu
#248
üzenetére
OpenDialog_Filter = ''Szöveges fájlok (*.txt), *.txt''
OpenDialog_Caption = ''Válassza ki a feldolgozni kívánt fájlt''
OpenDialog_SelectedFile = _
Application.GetOpenFilename(OpenDialog_Filter, , OpenDialog_Caption)
...
Workbooks.OpenText Filename:=OpenDialog_SelectedFile
ez mondjuk txt-t nyit. vagy valami másra gondoltál? -
[HUN]Zolee
őstag
válasz
Apollo17hu
#225
üzenetére
A Val fügvénynél a . (pont) a tizedesvesző a számoknál.
-
[HUN]Zolee
őstag
válasz
Apollo17hu
#222
üzenetére
szövegből számot csinál
Val(szöveges változó)
csak addig nézi amíg azámoz talál amit az első szövegkarakter megjelenik, abbahagya a számmá alakítást, és az addig talált számod adja vissza -
Apollo17hu
őstag
válasz
Apollo17hu
#222
üzenetére
ja, érték... -.-
-
update
csendes tag
válasz
Apollo17hu
#211
üzenetére
Hmmm... köszi a segítséget!
De...
És pl 60 és 150 közé eső páros-páratlan véletlenszám?
És az igazán jó az lenne, ha... Min és Max értéket bármikor változtathassam...
Pl beviteli mező Min és beviteli mező Max, és erre a kettő közé generáljon véletlenszámot...
Ahol a min és max között nincsen kapcsolat... pl 13 és 100 vagy akármi!
(Rnd*Min)/Max vagy valami ilyesmi...
Ja... Caption működött végül így
UserForm1.Label.Caption=Cells(1,1)
Cells(1,1)-et az aktív worksheetből szedi...
Új hozzászólás Aktív témák
- Elemlámpa, zseblámpa
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Nem lát hasznot az AI-ból a cégvezetők többsége
- Battlefield 6
- TCL LCD és LED TV-k
- Temu
- Gaming notebook topik
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- Mini-ITX
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- További aktív témák...
- Akko, Gateron, Haimu x Geon kapcsolók
- Szép! Lenovo ThinkPad X1 Yoga G6 x360 Érintős Hajtogatós Laptop Tab 14" -50% i5-1135G7 16/256 +Toll
- Samsung Galaxy Tab S10 Ultra 256 GB újszerű állapot
- GamerPC RX 9070/7700X/32GB DDR5/1TB M2
- Szép! Lenovo ThinkPad X1 Yoga G6 x360 Érintős Hajtogatós Laptop Tab 14" -50% i5-1135G7 16/256 +Toll
- 199 - Lenovo Legion Pro 5 (16IAX10) - Intel Core U9 275HX, RTX 5070 (ELKELT)
- iPhone 13 Pro 128GB 100% (1év Garancia)
- Samsung Galaxy S20 / 8/128GB / Kártyafüggetlen / 12HÓ Garancia
- Minden szoftver mellé teljesen audit és NIS2 biztos, jogilag hiteles licencigazolást adunk át!
- Apple iPhone 17 Pro Max 512GB / 36 hónap jótállással!
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: Laptopműhely Bt.
Város: Budapest




