- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Samsung Galaxy A34 - plus size modell
- Új térképfunkciók érkeztek az Amazfit T-Rex 3-ba
- Google Pixel topik
- One mobilszolgáltatások
- Nem várt platformon a OnePlus Nord 5
- Google Pixel 9 Pro XL - hét szűk esztendő
- Milyen okostelefont vegyek?
- Elkészült és telepíthető az Android 16
- Xiaomi 14T Pro - teljes a család?
-
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
-
Delila_1
veterán
válasz
torment
#20297
üzenetére
Írd be a Munka2 lapra a 3 soros címet (ha még nem tetted meg), a makró elvégzi a többit.
Sub Valami()
Dim sor1 As Long, sor2 As Long, oszlop As Long
Dim WS1 As Worksheet, WS2 As Worksheet
Set WS1 = Sheets("Munka1")
Set WS2 = Sheets("Munka2")
WS1.Activate
sor1 = 2: sor2 = 4
Do While Cells(sor1, 1) > ""
For oszlop = 1 To 5
WS2.Cells(sor2, oszlop) = Cells(sor1, oszlop)
Next
For oszlop = 6 To 9
WS2.Cells(sor2 + 1, oszlop - 4) = Cells(sor1, oszlop)
Next
For oszlop = 10 To 13
WS2.Cells(sor2 + 2, oszlop - 8) = Cells(sor1, oszlop)
Next
sor1 = sor1 + 1: sor2 = sor2 + 3
Loop
End Sub -
deka1
csendes tag
-
-
torment
csendes tag
A feladat A:M oszlopokból álló adathalmaz soronkénti másolása új lapra, a új formulába.
Ki indulási adatok.
Munka1 lap A:M oszlopok adatai változó sorszámmal
1. sor fejléc
2. sortól adatok
n*
Feladat sorok másolása munka2 lapra az alábbi formába.Lehetséges Makró megoldás?
Előre is köszönöm.
-
csferke
senior tag
Sziasztok!
Sheet1-en D1 =SUM(C1:C5) F2-t nyomva kék kerettel jelölődik a tartomány amit egyszerűen a sarkok mozgatásával tudok változtatni.
Ha viszont a Sheet1-en E1 =SUM(Sheet2!A1:A5) F2-t nyomok akkor nem ugrik a Sheet2 lapra és nem jelenik meg a kijelölt tartomány, hogy a sarkoknál fogva tudjam változtatni.
Így kissé bonyolultabb az tartomány módosítása. Ez így kell, hogy működjön?
Hogyan lehet megoldani, hogyha a kijelölendő tartomány másik munkalapon van akkor szintén F2-re megjelenjen a másik lapon a kék keret amit könnyűszerrel lehet változtatni?
köszi
-
AtHoS
nagyúr
válasz
Delila_1
#20287
üzenetére
Köszi
Ez egy elegáns megoldás. Kár, hogy nem jutott eszembe
Közben megoldottam amúgy egy bonyolultabb módszerrel
2 új oszlop a B elé, ezeket formáztam dátumra, majd rendeztem a B oszlopot, így a végére kerültek a 2014-esek. A létrehozott C oszlop celláiba "=D1-365", ahol ugye a * folyamatosan nő a soroknak megfelelően, majd a C oszlop másol, B oszlopba irányított beillesztés -> érték, majd a C és D oszlop töröl és voálá.
Ehhez képest a csere azért jóval elegánsabb
-
AtHoS
nagyúr
Sziasztok!
Lehet egyszerű a megvalósítása a problémámnak, de sajna nem vagyok ennyire guru excel-ben
Adott egy tábla, melynek B oszlopa dátumot tartalmaz (pl. 2013.01.22). Ez a tábla tavalyi évre vonatkozik, így értelem szerűen 2013-as dátumoknak kellene szerepelni a B oszlop celláiban. Sajnálatos módon számos cellában utólag pótolni kellett a dátumokat (felvitel híján). A pótlás nem sikerült valami jól, mert ugyan a hónap és nap értékek megfelelőek, de az év 2014 lett. Így viszont esélytelen dátum alapján rendezni a táblát, mert a pótoltak összevissza voltak időrendben.
Mivel jelentős a sorok száma, így keresnék egy relatíve gyors megoldást a 2014-es évszámok 2013-ra cseréjére az adott oszlopot tekintve.
A segítséget előre is köszönöm
Szerk. Ja igen, 2003-as excel
-
Delila_1
veterán
A C oszlopba beírod, hogy hányszor szerepel 1-1 hrsz a B oszlopban. A C1 képlete =DARABTELI(B:B;B1), ezt másold le a többi sorba.
Adhatsz feltételes formázást a teljes tartományra, ami kiszínezi a sorokat, ahol a B oszlopban ismétlődő hrsz-ok vannak. Ennek a képlete =$C1>1, és rendelsz hozzá valami feltűnő formátumot.
Nem fontos feltételes formázást adni, az autoszűrővel egy kattintásra le tudod szűrni a sorokat, ahol a C oszlopban 1-nél nagyobb értéket találsz.
-
#20277
Delila_1
veterán
Térközjelző
#20276
Delila_1
veterán
válasz
Térközjelző
#20276
üzenetére
Akkor talán nem kell ennyi tartomány minden egyes járatnak. A járat típusok azt jelölik, hogy a járat milyen megállókon áll meg, lehet elég lenne csak azokat elnevezni, és abban tárolni a rá jellemző útvonalat.
Azokat neveztem el, vagy nem értem, mit írsz.
-
#20276
Térközjelző
csendes tag
Delila_1
#20262
Térközjelző
csendes tag
válasz
Delila_1
#20262
üzenetére
Szia!
Nagyon jó irányba halad a tábla, köszönöm a rengeteg segítséget.
Talán az elnevezés pontatlan, de az Utazás táblában a szolgálati lap száma D oszlop NEM a vonal számát jelenti, az csupán egy futó sorszám pl iktatószám. A Vonal számát CSAK a Menetrend pirosan jelzett cellája adja. Érdemes lehet kihámozni a Járatok lapra.
Még egy szabály eszembe jutott:
Akkor talán nem kell ennyi tartomány minden egyes járatnak. A járat típusok azt jelölik, hogy a járat milyen megállókon áll meg, lehet elég lenne csak azokat elnevezni, és abban tárolni a rá jellemző útvonalat.
ALL: köszönöm mindenkinek aki egyáltalán elgondolkodott a feladaton. Kihívásnak tuti nem rossz.
)Köszönöm!
-
Mutt
senior tag
válasz
AttyVin
#20265
üzenetére
Hello,
Makró nélkül megoldható-e, hogy egy adott munkafüzet valamelyik cellájának tartalmát automatikusan másolja át a program egy másik munkafüzet meghatározott cellájába?
Ha a linkelés/hivatkozás is jó neked, akkor igen.
A lényeg, hogy a másik füzetbe be kell írnod, hogy az értéke az első füzet adott cellájával egyelő.
Ez automatikusan frissül, amíg a hivatkozás érvényes marad.Ha értéket akarsz másolni, akkor csak makróval lehet automatikusan megtenni.
üdv
-
harry
veterán
Sziasztok!
Van egy (amúgy google docs) táblázatom, több munkalappal, minden hónapnak külön lap, ahol listaszerűen tételek vannak felsorolva, a mindenféle kiadásokat tervezem itt vezetni.
A lényeg, hogy van egyfajta "Template" munkalap, itt vannak a kategórianevek, a többi lapra innen vannak átlinkelve a cellák, szóval ha ezt módosítom, átíródik a többi is, ezzel nincs gond.Viszont vannak függvények is, amiket itt szeretnék megírni (pl.: =SUM(A1:A3)), és szintén szeretném átlinkelni a többi lapra, hogy ha itt módosítom, akkor az jelenlen meg minden lapon. Ha simán =munkalap!cella módon írom be, akkor a függvény értékét másolja át, ami nem megfelelő (hiszen a template doksiban nincs mit kiértékelnie, ott nincsenek összegezhető értékek, csak listaszerűen a tételek; meg persze azt akarom, hogy a saját munkalapján lévő értékekkel számoljon).
Azt szeretném tehát, hogy ne az értéket, hanem magát az értéket előállító függvényre tudjak hivatkozni.
Egy (remélem) egyszerű példa:
A1: 1
A2: 1
A3: =A1+A2 (aminek értéke ugye: "2", ez a függvény szerepelne a Template munkalapon)
A4: =A3 (aminek az értéke szintén "2", de azt szeretném, hogy "=A1+A2" szerepeljen itt is, és ő is számolja ki, így ha A3-ban módosítom a függvényt, az itt is módosuljon).Nyilván átmásolhatom a függvényt, de akkor valamennyi módosításnál meg kéne tennem, és valamennyi alkalmazott helyen - de a cél az lenne, hogy egy helyen elég legyen átírni, és minden hivatkozott helyen az új függvény szerepeljen.
-
AttyVin
aktív tag
válasz
AttyVin
#20265
üzenetére
Hiába töröm a fejem, egyelőre nem jutottam a megoldásra, ha van.
Makró nélkül megoldható-e, hogy egy adott munkafüzet valamelyik cellájának tartalmát automatikusan másolja át a program egy másik munkafüzet meghatározott cellájába?
Köszönettel,
Üdv, Atty
Tárgytalan!
Eszembe jutott a pofonegyszerű megoldás.
Köszönettel,
-
DopeBob
addikt
Sziasztok,
Excel pivot táblában szeretnék megoldani valamit, de nem sikerül. Vannak összegeim, meg részösszeg sorok is. A részösszeg mellé kéne egy "részátlag", de sehogy nem sikerül ilyet varázsolnom. Ha átállítom átlagra, akkor nem csak a részösszeg helyett lesz átlag, hanem mindenhol. Lehet ilyen csinálni valahogy egyszerűen?
-
Delila_1
veterán
Bocsi, de a megoldásod nem tudja azt, hogy az egyes járatok adatérvényesítésében csakis az adott járat megállóit ajánlja fel. Pl. a 273-as járatnál csupán 2 állomásnak kellene megjelennie, de itt is, mint a többinél, bejön a 9.
Az enyémen is lehet finomítani, ha lesz időm, megteszem.
-
#20263
Mutt
senior tag
Térközjelző
#20240
Mutt
senior tag
válasz
Térközjelző
#20240
üzenetére
Hello,
Delila_1 javaslatai után én is bedobom a változatomat.
Letölthető innen.Lehet még rajta csiszolni. Sárgával kiemelt mezők segédszámítások.
Mivel az INDIREKT függvény csak megnyitott fájlokon működik, ezért én egy segédtáblába linkeltem be a menetrendeket. A 21, 21A, 32-es menetrendek egymás alatt vannak eredeti formában.
üdv
-
#20262
Delila_1
veterán
Térközjelző
#20252
Delila_1
veterán
válasz
Térközjelző
#20252
üzenetére
Az U5:AX81 tartomány helyett az U1:V32-be bevittem a távolságokat, az S oszlop innen veszi az adatokat.
A sárga hátterű cellák képleteit és érvényesítéseit lemásolhatod a többi sorba, és a többi lapra.
-
#20261
Delila_1
veterán
Térközjelző
#20252
Delila_1
veterán
válasz
Térközjelző
#20252
üzenetére
menetrend.xls
2014-Utazas_1.xlsAz Utazás füzet elejére beszúrtam egy lapot, ahova a másik füzet 21-es lapjáról bevittem az útvonalakat, és az egyes tartományokat elneveztem. A név a tartományok alatt van, kék karakterekkel. Az alsó kötjel szükséges, mert számokat tartalmazó elnevezéseket csak így fogad el az Excel. Ezeket az elnevezett tartományokat használom a Január lap J és K oszlopában. Lesz munkád a többi útvonal felvitelével, de én is jól elbabráltam a képletekkel.
![;]](//cdn.rios.hu/dl/s/v1.gif)
Mindenhol figyeltetni kellett, hogy páros, vagy páratlan-, Ejárat, vagy nem, továbbá indirekt függvénnyel kellett megadni, hogy a menetrend.xls füzet melyik lapjáról vegye az adatokat.A Január lapon sárga hátteret adtam a celláknak, ahova a képleteket, illetve érvényesítéseket bevittem. Az U5:AX81 tartomány képletein is egyszerűsítettem, csak azt nem "festettem be". Oda megadtam egy feltételes formázást, ami a HAMIS eredményű celláknál a karaktert fehérre váltja.
A G, H, Q és R oszlopokat elrejtheted.
A menetrend.xls-en nem változtattam, de ha már feltettem a data.hu-ra, nem törlöm.
Szerk.: Kíváncsi vagyok, ilyesmire gondoltál-e?
-
csferke
senior tag
Sziasztok!
Sheet1-en D1 =SUM(C1:C5) F2-t nyomva kék kerettel jelölődik a tartomány amit egyszerűen a sarkok mozgatásával tudok változtatni.
Ha viszont a Sheet1-en F1 =SUM(Sheet2!A1:A5) F2-t nyomok akkor nem ugrik a Sheet2 lapra és nem jelenik meg a kijelölt tartomány, hogy a sarkoknál fogva tudjam változtatni.
Így kissé bonyolultabb az tartomány módosítása. Ez így kell, hogy működjön?
Hogyan lehet megoldani, hogyha a kijelölendő tartomány másik munkalapon van akkor szintén F2-re megjelenjen a másik lapon a kék keret amit könnyűszerrel lehet változtatni?
köszi
-
karczt
csendes tag
Sziasztok,
Még egy kis segítségre lenne szükségem. Egy táblázat oszlopaiba GEO kódok vannak (47.532607,18.976418) azt szeretném hogy két külön cellára tegye őket. Első cellába lenne a , előtti rész a másikba pedig a , utáni rész.
Előre is köszi a segítségetek!
-
#20255
Delila_1
veterán
Térközjelző
#20252
Delila_1
veterán
válasz
Térközjelző
#20252
üzenetére
Második nekifutásra sikerült letöltenem, megnézem, tudok-e kezdeni vele valamit.
-
#20254
Delila_1
veterán
Térközjelző
#20252
Delila_1
veterán
válasz
Térközjelző
#20252
üzenetére
Bocsi, azóta csak most vagyok net közelében.
Kérlek, küldd el a címemre, mert nem tudom letölteni.
Az már más kérdés, hogy tudok-e majd segíteni.
-
Ba.G
aktív tag
Hálás köszi, egyelőre emésztem a dolgot.
(Valszeg átlag vagy átlag alatti képességű user vagyok, egyelőre értelmeznem kell az infókat. Abban nem vagyok egyelőre biztos, hogy a dokumentum azonosító fixen hozzárendelhető-e egy bizonyos szabványjelzethez... de ezt talán meg is kérdezhetném az MSZT informatikusaitól.)
-
#20252
Térközjelző
csendes tag
Delila_1
#20250
Térközjelző
csendes tag
válasz
Delila_1
#20250
üzenetére
Szia!
Köszönöm, hogy megnézed:
2014-Utazás tábla: ide kellene raknom az eredményt.
és
menetrend.xls tábla ebben kell keresgélni:
Közben érkezett a hír, hogy 1szerűbb lett a tábla, mert csak a közlekedő járatokat tartalmazza, nem kell foglalkozni vele, hogy egy járat épp adott napon megy-e.
Az aktuális remélhetőleg végleges verzio:A táblák azonos könyvárban vannak a számítógépen.
Remélem sikerült minden értelmesen leírnom. Ha mégsem kérlek kérdezősködj.Köszönöm szépen!
-
#20250
Delila_1
veterán
Térközjelző
#20240
Delila_1
veterán
válasz
Térközjelző
#20240
üzenetére
Ez olyan összetett, hogy legjobb lenne elérhető helyre kitenned a füzetet.
-
Delila_1
veterán
válasz
vigyori78
#20238
üzenetére
Első lépésként a gif-et szét kell szedned az alkotó rétegeire. Erre kiválóan alkalmas a PhotoShop. Az egyes rétegeket 1.gif, 2.gif, ... n.gif néven mentsd el egy könyvtárba.
A lapodra az ActiveX vezérlők közül kiteszel egy képet, aminek hivatalból Image1 lesz a neve, amit megváltoztathaszt, és akkor a makróban is át kell írnod.
Érdemes még egy gombot is kitenni, ami leállítja a "mozgás"-t. Nálam ez a gomb Kikapcs névre hallgat.
Az én gifem 10 rétegből állt, a tied jóval többől, ennek megfelelően írd át azIf x = 10 Then x = 1 Else x = x + 1
sort. Az útvonalat is át kell írnod.
A laphoz rendeld az alábbi két makrót.
Private Sub Worksheet_Activate()
Dim MyTimer As Double, x As Integer, utvonal As String
bekapcs = True
utvonal = "C:\Documents and Settings\Felhasználó\Dokumentumok\Képek\"
DoEvents
x = 1: MyTimer = Timer
Do
On Error Resume Next
ActiveSheet.Image1.Picture = LoadPicture(ThisWorkbook.Path & utvonal & x & ".Gif")
On Error GoTo 0
Do
Loop While Timer - MyTimer < 0.07
If x = 10 Then x = 1 Else x = x + 1
MyTimer = Timer
DoEvents
Loop While bekapcs = True
End SubPrivate Sub Kikapcs_Click()
bekapcs = False
End SubAz Image1 tulajdonságainál beállíthatod, hogy ne legyen keret (BorderStyle=0-fmBorderStyleNone), ne legyen kitöltés (BackStyle=fmBackStyleTransparent), és még amit akarsz.
-
Mutt
senior tag
-
Mutt
senior tag
Szia,
...kereshető adatbázis valami javás dolog...
Megnéztem a linket és mivel az URL nem tartalmazza a keresett kulcsszót, hanem csak a dokumentum azonosítót, ezért csak az a megoldás járható hogy készítesz egy segédtáblát amelyben a szabvány száma és a dokumentum id szerepel.
A linkben a portlet_ref= után van a dokumentum id (pl. 060001).
Az alábbi UDF a dokumentum idhez tartozó szabvány számot adja vissza:
Function GrabWebData(URI As String)
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
With IE
.Visible = False
.Navigate URI
Do Until .ReadyState = 4: DoEvents: Loop
x = .Document.body.innertext
x = Replace(x, Chr(10), Chr(13))
x = Split(x, "Hivatkozási szám")
If UBound(x) < 2 Then Exit Function
y = Split(x(2), Chr(13))
.Quit
End With
If Len(y(0)) > 0 Then
GrabWebData = y(0)
Else
GrabWebData = ""
End If
End FunctionMost már csak a fenti függvényt kell egy ciklusba tenni, hogy a lehetséges dokumentum azonosítókon végigmenjen és meg lesz a segédtáblád.
üdv
ps. A ciklus leterhelheti a szervert, ezért óvatosan vele!
-
#20244
risk_dodger
újonc
risk_dodger
újonc
Sziasztok!
A problémám inkább elméleti, de belefutottam makróban egy olyanba, hogy egy véregyszerűnek indult If [feltétel] Then elágazásnál, ha nem írok Else ágat és a feltétel igaz, akkor helyesen lefut és teszi amit kell, kitölt egy mezőt. Ha a feltétel hamis, akkor szépen átugrik az End If utáni részre, a mezőt pedig üresen hagyja, eddig semmi meglepő.
Viszont ha beírok egy Else ágat (hamis feltétel esetén "#N\A"-val töltse ki a cellát), akkor akár igaz, akár hamis a feltétel, csakis az Else ág utasítását hajtja végre, gyakorlatilag figyelmen kívül hagyja a Then ágat. Szintaktikailag jó a script, nem akad el, nem ír sehol hibát és már mások is ránéztek, de nem jövünk rá miért fut default Else ágra, ott is, ahol logikailag nem kellene (más szóval ott, ahol igaz feltétel esetén teszi, amit kell, ha nincs kiírva az Else ág).
A kérdésem csak annyi, hogy ilyet tapasztalt-e már valaki és valami nagyon triviálisat nézek-e be??
Köszi előre is! -
karczt
csendes tag
Sziasztok,
Szeretnék egy kis segítséget kérni. Van egy oszlop tele mindenféle számmal és számok elé kellene fűznöm pár karaktert. pl: a cella tartalma 824. Elé kellene tennem a PRES_ karaktereket, hogy az eredmény PRES_824 legyen. Hogyan lehet ezt vmi fügvénnyel megcsinálni? Mert több ezer soros a táblázat...
Előre is köszönöm a segítséget!
-
#20240
Térközjelző
csendes tag
Térközjelző
csendes tag
Sziasztok!
Először is mindenkinek köszönöm az eddigi segítséget, nagyon szuperül működik minden. O)
Tovább olvasni csak ERŐS idegzetűeknek !!!
Sok embernek kell beosztás összeállítanom, ehhez kérnék segítséget. No-de kezdjük a kályhától.
Először is Excel 2003 a táblázatkezelő, mert lehet, hogy régi gépen is működnie kell, és nem akarok abba belefutni, hogy egy régebbi táblázatkezelőn nem megy a dolog.
A számítógép azonos könyvárában található egy menetrend.xls, és 2014-Utazás.xls nevű tábla.
A feladat a menetrend.xls táblából szeretnék adatokat kihámozni, és azt az 2014-Utazás.xls táblában megjeleníteni.
A menetrend ilyen formában áll rendelkezésre:
Minden vonalat kódja azonosít a D3 cellában tároljuk (piros), ez megegyezik az aktuális munkafüzet nevével
A menetrend több vonalat tartalmaz, külön-külön füzetlapokon. A füzetlapok szerkezete egységes, tehát a tárolás formája egyforma.
Az adott vonalon járatok közlekednek, amiket sorszámuk azonosít(kék):A járat lehet páros vagy páratlan számú. A páros járatokat a 3 sorban E3-tól folyamatosan tároljuk. A páratlan járatok a 17. sorban E17-től folyamatosan tároljuk.
A 4. és 18 sor megadja, hogy az adott számú járat a mai napon közlekedik-e. Tehát az értéke az aktuális dátumtól függ. Az 5. és 19. sor a járat típusát jelöli (lila) /pl: gyors, expressz, betű nélkül=mindenütt megáll/
A járművek páros járatszám esetén A C6-C14 állomásokat járják végig, páratlan járatok a C20-C28 állomásokon közlekednek. Ha a járat E típusú (Expressz lila), akkor az áldomásokat sorrendben a B6-B14, páratlan járatnál B20-B28 tárolja. A járatok időadatait oszlopokban lefelé sorrendben tároljuk. A járatok az állomásokon akkor állnak meg, ha ott idő adat szerepel. A D oszlopban a kilométer-távolságokat találjuk.Feladat: A 2014-Utazás táblában ami így néz ki:
A járatszám (G6) alapján Az induló (H5) és Célállomás (I5) mezőben egy-egy legördülő lista megjelenítése csak az adott járatra érvényes állomásnevekkel. Ezek után a menetrendből az Indulási és Érkezési idő kikeresése és másolása a táblázatba (J5, K5) Legvégül az utazási távolság meghatározása (N5). (Célállomás km - Induló állomás km Mentetrend táblán D12-D7 ha közlekedik a 1122 járat)
Persze nekem is vannak 5leteim, de valahol mindig megakadok: globális dinamikusan bővíthető tartományok létrehozása (Párosjárat, Páratlanjárat, állomás-páros, állomás-páratlan, stb) Érvényesítések feltétel alapján paraméterezése
Lehet ehhez még pár segédtáblát létre kell hozni, de jó lenne makró nélkül függvényekkel megoldani, mert a makró engedélyezése néha zűrös lehet PC biztonsági beállítások miatt.Keresgéléshez segíthet a táblában:
járatszám: meghatározza melyik vonalon milyen irányba haladunk
Páros számú járatná Induló állomásnak bármi választható a teljes vonalon ha a járat típus (lila) betű nélküli=mindenütt megáll, kivéve a lista utolsó eleme, tehát csak C6-C13.
Páratlan számú járatná Induló állomásnak bármi választható a teljes vonalon ha a járat típus (lila) betű nélküli=mindenütt megáll, kivéve a lista utolsó eleme, tehát csak C20-C27
járat típus: az azonos típusú járatok ugyanazon állomásokon állnak meg iránytól függetlenül minden esetben pl Expressz csak azokon az állomásokon áll meg ahol időadat szerepel>> közbenső állomás nem választható. -
Ba.G
aktív tag
Bocs, láma kérdés, de lehet, hogy abból fogósravasz.
Egy táblába szeretnék hivatkozásként rengeteg szabványadatlapot beszúrni (mszt), de ott a nyilvános, kereshető adatbázis valami javás dolog, így csak az utolsó keresés linkjét tudom egyszerű copy+paste módon hivatkozásként beszerkeszteni. ( pl. )Van erre valami eljárás, hogy a linkre bökve a valódi (és ne az utoljára keresett) szabványadatlap jelenjen meg? Telefonkönyv, meg hasonló kereshető listás webes felületeknél valszeg ugyanez a probléma adódik, ennek mentén keresgélek, de még a kérdést sem tudom pontosan megfogalmazni.
EIK! -
#20237
Hegyirabló
veterán
Hegyirabló
veterán
Sziasztok!
Hogyan tudok egy cellához több képet hozzárendelni?
Köszönöm!
-
Delila_1
veterán
-
earth
csendes tag
válasz
Delila_1
#20218
üzenetére
Hello.
Köszönöm a válaszod, de én több száz vagy ezer számról beszélek és nem szeretném megszámolni mennyi hasonló van én azt szeretném hogy ezt a program megcsinálja maga. Az első lapon van kb több ezer termékkód egymás alatt amit egy cégtől kaptam, a második lapon pedig azok a termékkódok amiket mi szoktunk rendelni ugyanattól a cégtől de még nehezíti a feladatot hogy teljesen különböző sorrendben. És azt szeretném hogy ami az első lapon megegyezik a második lapon lévővel azt tegye a harmadik lapra.
Köszönöm.
-
konyi79
addikt
sziasztok, ismét itt.
Most abban szeretnék segítséget kérni, hogyan tudom azt megoldani, ha a munkafüzetben kijelölök egy területet, és az abban lévő értékeket amit képletek adnak rögzíteni szeretném, azaz a számolt érték legyen véglegesen a cellák tartalma ne a képlet.
Nem a teljes lapon, csak a kijelölt területen.Köszönöm előre is!
-
Vladek83
tag
Sziasztok!
Van egy Macro, ami szűr ill. nyomtatási képet generál.
Ha a "lapvédelem" nincs bekapcsolva szépen teszi a dolgát, viszont ha bekapcsolom akkor hibára fut... A lényeg, hogy ne tudjanak beleírni/törőlni az adott cellákba..... Már a lapvédelemnél már mindent próbáltam, de nem akar összejönni... Valakinek esetleg ötlete? -
tgumis
tag
válasz
Delila_1
#20220
üzenetére
Megpróbáltam de nem müxik
Létrehoztam egy segédtáblát oda irányitott beillesztéssel átmásoltam mindent de ahogy kész voltam és mindent f_án megformáztam rögzítés vége. Majd új adatokkal feltöltöttem a táblázatot elindítottam a makrót és semmi nem történt maradt az előbb kitöltött adatokkal -
Saua
tag
Sziasztok
Nagyon kezdő vagyok, az alábbi problémát szeretném megoldani.
Egy adott cellában szereplő text értékeket szeretném összeadni számok formájában, tehát van A1, B1, C1 , D1, E1 cella.
Az X érteke 9, az Y értéke 7, ezek véletlenszerüen lehetnek beírva az A1-D1 cellába, az E1 cellában pedig meg kellene jelenjen az összeg értéke.
Például az A1-ben X szerepel, B1-ben X, C1-ben pedig Y és D1-ben semmi, akkor a E1-ben az összeg, azaz 25 jelenjen meg.Előre is köszi a segítséget.
-
Delila_1
veterán
válasz
tgumis
#20219
üzenetére
Ahhoz, hogy cellán belül más-más formátumot adhass az egyes összetevőknek, a képlet helyett a cella értékét kell beillesztened – vagy a képlet cellájába, vagy egy másikba, és ezt az értéket formázhatod.
Az érték beillesztése: a képletet tartalmazó cellán állsz, másolod. Ezután vagy maradsz a kijelölt cellán, vagy egy másik helyre állsz, oda, ahol az értéket létre akarod hozni. Ezen a cellán jobb klikk, irányított beillesztés, értéket. Létrejött a fix értéket, nem képletet tartalmazó cella.
A cellán állva a szerkesztőlécen kijelölöd a példa szerinti kék szót, kékre állítod a karakter színét. Kijelölöd a következő formázni kívánt részt a szerkesztőlécen, végrehajtod a formázást, Enter.
Amit írtam, az egy makró, ami automatizálja több cella azonos formázását. Ezt abban az esetben tudja végrehajtani, ha a cellák tartalma valamilyen azonos tulajdonsággal rendelkezik, például mindegyik tartalmaz egy alsó kötjelet, és az ettől balra, ill. jobbra eső résznek kell eltérő formátumot adni. A makró a képletek értékké alakításával indul.
-
tgumis
tag
válasz
Delila_1
#20210
üzenetére
Köszi a választ de abszolút semmi t nem értek belőle. Bocs de akárhogy is olvasgatom a fórumot sehogy nem történik semmi.Ez amit leírtál visual basic kód? Azzal mit kel csinálni?
példán keresztül bemutatnád?
A1 kék
A2 lapát
A3 nyéll
A4 papám kertjétA5 én kék lapát nyéllel ástam a papám kertjét
="én "&A1&" "&A2&" "&A3&"el ástam a "&A4
hogyan tudom a kék szót kékké a lapát nyél-t és a el-t félkövérré (nyéllel lesz belőle összefűzés után) -
Delila_1
veterán
Az első lapra beíratod a számok mellé a DARABTELI függvénnyel, hogy a második lapon hányszor fordulnak elő ugyanazok.
=darabteli(Munka2!A:A;A2) – feltételezve, hogy a lapon van címsor, és hogy mindegyik lapon az A oszlopban vannak a számok.Ahol nullánál nagyobb értéket kapsz, az megvan a másik lapon is. Teszel egy autoszűrőt, ami a nullánál nagyobb értékekre szűr a képletet tartalmazó oszlopban, és a szűrt sorokat már másolhatod is a 3. lapra.
-
earth
csendes tag
Sziasztok.
Egy segítséget kérnék. Szeretnék az excel macro-val egy összehasonlítást elvégezni ahol ciklikusan kérdez. Úgy szeretném hogy egy munkafüzeten belül lenne 3 db sheet. Első sheet-en lenne egy oszlop sok különböző számokkal egymás alatt a második sheet-en is és a harmadik sheet-re szeretném másolni azokat az adatokat amik megegyeznek.
Ha valaki megoldja nagyon hálás lennék érte.
Minden segítség szívesen veszek.
Előre is köszönöm. -
nem konkrét megoldást várok most, inkább csak elméleti rávezetést, hogyan is érdemes nagy számú adat közül (nagy rangek) kijelölni, hogy legyen mondjuk piros színű a 3 legnagyobb érték, és legyen kék a 2 legalacsonyabb. ugye feltételes formázás esetén meg kell adni a fix értékhatárokat, itt viszont ez dinamikusan változna az értékek változásával.
köszi a tppeket
-
#20214
risk_dodger
újonc
risk_dodger
újonc
Sziasztok!
Makróval kapcsolatos problémám lenne és nem nagyon találom a megoldást (két napja írogatok makrókat, ennyire értek hozzá
).
Van két worksheet ("Database", "Alap"), és azt szeretném, hogy a "Database!A1" cellában lévő dátumot keresse meg az "Alap!A1500" tömbben, és adja vissza a helyét. Erre írtam (loptam) egy makrót, de csak számmal működik, dátummal már nem:Sub datumkeres()
a = Workbooks("Database.xlsx").Sheets("Sheet1").Cells(1, 1).Value 'Ezt az értéket keresem
With Workbooks("Gyak.xlsm").Worksheets("Alap").Range("a1:b500") 'Ebben a tömbben
Set c = .Find(a, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Worksheets("Alap").Range("D6").Value = firstAddress
Else: MsgBox ("Nincs találat!")
End If
End With
End SubHa valakinek van ötlete, kérem segítsen abban, hogy lehet a dátum formátumot kezelni!
Köszönöm előre is! -
Delila_1
veterán
Sokaknak van ilyen gondja, de az Excel fejlesztői úgy gondolják, hogy a felhasználók nem tudnak önállóan egy dátumformát megadni, ezért automatizálták.
Az nem jutott eszükbe (sok éven át), hogy dátumon kívül egyéb, számjegyeket és pontokat tartalmazó adatot is akarnak egyes elvetemült emberek bevinni. -
Cucori
tag
Sziasztok!
Lenne egy kérdésem, remélem érthetően tudom majd elmagyarázni.
Hogy lehet olyat csinálni, hogy van egy mezőm, amiben van x szám, legyen ez mondjuk egy raktárkészlet. És egy külön mező, amibe beírok x számot, amivel pl ez a készlet nő, vagy csökken (gondolom + vagy - előjellel), és hogy amit ide írok, azzal a készlet növekedjen ill csökkenjen. Milyen képlettel lehet ilyet csinálni, vagy hogyan megoldható?
Akinek van rá megoldása legyen szíves ÜZIBEN válaszoljon, azt tudom olvasni.
Köszi! -
Delila_1
veterán
válasz
tgumis
#20207
üzenetére
Egy példa arra, hogy az összefűzött adatnál hogy lehet cellán belül formázni:
Sub FormazasCellanBelul()
Dim kezd As Integer, sor As Integer
'Képletek értékké alakítása
Columns(3).Copy
Range("C1").PasteSpecial xlPasteValues
sor = 1
'Formázás
Do While Cells(sor, "C") <> ""
'Kötjel helyének megállapítása
kezd = Application.WorksheetFunction.Search("_", Cells(sor, "C"))
'Kötjel előtti rész színének beállítása
Cells(sor, "C").Characters(Start:=1, Length:=kezd - 1).Font.ColorIndex = 3
'Kötjel utáni rész félkövérre állítása
Cells(sor, "C").Characters(Start:=kezd + 1, Length:=100).Font.Bold = True
sor = sor + 1
Loop
End SubAz összefűzött adatok nálam a C oszlopban vannak. Az adatokat alsó kötjel beiktatásával fűztem össze. Ezeket csak akkor tudom cellán belül formázni, ha a képletek helyett irányított beillesztéssel átalakítom értékekké.
Az alsó kötjel előtti karakterek színét pirosra állítottam, a kötjel utániak félkövérek lesznek. -
Delila_1
veterán
válasz
tgumis
#20207
üzenetére
Automatikusan nem tudod az egyes összetevőket cellán belül formázni. A bevitel után kijelölöd a formázandó részt a cellában, vagy a szerkesztőlécen, és a cellaformázás menüben adod meg a formátumot.
Abban az esetben, ha mindegyik cellában valamilyen szempontból azonos részt akarsz félkövérre formázni, makróval is meg lehet oldani. A szempont lehet pl. az, hogy mindenhol az n-ediktől kezdve akarsz x darab karaktert félkövérre állítani.
-
Delila_1
veterán
A VB szerkesztőben a ThisWorkbook laphoz kell rendelned a makrót, ami a füzet bezárásakor rákérdez a törlésre.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim v$
v$ = MsgBox("Töröljem az adatokat", vbYesNo + vbQuestion)
If v$ = vbYes Then
Sheets("Adatok (2)").Range("B4:F4").Select
Range(Selection, Selection.End(xlDown)).ClearContents
End If
End Sub
)
![;]](http://cdn.rios.hu/dl/s/v1.gif)
EIK!
).
Új hozzászólás Aktív témák
Hirdetés
Fferi50
- Sea of Thieves Premium Edition és Egyéb Játékkulcsok.
- Assassin's Creed Shadows Collector's Edition PC
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Eredeti Lenovo USB-C 65W töltő
- 0% THM részletfizetés, beszámítás! Gamer PC, notebook, konzol, Apple termék, hardver KAMATMENTESEN!
- AKCIÓ! Dell Latitude 5440 14 FHD üzleti notebook - i5 1335U 8GB RAM 256GB SSD Intel Iris Xe
- Bomba ár! Dell Latitude 7280 - i5-7GEN I 8GB I 256SSD I 12,5" FHD I Cam I W11 I Garancia!
- BESZÁMÍTÁS! VALVE Steam Deck LCD 1TB SSD kézikonzol garanciával hibátlan működéssel
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: CAMERA-PRO Hungary Kft
Város: Budapest