-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
enelna
csendes tag
Üdvözlök Mindenkit !
azopi74 egyik válaszában segített valakinek ezzel makróval. Személyemre szabtam úgy ahogy én szeretném futtatni, ezzel el is fogyott a tudományom. Abban kérem a segítségeteket, hogy ez a makró minden reggel fusson le automatikusan 07 órakor függetlenül attól, hogy munkanap van e vagy nincs. A gép folyamatosan be van kapcsolva. Mit kell még beírnom és hova ?
Sub kuldes()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"E:\uzemkepesseg.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:= _
FalseDim Outlook As Object, EMail As Object
Set Outlook = CreateObject("Outlook.Application")
Set EMail = Outlook.CreateItem(0)
With EMail
.to = "enelna@gmail.com; nagylaszl@fkf.hu"
.CC = ""
.BCC = ""
.Subject = "üzemképesség MMSZ"
.Body = "Szia ! A mai üzemképesség jelentés".Attachments.Add "E:\uzemkepesseg.pdf"
.Send
End With
Set EMail = Nothing
Set Outlook = Nothing
End Sub -
enelna
csendes tag
Sziasztok !
Szeretném a segítségeteket kérni.
A1- A31 oszlopban a hónap napjai 1-2-3-4……….
B1- B31 oszlopban a beosztást jelölő betű például „A” „B” „C” „SZ” .......
Azt szeretném, hogy ,amikor „SZ” betű szerepel a „B” oszlopban akkor „C1”mezőben írja ki az „SZ”betű melletti „A” oszlopban szereplő számot.
Ha hatszor szerepel az „SZ” akkor mind a hat számot pontosvesszővel elválasztva egymástól.
Ez egy munkalap lenne és az adott hónapon belüli szabadságos napok felsorolása lenne a feladat.
Köszönöm
Új hozzászólás Aktív témák
- Fejhallgató erősítő és DAC topik
- Vezetékes FEJhallgatók
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- HiFi műszaki szemmel - sztereó hangrendszerek
- Xiaomi 17 Ultra - jó az optikája
- Milyen alaplapot vegyek?
- sziku69: Fűzzük össze a szavakat :)
- Asztalos klub
- Android alkalmazások - szoftver kibeszélő topik
- PlayStation 5
- További aktív témák...
- GYÖNYÖRŰ iPhone 13 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3293
- Nothing Phone 1 / 8/256GB / Kártyafüggetlen / 12HÓ Garancia
- Dell Precision 5530 15,6" UHD touch, i7 8850H, 16GB RAM, 4GB VGA, 512GB SSD, jó akku, számla, gar
- SK Hynix 32GB DDR4 2666MHz PC4-21300 laptop RAM
- Eladó EDIFIER ES prémium hangszórók ES300 / ES60 / ES20
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50