Hirdetés
Ú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
- Fogta magát és bedőlt az ígéretesnek tűnő linuxos Snapdragon notebook
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Adobe Photoshop
- Világ Ninjái és Kódfejtői, egyesüljetek!
- Xiaomi 15 - kicsi telefon nagy energiával
- Battlefield 6
- Képregény topik
- Fotók, videók mobillal
- BMW topik
- A robotaxik bizony karamboloznak, nincs itt semmi látnivaló!
- További aktív témák...
- Corsair Vengeaínce CMK32GX4M1D3000C16 4 x 32 GB RAM KIT !
- Logitech G PRO Wireless / Használt, jó állapot / Dobozával és minden tartozékával / Hibátlan működés
- Eladó Ryzen 5 + RTX 2060 Super - 8 GB RAM - B450m
- Eladó Dell Inspiron 3584 512GB SSD, 8GB RAM, FULL HD
- Samsung A72 megkímélt black&white modellek gyári független
- ÚJ MSI Katana 15 HX - 15.6" QHD 165Hz - i5 14450HX - 16GB - 512GB - Win11 RTX 5050 - 3 év garancia
- BESZÁMÍTÁS! Sony PlayStation 5 Slim 1TB SSD lemezes konzol garanciával hibátlan működéssel
- Magyarország piacvezető szoftver webáruháza
- Gamer PC-Számítógép! Csere-Beszámítás! I5 10400 / RTX 3060 12GB / 32GB DDR4 / 512GB SSD
- Apple iPhone 17 Pro Max 256GB,Uj, Bontatlan,36 hónap garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest





