És ezzel hogyan tudok ügyeskedni?
Teszem azt, mindegyik cellában van egy számsor. Azt akarom elérni, hogy egy 'ha' függvénnyel kombinálva kiírjon egy értéket, ha a számsor 1-essel kezdődik, ill. egy másikat, ha a feltétel nem teljesül.

<< Heimdal >>

mondjuk, A1-ben van a szám.
B1-be: =ha(bal(A1;1)=1;"érték, ha egyessel kezdődik";"érték, ha nem egyes az első számjegy")

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 előbb lehagytam az idézőjeleket a feltételnél.
Helyesen:
=HA(BAL(A1;1)="1";"egyes";"nem egyes")

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öszönöm!

Lenne még egy kérdésem:
Van egy mai dátum cella és egy oszlop kódokkal, melyek valakinek a születési dátumát jelentik, pl. 1-19810619. Ez alapján ki kellene számolni, hogy mennyi idős az illető. Ehhez persze elég az évszám, melyet a mai dátum cellából BAL függvénnyel nyerek, a másikból KÖZÉP függvénnyel és kivonom az elsőből a másodikat. De a BAL függvény a dátum formátumú cellából szám formátumú értéket hoz, 2008 helyett 3952-őt. Hogy tudom megcsinálni, hogy 2008 legyen az érték.?
Remélem érthető volt!

<< Heimdal >>

a1-> 1-19810619
b1-> =ÉV(MA())-KÖZÉP(A1;3;4)

A B oszlop általános formátumú legyen.

