Köszi, de olyan, mintha semmi sem történne.
Nem nyomtatja ki egyébként.

Freedom, Nature, Love & Music

Rögzíts egy nyomtatást a Sheet2 lapról, és azt másold be a

ActiveWindow.ActiveSheet.PrintOut Copies:=1, Collate:=True

sorok helyére.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Sziasztok,
ékezetes karakterek ékezet-mentesítésére van lehetőség?

ambiguous name detected: Nyomtat

Freedom, Nature, Love & Music

Így nézek ki:

Sub Nyomtat()
Dim sor1 As Long, sor2 As Long
Sheets("Sheet1").Select

sor1 = 2: sor2 = 1

Do While Cells(sor1, "A") <> ""
Range("A" & sor1 & "" & sor1 + 4).Copy
Sheets("Sheet2").Range("A" & sor2).PasteSpecial Paste:=xlPasteValues, Transpose:=True
sor1 = sor1 + 5
If sor2 >= 63 Then
Sheets("Sheet2").Select
Sub Nyomtat()
'
' Nyomtat Makró
' Printing
'
' Billentyűparancs: Ctrl+k
'
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
Cells.ClearContents
Sheets("Sheet1").Select
sor2 = 1
Else: sor2 = sor2 + 3
End If
Loop
If Sheets("Sheet2").Range("A1") > "" Then
Sheets("Sheet2").Select
Sub Nyomtat()
'
' Nyomtat Makró
' Printing
'
' Billentyűparancs: Ctrl+k
'
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
Cells.ClearContents
Sheets("Sheet1").Select
End If
End Sub

Freedom, Nature, Love & Music

Kétszer szerepel a Sub Nyomtat() sor, ezért kétértelmű.

Ne a teljes, rögzített makrót másold az említett sor helyére, csak a Sub és End Sub közöttit, ezt:

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False

[ Szerkesztve ]

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Igen, a csere funkcióval, minden ékezetesre külön.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Már nem ír ki hibaüzit, de nem történik semmi.
Mi lenne, ha a nyomtatást manuálisan csinálnám.
Elég, ha teleírja a 65 téglalapot, megáll én printelek, aztán mondjuk egy rádió gombra katt
és akkor 66-tól folytatja, amíg adatot talál sheet1-en.

Freedom, Nature, Love & Music

hali

egy kis help kéne:
egy egy cella amibe egy képlet: pl: A1*B5, ennek az értéke mondjuk 200 és ezis jelenik meg a cellába, és azt szeretném megoldani hogy simán értékké varázsolni ugyanezt a cellát, vagyis ha rámész a cellára nem a képletet fogod látni tartalomnak hanem azt hogy 200 van beleirva!
köszi

P4

Nagyon szépen köszönöm Neked és Delilának! Hálám üldözzön benneteket!

XLive: SentineLHUN | Nintendo: SW-1636-2305-7415

Itt a manuális nyomtatáshoz a makró, bár nálam hiba nélkül végrehajt mindent.

Sub Nyomtat()
Dim sor1 As Long, sor2 As Long
Sheets("Sheet2").Cells.ClearContents
Sheets("Sheet1").Select

If Range("V1") = "" Then Range("V1") = 2
sor1 = Range("V1"): sor2 = 1

Do While sor2 <= 66
Range("A" & sor1 & ":C" & sor1 + 4).Copy
Sheets("Sheet2").Range("A" & sor2).PasteSpecial Paste:=xlPasteValues, Transpose:=True
sor1 = sor1 + 5
sor2 = sor2 + 3
Loop

Range("V1") = sor1

Sheets("Sheet2").Select
MsgBox "Nyomtass"

If Application.CountA(Sheets("Sheet1").Columns(1)) < sor1 Then _
Sheets("Sheet1").Range("V1") = ""
End Sub

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Köszi, de...

Freedom, Nature, Love & Music

Sziasztok!

Segítségre lenne szükségem az alábbi probléma megoldásában:

Adott egy tábla, aminek egy oszlopa dátumokat tartalmaz. Erre szeretnék rászűrni, hogy csak egy adott hónapban történt eseménysorozat sorait mutassa. A szűrés utáni táblának egy oszlopát pedig summázni szeretném, és ennek az eredménynek kéne átkerülnie egy új lapon lévő táblába.

Köszi szépen előre is.

the troopa of tomorrow _ maydayzor FUTURE WALKS

A beállításoknál kapcsold be a két Analysis kezdetű bővítményt, akkor jó lesz.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Az összegzéshez a RÉSZÖSSZEG függvényt alkalmazd. A súgóban megtalálod a leírását.
A másik táblában erre a cellára hivatkozz.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Nem teljesen értem, amire gondolsz...

A lényeg, hogy szeretném ha egy dinamikus érték szerepeljen a célcellában, és ne kelljen újra meg újra rászűrnöm a táblára, majd újra beállítani a summázandó tartományt, ha netán új sorral bővül az eredeti tábla.

Kicsit átfogalmaztam:

Van 2 táblám. A 2. tábla A oszlopa dátumokat tartalmaz (éééé.hh.) A B ( szám ) oszlopba egy olyan összeg kerül, ami az 1. tábla X ( szám ) oszlopainak összege, ahol soronkent Y( éééé.hh ) oszlop = A ( éééé.hh ) .

Tehát ha egyel több Y = A sorom van akkor egyel több X értéket adok hozzá a B számhoz stb...

the troopa of tomorrow _ maydayzor FUTURE WALKS

Szűröd az A oszlopot. A táblázaton kívül egy üres cellába, pl. a Z1-be (ha az üres), beírod a függvényt.

=RÉSZÖSSZEG(9;B:B)

A másik lapra, ahol a mindenkori részösszeget akarod megjeleníteni, ennyit írsz: =Munka1!Z1
Természetesen a Munka1 helyett a saját lapod nevét írd be.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Excelben lehet olyat, hogy mondjuk egy cellába elhelyezek egy hivatkozást egy fájlra?

PL:
A1 tartalma:
101.pdf

szeretnék olyat, ha rá kattintok az "A1" re, akkor nyissa meg a fájt.

Van egy mappám tele ilyen fájlokkal, mindegyiknek egyedi a neve, excelben sorba raknám őket, szűrném stb, majd a végén ha érdekel a fáj tartalma akkor rá kattintok.

Igen, ezt csináltam idáig is.. Csak úgy néz ki, nem bírom elmondani rendesen mit akarok

Szóval, arra lenne szükség, hogy dinamikusan szűrjön, és a szűrési feltétel mindíg a 2. táblázat A oszlopának n-edik sora.

Egyébiránt köszönöm a segítséged kedves Delila.

[ Szerkesztve ]

the troopa of tomorrow _ maydayzor FUTURE WALKS

Tényleg nem egészen világos, mit szeretnél. Nem tudom, mitől függ, hogy a 2. táblázatban melyik az a bizonyos n-edik sor.

Szerintem az 1. táblázathoz vegyél fel egy új oszlopot, ami a dátumok hónapját adja a
=HÓNAP(A2) függvénnyel. Akkor egyszerű a szűrés ebben az új oszlopban.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

A cellán jobb klikk, Hivatkozás, vagy régebbi verzióban Hiperhivatkozás. Párbeszéd ablakot kapsz, amit értelemszerűen kitöltesz billentyűzetről és kattintgatással.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Be van. Sajna nincs javulás.

Freedom, Nature, Love & Music

Tedd ki egy elérhető helyre a füzetet.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Talán így már érthető lesz.

Szóval havi bontásban kell összegezni az első tábla 2. oszlopának értékeit.

És valójában arra lenne szükségem hogy a szűrést ne kelljen manuálisan elvégezni.

[ Szerkesztve ]

the troopa of tomorrow _ maydayzor FUTURE WALKS

A két lapon 1-1 segédoszlop segítségével nem kell sem szűrni, sem összegezni.

Az első lap C2 cellája: =HÓNAP(A2)

A második lap B2-jének a képletet látszik a szerkesztőlécen.

Szerk.: a segédoszlopokat el is rejtheted.

[ Szerkesztve ]

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Annyira egyszerű, hogy szinte fáj!
Köszönöm szépen.

Szívesen.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Üdv

Egy olyan fkeres szerű függvényt vagy az fkerest kiegészítő függvényt keresek ami az alább látható képen a segédtáblából veszi az adatokat, úgy hogy ha z I3 cellába beírom azt hogy 3 akkor a J3 cellában ki tudjam választani a termékszámot mondjuk egy legördülő listából ami után a K3-ba bekerül a terméknév. (excel 2013)

