Hirdetés

2024. március 19., kedd

Gyorskeresés

Útvonal

Fórumok  »  OS, alkalmazások  »  Microsoft Excel topic (kiemelt téma)

Téma összefoglaló

Téma összefoglaló

  • Utoljára frissítve: 2023-11-13 08:31:56

LOGOUT.hu

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.

Összefoglaló kinyitása ▼

Hozzászólások

(#1) airyca


airyca
csendes tag

Sziasztok!

Szeretném a segítségeteket kérni! A megoldandó dolog a következő: az A1 cellában van egy szám (pl. 241), a B1 cellában egy név (X.Y.) és azt szeretném, ha a C1 cellában az aznapi dátum jelenjen meg amikor vagy a számot vagy a nevet beírom.

Köszi:Airyca

(#2) KovacsUr válasza airyca (#1) üzenetére


KovacsUr
addikt

=HA(A1;MA();HA(B1;MA();))

So it goes… We stand alone by standing stones and turn them into circles.

(#3) airyca válasza KovacsUr (#2) üzenetére


airyca
csendes tag

Hi!

Most már csak az a gondom, hogy a dátum ne is változzon. Ugyanis ha így beírom, akkor másnap szépen átállítódik a dátum. Viszont azt szertném, ha hozzárendelem adott cellákhoz az aznapi dátumot, akkor az ne változzon meg a következő nap.

Valaki???

Köszi:Airyca

(#4) pacalperkelt válasza airyca (#3) üzenetére


pacalperkelt
csendes tag

Egy makrót írsz amit napvégén lefuttatsz: dátum terület kijelöl; irányított beillesztés; értéket ugyanarra a területre. így a képlet eltűnik, többé nem számol. Ha valaki tud függvényből megoldást, engem is nagyon érdekel.

Üdv!

(#5) KovacsUr válasza airyca (#3) üzenetére


KovacsUr
addikt

Jobb klikk a worksheet fülön, Kód megjelenítése

aztán ezt beilleszt

Sub Worksheet_Change(ByVal Target As Excel.Range)

If Target.Value <> '''' And (Target.Column = 1) Or (Target.Column = 2) Then
Cells(Target.Row, 3).Activate
ActiveCell.Value = Date
ActiveCell.NumberFormat = ''yyyy/mm/dd''
End If

End Sub


So it goes… We stand alone by standing stones and turn them into circles.

(#6) KovacsUr válasza KovacsUr (#5) üzenetére


KovacsUr
addikt

Bocs... v1.1 :DD

Sub Worksheet_Change(ByVal Target As Excel.Range)

If Target.Value <> '''' And (Target.Column = 1) Or (Target.Column = 2) Then
Cells(Target.Row, 3).Activate
ActiveCell.Value = Date
ActiveCell.NumberFormat = ''yyyy/mm/dd''
Target.Activate
End If

End Sub

So it goes… We stand alone by standing stones and turn them into circles.

(#7) KovacsUr


KovacsUr
addikt

Azért szólhatnál, hogy most ez megfelel-e vagy nem :/

So it goes… We stand alone by standing stones and turn them into circles.

(#8) airyca válasza KovacsUr (#7) üzenetére


airyca
csendes tag

Szia!

Bocsánat, hogy eddig nem jelentkeztem!

1× is, köszi a segítséget!

Beillesztettem amit írtál, de nálam, ahogy beírok valamit az egyik cellába és lépek a másikba kiírja, hogy syntax error...

(#9) KovacsUr válasza airyca (#8) üzenetére


KovacsUr
addikt

Aha... tudom is, miért... A prohardver hozzászólás-modul kicseréli az idézőjelet két aposztrófra. Próbáld korrigálni

So it goes… We stand alone by standing stones and turn them into circles.

(#10) KovacsUr


KovacsUr
addikt

No, próbálom újra...


Sub Worksheet_Change(ByVal Target As Excel.Range)

If Target.Value <> "" And (Target.Column = 1) Or (Target.Column = 2) Then
Cells(Target.Row, 3).Activate
ActiveCell.Value = Date
ActiveCell.NumberFormat = "yyyy/mm/dd"
Target.Activate
End If

End Sub


Most & q u o t ;-ot írtam '' helyett, hátha így nem javítja ki...

So it goes… We stand alone by standing stones and turn them into circles.

(#11) KovacsUr válasza KovacsUr (#10) üzenetére


KovacsUr
addikt

OK, így működnie kell. :)

So it goes… We stand alone by standing stones and turn them into circles.

(#12) KovacsUr válasza KovacsUr (#11) üzenetére


KovacsUr
addikt

ja igen, és ha 'kód megjelenítése' után benne van a kurzor

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
ITT
End Sub

van, akkor klikkelj ki belőle, mielőtt beilleszted a makrót

So it goes… We stand alone by standing stones and turn them into circles.

(#13) KovacsUr


KovacsUr
addikt

Kipróbáltam, visszamásoltam.
Magyar Office97 és angol Office XP alatt működik, úgyhogy remélhetőleg a köztük lévő összes többin is :)
Ha mégsem, akkor tényleg nincs több ötletem :))

So it goes… We stand alone by standing stones and turn them into circles.

(#14) airyca válasza KovacsUr (#13) üzenetére


airyca
csendes tag

Müködik, köszönöm szépen, hogy segítettél!

(#15) airyca válasza KovacsUr (#13) üzenetére


airyca
csendes tag

:DD:DD:DD:DD

(#16) KovacsUr válasza airyca (#15) üzenetére


KovacsUr
addikt

Ment egy mail is, de most már az felesleges akkor... :))
Szívesen.

So it goes… We stand alone by standing stones and turn them into circles.

(#17) airyca válasza KovacsUr (#16) üzenetére


airyca
csendes tag

Nem érkezett még emil, pedig kíváncsi vagyok, hogy mit írtál. :) Tudom tipikus női tulajdonság és még hamar meg is öregszem :D

(#18) KovacsUr válasza airyca (#17) üzenetére


KovacsUr
addikt

Nincs benne semmi izgalmas, nem írtam szerelmes verset :) Sajnálom...
Csak egy excel fájlt csatoltam, ugyanezzel a megoldással.

So it goes… We stand alone by standing stones and turn them into circles.

(#19) airyca válasza KovacsUr (#18) üzenetére


airyca
csendes tag

nem is vártam szerelmes verset :))

Számíthatok később is a segítségedre, ha gondom akad?

(#20) KovacsUr válasza airyca (#19) üzenetére


KovacsUr
addikt

Nem.
:D
Persze :) És mindenki máséra is, szerintem.

So it goes… We stand alone by standing stones and turn them into circles.

(#21) szucsi


szucsi
őstag

Kedves Excelben Excellálók! (nylvszk kmljtk) :DD

plíz segítsetek:

szitu: Van ugye az 1.sor, ahova bekerült a változónév, alattuk az adatok.
probléma: Ha megtelik egy képernyőnyi sor, a változónév ugye eltűnik, pedig jó lenne látni
kérdés:
1) lehet-e az oszlopoknak alternatív címkét adni (a változónevet), és hogyan?
2) be lehet-e állítani, hogy az első sor együtt gördüljön a kerettel.

Köszi.

(#22) KovacsUr válasza szucsi (#21) üzenetére


KovacsUr
addikt

Odaklikkelsz a címsor alatti, utolsó oszloptól jobbra lévő cellába, Ablak/Ablaktábla rögzítése (Freeze Panes)

So it goes… We stand alone by standing stones and turn them into circles.

(#23) szucsi válasza KovacsUr (#22) üzenetére


szucsi
őstag

Hurrá, sikerült!

Köszönöm! :))

(#24) szucsi


szucsi
őstag

Mégegy kérdés:

van 5 oszlop adat, pl:

10,13,12,15,10

arra vagyok kíváncsi, milyen képlettel lehet összegezni csak az előző értékhez való negatív eltéréseket (elnézést, ha nem elég matekos).

tehát az előző sorból van egyszer a 13-12 (1) és a 15-10 (5) ezek összege 6.

Köszi

(#25) KovacsUr válasza szucsi (#24) üzenetére


KovacsUr
addikt

Na várj, pontosítsunk.

10
13
12
15
10

Így van? és hova kellene tenni az eredményt?
A példádban természetesen =A2-A3+A4-A5, de nem tudom, hogy gondolod

So it goes… We stand alone by standing stones and turn them into circles.

(#26) szucsi válasza KovacsUr (#25) üzenetére


szucsi
őstag

Pl:

A1 A2 A3 A4 A5 A6
10 13 12 10 11 3 - ez a megoldás jelen esetben (13-12)+(12-10)

(#27) KovacsUr válasza szucsi (#26) üzenetére


KovacsUr
addikt

Hát akkor ez stimmel. Azt hittem, valami bonyolultabb :)

So it goes… We stand alone by standing stones and turn them into circles.

(#28) szucsi válasza szucsi (#26) üzenetére


szucsi
őstag

jajaj, elcsusszant...

szóval sorban vannak az adatok egymás mellett. és mégmelléjük jönne ugye a képlettel felfegyverzett cella.

(#29) szucsi válasza szucsi (#28) üzenetére


szucsi
őstag

Az a baj, hogy nem kiszámítható, hogy melyik oszlopban milyen szám lesz, és nekem csak a balról jobbra haladva negatív különbségek kellenek, tehát lehet, hogy egy sem lesz, ha végig csökken a sorozat, akkor mindegyik negatív

(#30) szucsi válasza szucsi (#29) üzenetére


szucsi
őstag

Pl:

10/11/13/15/16 =0
16/10/10/10/10=6

(#31) KovacsUr válasza szucsi (#30) üzenetére


KovacsUr
addikt

Ja értem, OK. Azt lehet tudni előre, hogy HÁNY szám lesz? Hány oszlop

So it goes… We stand alone by standing stones and turn them into circles.

(#32) KovacsUr válasza szucsi (#30) üzenetére


KovacsUr
addikt

Vagy mégsem. :) Hogy lesz ebből 0?

(10-11)+(11-13)+(13-15)+(15-16)=-1+-2+-2+-1=-6 nálam

So it goes… We stand alone by standing stones and turn them into circles.

(#33) szucsi válasza KovacsUr (#32) üzenetére


szucsi
őstag

5 oszlop van, és úgy lesz 0, hogy a sorozat monoton növekvő, tehát balról jobbra egyre nagyobbak a számok, így visszaesés (ezaz!) nincs. Az összvisszaesés mennyiségét szeretném tk. kiszámolni.

(#34) bcs válasza szucsi (#30) üzenetére


bcs
aktív tag

az, hogy hány adat van, az fix?

(#35) szucsi válasza bcs (#34) üzenetére


szucsi
őstag

5 adat van sorban egymás mellett, nagyon fontos a sorrendiségük, hiszen:

10/16/10/10/10 =6 hat az össz csökkenés
10/10/10/10/16 =0 nincs csökkenés

(#36) KovacsUr válasza szucsi (#33) üzenetére


KovacsUr
addikt

OK, már értem, csinálom, kis türelem :)

So it goes… We stand alone by standing stones and turn them into circles.

(#37) bcs válasza szucsi (#33) üzenetére


bcs
aktív tag

tfh: A1, B1, C1, D1, E1 adatok, ekkor

A2: IF((A1-B1)<0;(A1-B1);0)
B2: IF((B1-C1)<0;(B1-C1);0)
C2: IF((C1-D1)<0;(C1-D1);0)
D2: IF((D1-E1)<0;(D1-E1);0)
E2: SUM(A2..B2)

egyszerűbben is lehet.

(#38) localhost válasza KovacsUr (#36) üzenetére


localhost
Közösségépítő

Godlike! Bérmunka rulez! :DD

¤ Most már biztos: teljesen normális vagyok! ... ... ... ... ... ... ... ... ... ... ... ... ... ... Mondták itt ezek a hangok is a fejemben. :)) ¤ My IP is: 127.0.0.1

(#39) szucsi válasza bcs (#37) üzenetére


szucsi
őstag

F1-be egy képlettel esélytelen?

(#40) KovacsUr válasza bcs (#37) üzenetére


KovacsUr
addikt

Ja, ez jó, csak mehet egy képletbe az egész :D

So it goes… We stand alone by standing stones and turn them into circles.

(#41) KovacsUr válasza szucsi (#39) üzenetére


KovacsUr
addikt

De, nyilván
=HA((A1-B1)<0;(A1-B1);0)+HA((B1-C1)<0;(B1-C1);0)+HA((C1-D1)<0;(C1-D1);0)+HA((D1-E1)<0;(D1-E1);0)

So it goes… We stand alone by standing stones and turn them into circles.

(#42) szucsi válasza szucsi (#39) üzenetére


szucsi
őstag

Mert sok sok ilyen sorozatom van egymás alatt :(

(#43) szucsi válasza KovacsUr (#41) üzenetére


szucsi
őstag

Köszi, ezt kipróbálom! :)

(#44) KovacsUr válasza szucsi (#43) üzenetére


KovacsUr
addikt

Ja igen, most látom, te fordítva kérted:

=HA((A1-B1)>0;(A1-B1);0)+HA((B1-C1)>0;(B1-C1);0)+HA((C1-D1)>0;(C1-D1);0)+HA((D1-E1)>0;(D1-E1);0)

So it goes… We stand alone by standing stones and turn them into circles.

(#45) KovacsUr válasza KovacsUr (#44) üzenetére


KovacsUr
addikt

És aztán megfogod az F1 jobb alsó sarkát, és elkezded húni lefelé. :)

So it goes… We stand alone by standing stones and turn them into circles.

(#46) szucsi válasza KovacsUr (#44) üzenetére


szucsi
őstag

Köszi, most akartam elkámpicsorodni :))

(#47) szucsi válasza KovacsUr (#45) üzenetére


szucsi
őstag

Működik!!! :DD

Mégegyszer nagyon köszönöm, ez nekem nem ment volna.

(#48) KovacsUr válasza szucsi (#47) üzenetére


KovacsUr
addikt

Köszönd bcs-nek, ő gyorsabb volt ;)

So it goes… We stand alone by standing stones and turn them into circles.

(#49) szucsi válasza KovacsUr (#48) üzenetére


szucsi
őstag

Igazad van!

Kösz, bcs! :D

(#50) bcs válasza szucsi (#49) üzenetére


bcs
aktív tag

nincs mit :)

Útvonal

Fórumok  »  OS, alkalmazások  »  Microsoft Excel topic (kiemelt téma)
Copyright © 2000-2024 PROHARDVER Informatikai Kft.