[ 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.

Ez nagyon frappáns megoldás és kitünően használható az átlagembereknek (mint én)

Köszönöm!

Üdv:jpisti

A vok és a vagyok között pontosan egy "agy" a különbség!

Újabb kérés

Van arra mód, hogy ha egy cella (amibe van beadva egy számolási feladat) elér egy bizonyos értéket, (mondjuk lemegy 10% alá), akkor a cella automatikusan piros színűre váltson?

A feltételes formázással könnyen megoldható.

Felveszed pl. C1-be azt az összeget, aminek figyelteted a 10%-át.
A formázandó cellán állva behívod a Formátum menüből a feltételes formázást.
A feltételhez kiválasztod "A cella értéke" nevűt, a következő mezőben a "kisebb, mint", vagy a "kisebb vagy egyenlő" feltételt. A harmadik mezőbe beírod: =C1/10.
A formátumnál beállítod a font-, a háttér- és a szegélyek paramétereit.

Ezt a formátumot másolhatod más cellákra is.

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

Eszerint sikerült.

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! Csináltam egy makrót, ami a megnyitott csv fájlt átalakítja jó pár lépésben, majd elmenti xls formátumban. az a gondom, hogy mondjuk mikor szükség van rá, akkor 20-30 ilyen eltérő nevű táblával kell a folyamatot megcsinálnom, a makró viszont mindig ugyanazon a néven mentené el az összes táblát. Azt szeretném wlérni, hogy ami az aktuális csv neve, azon mente, csak xls-ként.

Jelenleg ez a rész így néz ki:
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\KZoli.TIGER-TOOLS\Asztal\*********************.xls" _
, FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

A *-k helyén van most egy fix név.

Az egyik cellában el kellene helyezned az xls nevét, és a sorod közepe így módosulna:
"....\Asztal\" & cells(sor,oszlop) & ".xls"

Vagy mentés előtt inputtal bekérhetnéd a nevet egy változóba, és azt adnád meg a cellára történő hivatkozás helyett.

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! A második esetben hogyan kellene bekérni a változót?

nev$ = InputBox("Kérem a fájlnevet", "Név bekérése")

Ez "gyalog" bekérés. Van mód arra, hogy a csv nevét automatikusan változóba tegye, és azt adja az xls-nek, de az most hirtelen nem jut eszembe, és nem érek rá kikeresni.
Előbb-utóbb vagy én, vagy más leírja.

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 makró egyenként behívja az "utvonal" változó szerinti könyvtárban lévő csv-ket, elvégzi a módosításokat, amiket adsz neki, majd xls kiterjesztéssel menti ugyanoda, bezárja mindkét tip. fájlt. Ha nem akarod bezáratni, töröld a zárás sorát. Azért írtam bele, mert 20-30 (-szor 2) fájl elég sok és zavaró egyszerre megnyitva.

Sub csv()
Const utvonal = "C:\Documents and Settings\KZoli.TIGER-TOOLS\Asztal\"
Dim FN As String, WB As Workbook

ChDir utvonal
FN = Dir(utvonal & "*.csv", vbNormal)
Do
If FN <> "." And FN <> ".." Then
Set WB = Workbooks.Add
Workbooks.Open Filename:=FN
nev = Left(FN, Len(FN) - 3) & "xls"

' Ide írd be, amit az xls-ben el akarsz végeztetni

ActiveWorkbook.SaveAs Filename:=utvonal & nev, FileFormat:=xlNormal

WB.Close False 'Ez azonnal be is zárja a változatlan csv-t.
ActiveWindow.Close 'Ez meg a csv-hez képest módosított xls-t
End If
FN = Dir()
Loop Until FN = ""
End Sub

[ 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.

Azt hogy lehet megcsinálni, hogy egy cellában az van hogy:

1078 Budapest István ut ...

és ezt külön cellákba írja ki tehát külön irányítószám, város, utca?

Valamint ugyanezt fordítva. Ha több cellában vannak pl szavaim, hogy lehet egy cellába egyseíteni őket úgy hogy közé space-t tegyen.
Ha van valakinek ötlete várom a javaslatot. Köszönöm előre is.

A recipriverzexkluzíva egy olyan szám, amely önmagán kívül minden más számmal egyenlő.

Vagy inkább olyan megoldás kellene, hogy ha belemegyek egy cellába akkor a kurzor utánni szöveget egy billkombinációra a másik cellába mozgatná át. Van ilyen lehetőség?

A recipriverzexkluzíva egy olyan szám, amely önmagán kívül minden más számmal egyenlő.

Adatok szétszedése:
Vegyük, hogy A1-ben van a címed.

B1-> =bal(a1;4)
C1-> =közép(a1;5;szöveg.talál(" ";a1;6)-5)
D1-> =jobb(a1;hossz(a1)-szöveg.talál(" ";a1;6))

Ezeket végigmásolod, utána érdemes a B oszlopokat másolni, és ugyanoda irányítottan az értékeket beilleszteni.

Adatok összemásolása:
=A1&" "&B1&" "&C1... stb.

[ 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.

Hűűű köszönöm Átnézem ezeket a függvényeket.

És amikor kész vagyok ezzel akkor azt, hogy lehet megcsinálni, hogy a cellákban már ne a függvény legyen hanem csak az érték? Tehát ne a hivatkozás legyen, hanem a cellák vegyék fel ezt az új értéket.
Mégegyszer köszi.

A recipriverzexkluzíva egy olyan szám, amely önmagán kívül minden más számmal egyenlő.

másolás és ugyanide irányított beillesztés - értéket

MO. RIP. - az utolsó kapcsolja le a villanyt.

A szöveg.keres függvény csak az elejétől tud keresni? Én azt szeretném ha van egy címem és a házszámot a végéről átmásolni egy másik cellába. tehát a végétől szeretnék keresni egy " "-t. Ezt hogylehet megcsinálni?

A recipriverzexkluzíva egy olyan szám, amely önmagán kívül minden más számmal egyenlő.

=JOBB(A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1;SZÖVEG.KERES(" ";A1)+1))

Ahol A1 a szöveg, amiben keresni szeretnél.

MOD: mondjuk ez csak akkor működik, ha pontosan két szóköz van a címben.

[ Szerkesztve ]

Soha nem késő, hogy azzá válj, aki lehettél volna.

Ez már egy kicsit okosabb, többféle címformátumot is kezel.

=HA(HIBÁS(SZÖVEG.KERES(" ";A1));A1;HA(HIBÁS(JOBB(A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1;SZÖVEG.KERES(" ";A1)+1)));JOBB(A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1;SZÖVEG.KERES(" ";A1)));HA(HIBÁS(SZÖVEG.KERES(" ";JOBB(A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1;SZÖVEG.KERES(" ";A1)+1))));JOBB(A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1;SZÖVEG.KERES(" ";A1)+1));JOBB(A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1;HOSSZ(A1)-SZÖVEG.KERES(" ";A1))))))

MOD: remélem látszik az egész, én tudom scrollozni a teljes kódot.

[ Szerkesztve ]

Soha nem késő, hogy azzá válj, aki lehettél volna.

Segítségeteket kérem!

Az excelbe minimum 11 cellának a feltételét kellene megvizsgálnom, és amennyiben azok (valamelyike, mindegyike) megfelelnek az adott feltételnek, akkor adja össze azokat a cellákat, amelyekben a feltétel megvan (biztos egyszerű...) A HA függvénnyel próbálkoztam, de azt olvasom, hogy 7 db beágyazást tud...fontos lenne

AND és OR esetleg egy HA függvénybe ágyazva?
Vagy ha nagyon nem megy, akkor használsz segédcellákat. Az egyik segéd cellába kiértékelsz 3 feltételt, a másikba 4 feltételt, majd ezt a kettőt vizsgálod egy harmadikban.

Soha nem késő, hogy azzá válj, aki lehettél volna.

Megpróbálom, de szerintem van könyebb megoldás is...Köszi, megnézem!

Köszönöm. Sajnos nem igazán működik, csak olyan 30%ban. Hogy nem gondoltak erre az exel fejlesztők?

A recipriverzexkluzíva egy olyan szám, amely önmagán kívül minden más számmal egyenlő.