Nem pont ilyen lesz a végeredményem de így tudtam a legegyszerűbben megmutatni mire is lenne szükségem.

Illetve egy másik kérdés ha egy cellába csak egyféleképpen szeretném hogy adatokat írjanak azt hogyan lehet megoldai pl. a dátumnál ne lehessen két vesszővel írni a dátumot egy pont helyett vagy véletlenül belegépelni egy betűt pl.: 2014é.05.15.

Előre is köszi

Sziasztok

A képen látható táblázatban szernék olyat csinálni, hogy a D oszlopban lévő termék kép sorok elé szeretnék beszúrni valamit.

Példa:

8. sor termék kép oszlop jelenleg: mentő/005120-4.jpg, de ezt szeretném product/mentő/005120-4.jpg és így tovább 5000 soron keresztül.

Lehet egyáltalán ilyet? Egyesével kellemetlen lenne átírni

Ha minden hol mentővel kezdődik a szöveg akkor kijelölöd a D oszlopot crtl+f aztán csere opció és az 'm' betűt kicserélteted 'product/m' -re

de ha van olyan hogy mentők-menhely/0051001-1.jpg akkor ne csak m-et adj meg cserélendőnek hanem mondjuk 'ment'-et mert ha nem akkor kicseréli a menhelynél is. Úgyhogy óvatosan...

jah és összes cseréje...

[ Szerkesztve ]

enyémre valaki?

P4

Meg kell szüntetned az összevonásokat az A oszlopban, mert emiatt nem tudsz autoszűrővel szűrni. Nézz el ide. Ezután már nincs szükség az I:K celláira, helyben tudsz szűrni.

Hogy ne legyenek zavaróak az A oszlop ismétlődő adatai, az A3 cellától lefelé vigyél be feltételes formázást. A képlete =A3=A2, és a karakter színének add meg a cellák háttérszínét.

A feltételes formázás első egyenlőségjelét HA szóként kell értelmezni. Itt: ha az aktuális cella tartalma megegyezik a fölötte lévővel, akkor jöhet a formázás.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Másik megoldás, hogy felveszel ideiglenes egy segédoszlopot, ahol a képlet

="product/" & D2

Ezt végig másolod. Kijelölöd a képletet tartalmazó cellákat, Ctrl+c-vel másolod, beállsz a D2 cellába, jobb klikk, Irányított beillesztés, Értéket. A segédoszlopot törölheted.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Ha irányított beillesztéssel magukra másolod a képletet tartalmazó cellák értékét, akkor a szerkesztőlécen is az eredmény látszik, viszont megszűnik a képlet.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Szia!

Itt van a file

Köszi!

[ Szerkesztve ]

Freedom, Nature, Love & Music

köszike!
HA függvénynél a logikai vizsgálatnál hogy kell megadni, ha azt szeretném hogy pl a 2-5 közötti számot nézzen egy adott cellába??

Attila

=HA(ÉS(2<=A1;A1<=5);1;0) pl így

Bámulatos hol tart már a tudomány!

sziasztok
Excel-ben hogyan lehet létrehozni igen/nem cellát? (office 2013) MS Súgó segítségével nem találom.
Azt meglehet egyszerűen oldani,hogy annak megfelelően hogy igent vagy nemet választok az egész sor beszíneződik az előre beállított igen/nem színre?

IGAZ(), HAMIS() függvények vannak illetve van NEM() függvény is.
a színezés egyszerűen feltételes formázással megoldható.

Az "igen/nem" mi alapján kerül be a táblába, beírod vagy feltételt szeretnél vizsgálni és értéke legyen az "igen/nem"?

"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)

csak beírni akarom,nem kell feltétel hozzá. vagy olyasmi ami pl.accesben is van,hogy egy "kapcsolóban" lehet váltogatni az igen/nem. Feltételes formázással + igaz/hamis fv-el megoldható,ha igen írok be zöld,ha nemet akkor piros lesz a sor?

Sziasztok! Hogy lehet úgy felindítani az excelt, hogy ne egy ablakban, hanem mindig külön-külön nyissa meg a táblákat? Win7 64bit Office 2010 kombó. Előre is köszönöm a segítséget!

