Hirdetés
- laca223: A civilizáció mint bugos operációs rendszer
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- GoodSpeed: Munkaügyi helyzet Hajdú-Biharban: észak és dél
- urandom0: Mégsem számőzöm az AI-t az életemből :(
- Hieronymus: Rosszindulatú tevékenységek ellenőrzése IP alapján
- Torda: Így lehet fillérekből prémium okosotthon rendszert építeni 2025-ben
- gban: Ingyen kellene, de tegnapra
- Lalikiraly: Asus Gaming V16 - RTX5050
Új hozzászólás Aktív témák
-
lapa
veterán
üdv. vbscriptben szeretnék könyvtárat tallózni. van ugyan ilyen: [link], de ez elég bénácska, ugyanis nem tudom a kezdő könyvtárat megadni benne. a ''root'' nekem nem jó, mert akkor annál feljebb nem enged brózolni. nekem olyan kéne, ami a desktoptól indul, de az általam megadott könyvtárat jelöli ki defaultban. vagy csak én néztem be és van benne ilyen?
-
#447
lapa
veterán
matekmatika
#444
lapa
veterán
válasz
matekmatika
#444
üzenetére
pláne már #437-ben megoldódott...
amúgy érdekes, mert application.worksheetfunction.isnumber(szam) nem ment pedig kéne neki sztem.
[Szerkesztve] -
#445
lapa
veterán
matekmatika
#444
lapa
veterán
válasz
matekmatika
#444
üzenetére
if isnumeric(szam) then
de ha az excel makrós totyikba írod látom... -
#400
lapa
veterán
MartinIsti
#395
lapa
veterán
válasz
MartinIsti
#395
üzenetére
küzdöttem egy kört mire megtaláltam de emlékeztem, hogy nem kell ciklusozni...
ActiveCell.CurrentRegion.Rows.Count
ActiveCell.CurrentRegion.columns.Count
vagy fixen cells(1,1).CurrentRegion.Rows.Count -
-
lapa
veterán
azért ennél iparibb, gizikeállóbb megoldásra van szükségem. pláne nem akarok pittyegtetni vele a scannelésen kívül 500 dokumentumot. nagy megkönnyebbülésemre találtam azóta franyesz programot rá, jó kis multifunkciós gépen lapadagolóval egy megosztott könyvtárba mennek a fileok, az app meg figyeli a könyvtárat és átnevezi a doksikat vonalkód-alapon. elvégre 21. század. ettől függetlenül elkezdem ezt a kommand-bigyót csinálni, meglátjuk mire jutok. már van helloworldöm
[Szerkesztve] -
lapa
veterán
tehát van egy vonalkód-felismerő szoftver, amihez adnak felismerő dll-t, ocx-et meg miegymást. adnak hozzá egyszerű tesztalkalmazást forráskóddal x+1 nyelvre. egy ilyet linkeltem be fent. ha lefordítom, akkor ez egy form, amiben ki lehet választani a fájlt (tif, bmp...) és alul kiírja a fájlban felismert vonalkódból dekódolt szöveget.
namost nekem nem kell form meg gombok, hanem elég lenne pl. egy parancssoros cucc, aminek a paraméterében megadnám a fájlnevet és valahogy (ez mondjuk nem tiszta) visszaadná a kiolvasott értéket. hétköznapi nyelven: van 20 doksim, és végigloopolnék egy scripptel rajtuk, ami elindítja minden fájlnál ezt a commandline cuccot, majd a scriptnek visszaadott érték alapján a script átnevezné a fájlt.
odáig kábé megvagyok, hogy a program dll-jének vannak bemeneti paraméterei és ezeket kéne megadni, de pl. visual basic express-ben már elakadok. új projekt --> commandline app --> kapok egy ''Main''-t. ez szép és jó, de fingom nincs hogyan mondom meg neki a fájlnevet bemeneti paraméterként. ehhez pl. jól jönne egy minta, pl. cmdapp.exe /message ''helloworld'' /type ''vbcritical'' adjon ki egy ''helloworld'' messageboxot nagy piros x-szel (csak hogy ne egy paraaméterről beszéljünk hamár...). -
lapa
veterán
üdv. kéne írnom egy olyan alkalmazást, ami felismert vonalkódok alapján egy file-listát átnevez. van dll meg ocx meg mittomén milyen könyvtár hozzá.
ha egy mód van rá maradnék vbs-nél (ha jóltom a com-ot meg lehet etetni vele), de ha nem megy akkor küzdök visual basic express-szel.
először vbs: szal vannak a következő fileok, amit a vonalkódfelismerő cucchoz adtak:
Form1.frm
Project1.vbp
Project1.vbw
tehát odáig megvagyok, hogy filesearch-elek a könyvtáron. de hogyan hívom meg a könyvtárat? meg hogyan adok neki változókat, amiket kér? ha segít itten egy zipben a fájlok: [link]
most elkezdek küzdeni ezzel az express-szel ettől függetlenül, ha valaki mutatná legalább az irányt megköszönném. -
lapa
veterán
mert az activate, nem select.
a problémádra: lehet esetleg lapfüleket elrejteni mikor megnyitod a munkafüzetet, felvétel gommbal lenézed az eszközök --> beállításokból. kicsit barkács mondjuk, meg vissza kell rakni close-nál. meg ctrl+pgup /ctrl+pgdn még mindig műkszik. rakd esetleg más fájlba.
btw: excel makrós totyik [link] -
#275
lapa
veterán
[HUN]Zolee
#274
lapa
veterán
válasz
[HUN]Zolee
#274
üzenetére
wait? legalábbis vba-ban. vbs-ben sleep. keress rá hátha vmelyik ezek közül.
-
#254
lapa
veterán
Apollo17hu
#253
lapa
veterán
válasz
Apollo17hu
#253
üzenetére
küttem mintafájlt mailen, mert nekem még mindig műxik.
-
#252
lapa
veterán
Apollo17hu
#251
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? -
#249
lapa
veterán
Apollo17hu
#248
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? -
lapa
veterán
ez féloff, mert vbs (!), de ide teszem fel.
1. tudok fuction-t beágyazni vbs-be? tehát olyan programrészt, amit aztán csak meghívok, amikor kell.
2. műxenek a common dialog-ok (open file, mittomén) vbs-ben? ha igen, vki meg tud dobni egy sampléval esetleg? köszi
[Szerkesztve]
Új hozzászólás Aktív témák
- Milyen routert?
- Milyen TV-t vegyek?
- Akciókamerák
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Elemlámpa, zseblámpa
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Trollok komolyan
- laca223: A civilizáció mint bugos operációs rendszer
- Számtech boltosok memoárjai, azaz amikor kiborulunk...
- PlayStation 5
- További aktív témák...
- Hibátlan 2+ Év Garancia! GIGABYTE GeForce RTX 4060 EAGLE OC 8GB
- AZONNAL KÉSZLETRŐL! AMD Ryzen 7 9800X3D 64GB 6000MHz RAM 2TB Gen4 SSD RTX 5090 32GB GDDR7 1200W
- AZONNAL KÉSZLETRŐL! Intel Core i5 14600K 64GB 6000MHz RAM 2TB Gen4 SSD RTX 5060 8GB FSP 750W
- AZONNAL KÉSZLETRŐL! Intel Core i5 14600K 32GB 6000MHz RAM 2TB Gen4 SSD RTX 5060 8GB FSP 750W
- AZONNAL KÉSZLETRŐL! Intel Core i5 14600K 32GB 6000MHz RAM 1TB Gen4 SSD RTX 5060 8GB FSP 750W
- 164 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4090
- GYÖNYÖRŰ iPhone 13 mini 128GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3338
- Dell Latitude 7330 i7-1255U 16GB 256GB 400nites legjobb kijelző! 1 év garancia
- GYÖNYÖRŰ iPhone 14 Pro Max 256GB Space Black-1 ÉV GARANCIA - Kártyafüggetlen, MS4143
- iPhone 13 mini 128GB Green -1 ÉV GARANCIA -Kártyafüggetlen, MS3896, 95% Akkumulátor
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest