- Hivatalos a OnePlus 13 startdátuma
- Milyen okostelefont vegyek?
- Telekom mobilszolgáltatások
- Minden a BlackBerry telefonokról és rendszerről
- Redmi Note 13 Pro 5G - nem százas, kétszázas!
- Vivo X200 Pro - a kétszázát!
- Sony Xperia 1 VII - Látod-e, esteledik
- Szakít a OnePlus és a Hasselblad?
- Mindenki Z Fold7-et akar
- Köredzésen járt az Exynos 1680
Hirdetés
-
Mobilarena
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
-
gurabli
őstag
válasz
gurabli #39203 üzenetére
Hátha tudtok segíteni.
Milyen szoftverrel tudnám legjobban megoldani egy word doksi automatizált összerakását?
Fix layout, mindig egy oldal. Adott helyen van egy kép, ami mindem esetben cserélődik, ahogy kb. 5 adat, amit egy Excelbol hívna be. Utóbbira még jó is lehet a Word körlevél funkciója, úgy latom meg tudom oldani a dolgot.Utána az elkészül oldalakat egyenként kellene menteni, fájlnév pedig lehet pl. a Heading1. Erre láttam fizetős megoldást, de hátha könnyen megoldható.
Ez már Word és Excel kérdés
-
Fferi50
Topikgazda
válasz
gurabli #39201 üzenetére
Szia!
A Word körlevél funkciója lesz neked jó. A körlevél forrása az adott Excel fájl. Ha nincs benne fejléc sor, akkor tegyél bele egyet beszúrással első sornak.
Ezután összekapcsolod a Worddel és szépen kiválogatod, hogy melyik Excel oszlop hova kerüljön a Word levélben (ezek nem labelek, hanem mezők lesznek a Wordben).
Egyszer megcsinálod a körlevél "sablont", utána csak görgetni kell a rekordokat vagy meghatározhatod azt is, hogy mettől-meddig készítse el a dokumentumot.Üdv.
-
Delila_1
veterán
-
lappy
őstag
válasz
gurabli #15620 üzenetére
Szia!
Na most az a kérdés hogy milyen sokszor szeretnéd átmásolni azt az egy képletet!
Ha viszonylag kevés cellába akkor a következőt tedd!
1. Beilleszted a képletet a megfelelő helyre.2. kijelölöd addig a sorig ameddig nem kell a képlet (mondjuk H10 ben van képlet és a következő a H16 be kell, akkor H10-H15 kijelölöd)
3. És utána a kijelölt cellánál megfogod a kis + jelet és végighúzod az oszlopon!!
-
gurabli
őstag
válasz
gurabli #15620 üzenetére
Sajnos már nem tudom szerkeszteni. És utána egy olyan makró kellene, ami a bekerült képlet által keletkezett eredményt átalakítja értékké és nem képlet lesz. Tehát a H10, H16, H22, és így tovább cellákban szereplő szám érték lesz és a képlet eltűnik.
Tudom, hogy sokat kérek, de nagyon kellene a segítség és nagyon hálás vagyok Nektek érte!
Közben az fkeres használatát sikerült megoldanom egy youtube videó segítségével, és még működik is, a gond csak ott van, hogy azokba a cellákba, ahol az adat táblában nem szerepel adat, hibát ír ki. No, azt törlöm manuálisan.
-
Delila_1
veterán
válasz
gurabli #15599 üzenetére
A makró beírása úgy történik, hogy Alt + F11-gyel előcsalod a VB szerkesztőt. Bal oldalon ráállsz a füzeted nevére. Insert menü | Module. Jobb oldalon kapsz egy üres felületet, oda másold be a makrót.
Visszalépsz a füzetbe, ott Alt + F8-cal bejön a makrókat tartalmazó ablak, ahonnan indíthatod a makrót.
-
Delila_1
veterán
válasz
gurabli #15595 üzenetére
Minden feladatra van több megoldás. Lappy válasza is biztosan jó, én mást agyaltam ki.
Úgy látom a csatolt képen, hogy azon a lapon, ahonnan másolni kell, az N oszlopban folyamatosan vannak adatok, ezért ebből az oszlopból veszem az utolsó sort.
A két Set kezdetű sorban írd át a lapok nevét.Sub Tizenhat()
Dim sorIN%, sorID%, usorIN%, WSIN As Worksheet, WSID As Worksheet
Set WSIN = Sheets("Innen")
Set WSID = Sheets("Ide")
usorIN% = WSIN.Cells(Rows.Count, "N").End(xlUp).Row 'utolsó sor az Innen lapon
sorID% = 10
Do
For sorIN% = 2 To usorIN%
WSID.Cells(sorID%, "G") = WSIN.Cells(sorIN%, "N")
sorID% = sorID% + 6
Next
Loop While sorIN% < usorIN%
End Sub -
lappy
őstag
válasz
gurabli #15595 üzenetére
Egy hasonló macro a problémára!
Sub Makró1()
For i = 0 To 298 'ez az oszlop első 298 celláját másolja
Range("A" & i + 1).Select 'másolandó cella kijelölése (pl A1, A2, stb...)
Selection.Copy 'cella másolása
Range("B" & i * 16 + 1).Select 'célcella kijelölése (pl B1, B17, B33, stb...)
ActiveSheet.Paste 'cellába másolás
Application.CutCopyMode = False 'kijelölés megszüntetése
Next
End Sub
Új hozzászólás Aktív témák
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- ROBUX ÁRON ALUL - VÁSÁROLJ ROBLOX ROBUXOT MÉG MA, ELKÉPESZTŐ KEDVEZMÉNNYEL (Bármilyen platformra)
- Humble megmaradt kulcsok Frissítve 08.05
- HIBÁTLAN iPhone 14 128GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3093, 91% Akkumulátor
- HP ZBook Firefly 14 i7-1165G7 16GB 512GB 14" FHD magyarbill 1 év garancia
- LG 27GR95QL - 27" OLED / Limitált LoL Edition / QHD 2K / 240Hz & 0.03ms / NVIDIA G-Sync / FreeSync
- Prémium PC házak akár 20-40% kedvezménnyel eladók garanciával, számlával!
- HP EliteBook 835 G7 AMD Ryzen 5 4650U
Állásajánlatok
Cég: FOTC
Város: Budapest