Ex-Informatikai Szolgáltató Asztali Munkatárs

Ahogy alfa20 is írta egy feltételes formázással vizsgálod a cella tartalmát =ha(F1="igen";1;0) és az igaznak beállítod a zöld színt a hamisnak meg a pirosat és megadod neki hogy milyen tartomány legyen ilyen színű

Bámulatos hol tart már a tudomány!

Hogyan tudnám megoldani - ha lehetséges - hogy egy cellában több érték szerepeljen, de egy másik cellával vagy egyéb matematikai műveletekkel lehessen használni?

pl:
A10= 10, 15, 20, 25, 30
B10= 5
C10= A10*B10

Mʏ ᴘʜɪʟᴏsᴏᴘʜʏ ɪs: Iᴛ’s ɴᴏɴᴇ ᴏғ ᴍʏ ʙᴜsɪɴᴇss ᴡʜᴀᴛ ᴘᴇᴏᴘʟᴇ sᴀʏ ᴏғ ᴍᴇ ᴀɴᴅ ᴛʜɪɴᴋ ᴏғ ᴍᴇ. I ᴀᴍ ᴡʜᴀᴛ I ᴀᴍ ᴀɴᴅ I ᴅᴏ ᴡʜᴀᴛ I ᴅᴏ. I ᴇxᴘᴇᴄᴛ ɴᴏᴛʜɪɴɢ ᴀɴᴅ ᴀᴄᴄᴇᴘᴛ ᴇᴠᴇʀʏᴛʜɪɴɢ. Aɴᴅ ɪᴛ ᴍᴀᴋᴇs ʟɪғᴇ sᴏ ᴍᴜᴄʜ ᴇᴀsɪᴇʀ. - Sɪʀ Aɴᴛʜᴏɴʏ Hᴏᴘᴋɪɴs

Szia!

Most töltöttem le.
Az eredeti kérdésedben Sheet1 és Sheet2 nevű lapokról írtál, ezért a makróban így hivatkoztam rájuk.
A feltöltött füzetedben a lapok neve Munka1 és Munka2. Nem is megyek tovább a próbával, írd át a makróban ezeket.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Érvényesítésben add meg a két választható elemet.

A feltételes formázásnál erre a cellára kell hivatkoznod. Ha pl. a B oszlopban van az érvényesítés, az adatok meg A2-től Q1000-ig, akkor kijelölöd a teljes területet. A feltételes formázáshoz 2 képletet vigyél be.
=$B2="igen" és =$B2="nem". A két képlethez külön add meg a két háttérszínt. Fontos a $ jel az érvényesítést tartalmazó oszlop betűjele előtt.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

A C10-ben milyen eredményre számítasz?

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Feltöltöttem az átírt makróval a füzetedet ide.

Igaz, ahogy itt írtam, a lapnevek kijavításával helyre rázódott volna a lelke, de most egy-egy oldalnyi adat átmásolása után üzenetet kapsz a nyomtatásra.

Az F1 cella tartja számon a Munka1 lapon, hogy hol tartasz a másolással és nyomtatással, azt ne töröld ki. Mikor mindent kinyomtattál, akkor vált át üres stringre.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

idáig sikerült eljutnom. Azt akarom,hogyha nem-et választok akkor az egész sor piros legyen,ha igent akkor meg zöld. mit kell ehhez beírnom?

Egy halom idézőjelet tettél bele feleslegesen, és a $-t kihagytad.

Jelöld ki az A2:F4 területet. A formázás képlete: =$E2="nem"
Add meg a formátumot, és kész. Új szabály, ugyanez a képlet, csak a "nem" helyére "igen" jön, és a háttér zöld.

A további sorokra a formátumfestő ecsettel másolhatod a formátumot, vagy a feltételes formázás | Szabályok kezelése ablakában egyszerűen átírod az érvényességet a teljes területedre.

Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Sziasztok!

Valakinek van otlete, hogy lehet beirni excelbe ezt a kepletet:

[ Szerkesztve ]

“Ne várj, a legjobb alkalom soha nem fog elérkezni. Kezdj hozzá ott, ahol éppen most vagy, és használj bármilyen eszközt, ami csak a kezedbe kerül, hiszen a legjobb szerszámokat útközben úgyis meg fogod találni.”