Ú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
- Nikon DSLR topik
- Amlogic S905, S912 processzoros készülékek
- Brogyi: CTEK akkumulátor töltő és másolatai
- Kiadta Sam Altman a parancsot: bajban a ChatGPT!
- BestBuy topik
- Redmi Pad 2 Pro / Poco Pad M1 - egy teszt, két lélek
- Pánik a memóriapiacon
- Fotók, videók mobillal
- Hálózati / IP kamera
- Kormányok / autós szimulátorok topikja
- További aktív témák...
- Eladó egy Sony HT-DDW750 5.1 házimozi rendszer megbizható, hibáktól mentes állapotban + Pio S-11A-P
- Megvigyázott ASUS TUF RTX 3070 OC, dobozzal, garival
- Szép, dobozos MSI PRO Z790-S WIFI PCIe gen5 garival
- Dobozos Aorus B650 AORUS ELITE AX V2, újszerű, garanciával
- Dobozos új MSI B650 GAMING PLUS WIFI 6E antennával, io shielddel, garanciával
- Bomba ár! Lenovo ThinkPad X270 - i3-7G I 8GB I 128SSD I 12,5" HD I HDMI I Cam I W11 I Garancia!
- Apple iPhone SE 2020 64GB, Kártyafüggetlen, 1 Év Garanciával
- Apple iPhone 13 128GB,Újszerű,Dobozával,12 hónap garanciával
- ÚJ ASTRO A50 5th Gen LIGHTSPEED WIRELESS HEADSET + BASE STATION fejhallgató
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7800X3D 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: ATW Internet Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest




