- Egy kis depi (szösszenet inkább), remélem elfér itt :) 3#
- Pulsar X2 V3 Size 2 Gamer Egér és Pulsar 8K Wireless Dongle
- Út Korea turistaparadicsomába, amiről talán még sosem hallottál: Csedzsu-sziget
- Perplexity Pro AI képszerkesztési limit -egy képgenerátor függő tapasztalatai
- Adattár lemez előkészítése Windows telepítéshez
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sellerbuyer: Hogyan turbózd fel a NAS-od sebességét olcsón és egyszerűen?
- sh4d0w: Én és a számítógép
- eBay-es kütyük kis pénzért
- sziku69: Fűzzük össze a szavakat :)
- Parci: Milyen mosógépet vegyek?
- Luck Dragon: Asszociációs játék. :)
- Brogyi: CTEK akkumulátor töltő és másolatai
- sziku69: Szólánc.
- sellerbuyer: Milyen mobiltelefont vegyek 2025 ben?
-
LOGOUT
Új hozzászólás Aktív témák
-
pmonitor
aktív tag
válasz
Cicero #15932 üzenetére
Neked a legjobb a VBA. Word és Access objektumaihoz nem értek. Excelben a következőképpen tudsz 1 már meglevő munkafüzetből új munkafüzetet megnyitni:
1.: ALT+F11 -> ekkor megjelenik a VBA editor.
2.: Insert menü -> Module menüpontra klikk. Ekkor megjelenik a Module1. Dupla katt rá
3.: A megnyíló ablakba beilleszted a következő kódot:Sub a()
Dim excapp As Object
Set excapp = CreateObject("Excel.Application")
excapp.Visible = True
Dim wrkb As Object
Set wrkb = excapp.Workbooks.Add()
wrkb.Worksheets(1).Range("A1") = "abcd"
End Sub
Sub b()
Dim excapp As Object
Set excapp = CreateObject("Excel.Application")
excapp.Visible = True
excapp.Workbooks.Add
excapp.Workbooks(1).Worksheets(1).Range("A1") = "abcd"
End Sub4.: valamelyik eljárás törzsébe belekattintasz, hogy a kurzor benne legyen.
5.: F5-öt nyomsz Ekkor lefut az az eljárás, amiben a kurzor van.Egyébként a példámban az a() és a b() eljárásom ugyanazt csinálja: Megnyit egy új munkafüzetet, és annak a munkalapjának az első cellájába beleírja az "abcd" szöveget.
Először gyakorold az Excel és a Word objektumaival való munkát, csak utána kezdj nekiállni ennek a feladatnak.
-
válasz
Cicero #15919 üzenetére
Ez annyira rohadt egyszeru, hogy nem is nagyon kell hozza programozni. Egyreszt talan meg siman excelben is megoldhato a dolog, ha meg nem, akkor fogod magad, felveszel egy makrot, amiben vegigcsinalod a lepeseket ugyesen, aztan mar csak kb ket if meg egy ciklus kell bele, nagyon meglepne, ha zero programozoi tudassal is tobb, mint 1 nap kene hozza, hogy megcsinald (ha tenyleg minden ennyire egyseges es rendezett, tehat gyakorlatilag kivetelkezeles nem kell).
Új hozzászólás Aktív témák
Hirdetés
● olvasd el a téma összefoglalót!
- ELADÓ i5 14600KF + RTX5070 + 32Gb DDR4 + 600W Platinum + Wifi + SOK GARI + AKÁR HÁZHOZSZÁLLÍTÁS IS!
- Nintendo Switch Lite CFW 20.4 + 256GB microSD, Dual Boot + Atmosphere 1.9.4 + 3 hó garancia!
- Lenovo Thinkpad T14 -50% 14" Brutál AMD Ryzen 5 PRO 4650U 6Magos 16GB 512GB SSD FULLHD IPS MATT
- Nintendo Switch OLED 20.4.0 + Android 15, 256GB MicroSD + okositott OLED Atmosphere 3 hó garanciával
- ASRock B560 Steel Legend + i5 11500 + ID-Cooling + 16 Gb Corsair Vengeance RGB Beszámitok!
- GYÖNYÖRŰ iPhone 11 128GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS3128
- Bomba ár! Lenovo ThinkPad L460 - i5-6GEN I 8GB I 256GB SSD I 14" FHD I Cam I W10 I Garancia!
- ÁRGARANCIA!Épített KomPhone i7 14700KF 32/64GB RAM RX 9070 XT 16GB GAMER PC termékbeszámítással
- Lenovo ThinkPad T15 Gen 2 Intel Core i5-1135G7
- HIBÁTLAN iPhone 14 256GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3533
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: CAMERA-PRO Hungary Kft.
Város: Budapest