Az „Excel” fórum célja, hogy keretet adjon az Excel felhasználók széles táborának tapasztalataik megosztására, és lehetőséget a segítséget kérőknek. Az alábbi összefoglaló azért készült, hogy segítse a helyes kérdésfeltevést.
– Írd le szabatosan a problémát. Úgy fogalmazz, hogy ne csak te magad, de a szakértő is megértse, mire szeretnél választ kapni.
– Írd le, hogy milyen verziójú Excellel dolgozol. (Vagy ha nem – ill. nem csak – Excel, akkor micsoda?)
– Írd le, hogy milyen úton indultál el, és hol akadtál el rajta.
– A kérdés megértése szempontjából sokat segíthet, ha feltölteszt egy képet, amin látszik, hogy mit szeretnél, vagy illusztrálja azt.
– Még jobb, ha feltöltesz egy minta munkafüzetet valahová (pl. data.hu). Feltöltés előtt távolítsd el belőle a nem publikus adatokat.
– Ha a feladat jellege olyan, célszerű az "előtte" és "utána" állapotokat bemutatni. (Miből kellene csinálni mit?)
– Ha VBA kódon kell javítani, másold be a releváns kódrészt. Rövid kód mehet hozzászólásba, hosszú kód inkább ide: http://pastebin.com/
– Ha valami nem úgy működik, ahogy kellene, add meg a rendellenes viselkedés jellemzőit, a hibaüzenetet, és a hibát okozó programsort.
On Error Resume Next Set xOtl = CreateObject("Outlook.Application") Set xOtlMail = xOtl.createitem(olMailItem) With xOtlMail .To = Cells(234, 5).Value .cc = Cells(235, 5).Value .BCC = Cells(236, 5).Value .Subject = Cells(238, 5).Value .HTMLBody = .HTMLBody & xStrBody .display End With Set xOtl = Nothing Set xOtlMail = Nothing End Sub
Hasonló problémába ütköztem én is anno. Én Thunderbird levelező klienst vezérlek Excelből. Olyasmi volt a problémám, hogy ha Excel munkalapról olvastam be a szöveget, vagy a makróba írtam bele, akkor bizonyos karaktert vezérlő karakternek vett és hibával leállt a levél küldés vagy be se töltötte rendesen a szöveget.
Ezt úgy oldottam meg, hogy a Thunderbird esetében meg lehet adni külső fájlt is levél törzsnek és azt a Thunderbird dolgozza fel és nem az Excel vagy a parancssori meghívás. Így már csak az Excelből kellett elmenteni egy html kódokkal megformázott fájlt, amit nálam TXT kiterjesztésű, de ennek nincs is jelentősége.
Valószínűleg itt is valami hasonló megoldást kellene keresni.
Hátha tud valaki segíteni. Az alábbi kódot a NEtről loptam. Azért loptam,mert szeretnék Excel-ből úgy Emailt küldeni, hogy a szövegben van egy hivatkozás, amire a levelet olvasó rákattintva valamit elérhet
Na most akárhány példát találok a neten, pont avval a "ref"-es sorral van baja a rendszernek. Naszóval ki tud segíteni, hogy tudnék a levél szövegébe hyperlinket tenni?
Előre is köszönöm, ha valaki tud valaki okosságot
Sub EmailHyperlink() 'updated by Extendoffice 20190815 Dim xOtl As Object Dim xOtlMail As Object Dim xStrBody As String xStrBody = "Hi there：" & "<br>" _ & "Please click " & "<a href="/"http://www.extendoffice.com"">Here</a> to open the page" & "<br>" _ & "Thank you." On Error Resume Next Set xOtl = CreateObject("Outlook.Application") Set xOtlMail = xOtl.CreateItem(olMailItem) With xOtlMail .To = "Email Address" .CC = "Email Address " .BCC = " Email Address " .Subject = "Subject line" .HTMLBody = .HTMLBody & xStrBody .Display End With Set xOtl = Nothing Set xOtlMail = Nothing End Sub
Köszönöm. Sajnos, mint írtam a kritérium több az eredetiben (25-30 sor). Így már nem működik tömbképlettel. Hisz egy feltétellel csak egy szumha lenne, 4-5 feltételle egy szumhatöbb.
Csináltam egy rövid UDF-et hozzá, tömbváltozókba szedi ami kell és kiszámolja azt amit szeretnék.
Már csak azt nem tudom, hogy mivel lehetne megkerülni, hogy ne a kezdődő karaktereket hasonlítsa, hanem a teljes kifejezést. Mert nincs lehetőség odarakni a '=szöveghez az egyenlőségjelet és mást sem. (Egyébként működik " '= " kifejezéssel is: Aposztróf=szöveg)
Amúgy jó dolog ez az ab.szum, kb ugyanaz az elv, mintha pivotot használnék - de itt szövegesen, operátorokkal bőven lehet definiálni a kritériumot.
Szia! "Itt már csak egy dolgot nem értek. Ha az ap az S2, vagy a V2 cellában van, akkor jó eredményt ad, ha a T2, vagy U2-ben, akkor nem."
A helyzet az, hogy a kritérium az adott fejlécre vonatkozik minden esetben. Mivel az T oszlopban n a fejléc, az u oszlopban pedig üres, ezért nem értelmezhető a függvény számára.