A Keres.szöveg mezőbe viszed be, amit keresel.
A Szövegbe vagy a hivatkozást (cellát, ami tartalmazza a teljes szövegedet), vagy beírod a teljeset.
A Kezdethez azt írd be, hogy a teljes szöveg hányadik karakterétől kezdje a keresést.

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 Kezdethez azt írd be, hogy a teljes szöveg hányadik karakterétől kezdje a keresést."

Ez az amit o sem tud, pont ezert akar jobbrol keresni

''Gee, Brain, what do you want to do tonight?'' ''The same thing we do every night, Pinky: Try to take over the world!''

A jobbról keresést makróval lehet megoldani.

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

Tegnap a D oszlopba került az utca és a házszám.
Van itt egy kis makró, ami az E oszlopba írja az utcát, az F-be a házszámot.

Sub hazszam()
sor = 1
Do While Cells(sor, 4) <> ""
nev = Cells(sor, 4)
For b = Len(nev) To 1 Step -1
If Mid(nev, b, 1) = Chr(32) Then
Cells(sor, 5) = Left(nev, b - 1)
Cells(sor, 6) = Right(nev, Len(nev) - b)
Exit For
End If
Next
sor = sor + 1
Loop
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.

Senkinek más megoldása...?

első oszlop szám
második, egyszerű feltétel
sárga: sima szumma

MO. RIP. - az utolsó kapcsolja le a villanyt.

Köszi, ennyit tudtam, mondom, 11 cella értékét kell megvizsgálni és amennyiben a feltételeknek megfelelnek, össze kell adni a cellában lévő értékeket....!

Csakis GhOsT 3375-ös válasza szerint járhatsz el.

A HA és ÉS függvénnyel megvizsgálsz 6 feltételt.
A függvény oszlopába a kiértékelésnek megfelelően IGAZ vagy Hamis értéket íratsz (vagy 1-t és 0-t, vagy ami kedvedre való).
Ezt az oszlopot és a maradék 5 feltételt együtt vizsgálod.

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 második függvénnyel sikerül egy oszlopba összehoznod a 11 feltétel összesített eredményét, ezután a SZUMHA függvénnyel elvégezheted az összeadást.

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

Ez hogy nézne ki, segítenél...? A sintaktikáját megmutatod..?

Szia Delila_1! Elnézést, hogy csak most reagálok, nem voltam netközelben. köszönöm szépen a segítségedet!

Sikerül elkészíteni?
Akkor jó a küldött makró, ha minden behívott fájlban ugyanazt a feladatot kell elvégezni.

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 SZUMHA képlettel azt add össze, ahol az M oszlopban 1 van, mert ott feleltek meg mind a 11 kritériumnak az adataid. Természetesen szövegek is lehetnek az adatok között, és olyanok is, hogy pl. A1>=C1.

[ 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.

Az excelbe minimum 11 cellának a feltételét kellene megvizsgálnom, és amennyiben azok (valamelyike, mindegyike) megfelelnek az adott feltételnek, akkor adja össze azokat a cellákat, amelyekben a feltétel megvan (biztos egyszerű...)

már bocs, de erre pont jó, attól függetlenül hogy nem 11 sort raktam a példába

MO. RIP. - az utolsó kapcsolja le a villanyt.

Nagyon köszönöm Neked, holnap megnézem, így már világos...Köszi a fáradozásodat!

lúzer!

Még nem próbáltam, de a Delila példáját érzem annak, amit kerestem...Természetesen Neked is köszönöm a fáradozásodat!

Ha kipróbáltam (most az ország másik pontján vagyok, mint ahol állandóan élek, ezért holnap, vagy csütörtökön tudom kipróbálni..!

Nem biztos, hogy jó a válaszom. Be kellene tenned egy képet mutatóba, hogy milyen adatokról és feltételekről van szó, hogy helyezkednek el.
Figyelmesebben olvasva a kérdésedet, minden cellát összesítened kell, ahol IGAZ értéket kapsz. Az én példám azt jelzi, ha mind a 11 feltétel teljesül.

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

Delila_1 így már jó. Köszönöm.

A recipriverzexkluzíva egy olyan szám, amely önmagán kívül minden más számmal egyenlő.

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.

hali!

Van megoldás arra hogy van két munkalap, szerkezetileg egyforma és egy 3-ikban egyesíteni (összeadni) az adatokat?
Egy képletet megcsinálni a sarokban és lerántani -> nem az igazi

MO. RIP. - az utolsó kapcsolja le a villanyt.

Mit szólsz a kimutatáshoz, amit több tartományból is összehozhatsz?
A varázsló első lapján választhatod ki ezt a paramétert.

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ösz, kipróbálom, még nem csináltam

MO. RIP. - az utolsó kapcsolja le a villanyt.

Az AJ oszlopba
kellene kiszámítani azt, amikor valaki túlórázik
hetköznap és 8 órán felül dolgozik akkor nekem oda
irja be azoknak az óráknak a számját ami 8 órán felül
van.Vagyis ha egéssz hónapban van 20 óraja tulóra
hétköznap akkor nekem irja be az óra számot. Köszönöm