Alo A apărut o problemă: lucrez cu o mulțime de fișiere excelente identice. A creat o macrocomandă care procesează documentul. Dar nu există nici o modalitate de a face salvarea corectă: fișierul original este CSV, la final ar trebui să arate ca xlsx. După salvare, veți primi în continuare un fișier CSV. Spuneți-mi cum să salvez fișierul într-un folder standard, într-un format nou cu același nume de fișier. Voi fi foarte recunoscător.
Timpul bun al zilei am scris macro-ul de salvare a unei anumite cărți excelente. Pe un computer, totul pare să funcționeze bine. Nu contează ce carte este activă momentan, modul necesar este salvat în modul înalt, numai starea barei de salvare este vizibilă. Pe cealaltă mașină, totul este complet diferit, când este activată autosavigrarea cărții necesare, ea este salvată și se închide, iar cea anterioară se deschide și astfel întotdeauna în timp ce macro-ul se rotește. și uneori fișiere ciudate precum AOE33300 sunt create. în același director în care se duce autosave. Care ar putea fi motivul pentru o astfel de situație sau o eroare incomprehensibilă? Iată codul.
Există un document pe care trebuie să-l salvați în dosarul dorit și cu numele din textul acestui document (textul din tabel). Problema este că multe lucruri se creează în ziua acestor documente și de fiecare dată este leneș să o facă. Ajută-ți ceainicul. Am atașat fișierul - trebuie salvat cu numărul aplicației, (adică 1234 în acest caz, dar de fiecare dată când numărul aplicației este diferit) Vă mulțumim anticipat
Ajutor vă rog! Am fost în Outlook macro care citesc toate mesajele primite și a le stoca într-un anumit dosar. Apoi a existat un fel de eșec, iar macroul a dispărut. Am scris unul nou, dar aceasta nu funcționează până la capăt, și anume, primi o scrisoare, el nu a citit sau păstrează, atunci când este vorba în urma unei scrisori, acesta este procesat mai întâi, iar al doilea din nou inhibă, și anume se dovedește că el lucrează printr-un singur lucru. programator local luptă cu ea, dar sensul de zero, eu nu fac un programator, dar doar într-adevăr am nevoie de ea cel mai mult, eu pot fir, care poate ajuta (((Iată macro: SaveAattachments Sub (myItem Ca Outlook.MailItem) „SaveAattachments Sub () Dim oNameSpace Ca NameSpace Dim oFolder Ca MAPIFolder „Dim mI Ca MailItem Dim mI Dim DestFolder ca șir de Dim i INTEGER Set oNameSpace = ThisOutlookSession.Session Set oFolder = oNameSpace.GetDefaultFolder (olFolderInbox) În cazul în care Len (Dir („L: \ Hărți \ CardPL \ Files \ In ")) = 0 Apoi DestFolder =" C: \ Card_In "DestFolder Else =" L: \ Hărți \ CardPL \ Files \ În „Dacă End Pentru fiecare MI În oFolder.Items Dacă MI.UnRead = True Apoi Dacă MI .Attachments.Count> 0 Apoi, pentru i = 1 Pentru MI.Attachments.Count MI.Attachments.Item (i) .SaveAsFile DestFolder MI.Attachments.Item (i) .DisplayName Urmatorul sfarsit Daca MI.UnRead = Sfarsit fals Daca Next End Sub Singurul lucru care ma confunda este DestFolder = "C: \ Card_In". Spun din nou că nu sunt un expert, dar pe unitatea C nu am un dosar Card_In, poate că așa ceva este. Sper că ai nevoie de ajutor.
Trimiteți-le prietenilor: