-
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
- Autós topik
- Az eddigi legolcsóbb, 3D V-Cache-t használó CPU-ját hozta forgalomba az AMD
- HiFi műszaki szemmel - sztereó hangrendszerek
- Szívós, szép és kitartó az új OnePlus óra
- Bemutatkozott a Poco X7 és X7 Pro
- Építő/felújító topik
- Apple MacBook
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Mibe tegyem a megtakarításaimat?
- BestBuy topik
- További aktív témák...
- Microsoft és egyéb dobozos retro szoftverek
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- MS SQL Server 2016, 2017, 2019
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- PXN V9 Gen 2 Kormány+Pedál+Váltó BONTATLAN!
- Dell Core i5 - i7 - 8-10-11-12. gen. üzleti kategóriás notebookok számlával
- GYÖNYÖRŰ iPhone 13 128GB Starlight -1 ÉV GARANCIA - Kártyafüggetlen, MS4404
- 203 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 7 7745HX, RTX 4070
- szinteÚJ Lenovo ThinkPad L14 Gen5 i7 155U 16GB 1TB FHD+
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50