Új hozzászólás Aktív témák

• #23764 plaschil aktív tag A214 #23763

  Új Válasz 2014-10-16 20:16:18 #23764

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz A214 #23763 üzenetére

  Gondolom a nevek elé nem akarsz sorszámot.

  Sub Macro1()
  Dim text As String, result As String
  text = "Ádám"
  result = Left(text, 1)
  'MsgBox is for demo only
  MsgBox result
  If (result = UCase(result)) Then MsgBox ("true")
  End Sub

  Ez a kis kód megmondja, hogy melyik cellában van név. (feltételezve, hogy nagybetűvel van írva a név)
  Így hogy tudod, melyikben mi van, könnyű megírni rá a kódot most már.

• #23762 plaschil aktív tag Delila_1 #23760

  Új Válasz 2014-10-16 18:43:15 #23762

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Delila_1 #23760 üzenetére

  [link]

• #23759 plaschil aktív tag Delila_1 #23758

  Új Válasz 2014-10-16 17:04:23 #23759

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Delila_1 #23758 üzenetére

  
  Nem tudod véletlenül hogyan lehet hivatkozni a vbRed helyett arra, amikor a cellastílus "jó" vagy "rossz"?
  Első gondolatom CV.Style de innen nincs tovább.i funkció.

  Nem akartam makrót írni emiatt, de úgy látszik kell

• #23757 plaschil aktív tag

  Új Válasz 2014-10-16 16:25:45 #23757

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Szervusztok!

  Kérdésem az volna, hogy egy sima if-fel tudom-e vizsgálni hogy egy adott cellatartományban van-e valamilyen színezés?

  Ötletem arra irányul, hogy ha egy sheet-en (pl. A) mondjuk a 4. sorban van valahol piros háttérszín, akkor egy másik sheet-en (pl. B) ugyanígy a 4. sor X. cellájába írja be, hogy hiba.

• #13404 plaschil aktív tag plaschil #13403

  Új Válasz 2012-04-10 21:58:31 #13404

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz plaschil #13403 üzenetére

  A Projektnél a ThisWorkbook-hoz írd be:
  Private Sub Workbook_Open()
  ActiveWorkbook.Save
  End Sub

• #13403 plaschil aktív tag Mythunderboy #13402

  Új Válasz 2012-04-10 21:48:26 #13403

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Mythunderboy #13402 üzenetére

  Mikor megnyitja csinálj egy automentést makróval.

• #13392 plaschil aktív tag Delila_1 #13391

  Új Válasz 2012-04-09 09:32:13 #13392

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Delila_1 #13391 üzenetére

  Ha jól látom miután készen van, csak a duplikációkat kell kiszednem és ugyanazt kapom mint egy pivotból.

  Nagyon szépen köszönöm, eddig nem ismertem ezt a függvényt, nem régóta dolgozom excel-ben, de lehet ezt a függvényt tudom alkalmazni egy másik problémámnál.

  Mégegyszer köszönöm!
  Ja és ha már itt vagyok, a sok segítségért cserébe:

  

  Hogy el ne hervadj!

• #13390 plaschil aktív tag

  Új Válasz 2012-04-08 15:20:55 #13390

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Sziasztok!

  Segítséget szeretnék kérni egy makró megírásához. Adott egy lista. Ez tartalmaz több karakterkódot (ez most mindegy mi, pl. "ABC", "CAB", "CBA" hasonlók...), és ezekhez tartozik egy másik kód (ez most mindegy mi, pl "1234", "9876", "1243" hasonlók... de nem integer, mert pont is van benne, csak az egyszerűség kedvéért adtam meg így).
  Így lesz egy olyan listám ami pl. így néz ki:
  ABC 1234 5
  ABC 1234 6
  ABC 4321 2
  ABC 4321 2
  CBA 1234 1
  CBA 1234 5
  stb...
  Na most az azonos "ABC"-k azonos kódjai mellett van egy szám (aláhúztam) ezeket szeretném összeadni.
  Vagyis ABC 1234 esetén azt adja vissza nekem hogy:
  ABC 1234 11
  ABC 4321 esetén azt hogy:
  ABC 4321 4
  És így tovább, mint egy pivot, csak aztán nekem még mahinálnom kell az adatokkal és 100x egyszerűbb lenne ha egy makró adná ezt vissza nekem.

  Hú, érthető ez így? :S

• #13220 plaschil aktív tag

  Új Válasz 2012-03-20 09:17:36 #13220

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Hello!

  Maximum-keresésre valaki írt már makrót? Valami olyasmire lenne szükségem, hogy mondjuk a top5-öt (5 legnagyobbat) szedje ki nekem.
  pl van 2 oszlopom, egyikben stringek, másikban számok:
  a 1
  a 1
  a 2
  b 2
  b 3
  b 4

  És akkor az "a"-k közül a top5, "b"-k közül a top5 stb...

• #13178 plaschil aktív tag lapa #13177

  Új Válasz 2012-03-09 17:00:55 #13178

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz lapa #13177 üzenetére

  

  Ehhez annyit, hogy több egérrel is ezt csinálja.

• #13175 plaschil aktív tag

  Új Válasz 2012-03-09 16:49:59 #13175

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Üdv!

  Találkozott már valaki olyan problémával (ha egyáltalán az, és nem pedig valami speciális beállítás), hogy megnyit egy excel fájlt, és ha belekattint a sheetre, akkor onnantől kezdve olyan, mintha folyamatosan nyomná a bal egérgombot, tehát egyfolytában jelöli ki a cellákat akármit csinálok vele. De az egéren már nem nyomok semmit. Ez egyszer egyik pillanatról a másikra sikerült. Bármit csinálok ezt csinálja, pl. fájl újranyitásánál, gép újraindításánál.

  Más: bill-lel hogyan tudok sheet-et váltani?

• #13167 plaschil aktív tag cousin333 #13165

  Új Válasz 2012-03-08 22:32:46 #13167

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz cousin333 #13165 üzenetére

  Jah, azóta rájöttem, hogy nagyon nem mindegy milyen excel-lel dolgozok. (angol vs. magyar)

• #13162 plaschil aktív tag plaschil #13161

  Új Válasz 2012-03-08 20:34:54 #13162

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz plaschil #13161 üzenetére

  Rosszra válaszoltam.

• #13161 plaschil aktív tag lappy #13160

  Új Válasz 2012-03-08 20:23:21 #13161

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz lappy #13160 üzenetére

  Köszönöm.

  Meg tudná valaki mondani, hogy mi ezzel a képlettel a hiba, megőrülök.
  [link]

• #13158 plaschil aktív tag

  Új Válasz 2012-03-08 18:10:09 #13158

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Üdv!

  Írtam egy do while-t ami az oszlop végéig megy, viszont ha szűrök valamire valamelyik oszlopban akkor is elmegy a do while a végéig. Tehát pl. 1000 soros a fájlom, leszűröm 200 sorra, mégis végigmegy mind az 1000 soron a makró. Tehát mintha le se szűrtem volna. És mondjuk például egy összeadásnál elég szar dolog. Hogyan tudnám megoldani azt, hogy csak a leszűrt adatokon menjen végig a ciklus? Jelenleg úgy csináltam meg, hogy a leszűrt adatokat átmásolom egy temp sheet-re ahol elvégzem vele a műveletet. De sztem ez lassú, úgyhogy szeretném optimalizálni azzal, hogy nem másolgatom át sehova.

• #12808 plaschil aktív tag Pá #12807

  Új Válasz 2012-02-04 12:17:11 #12808

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Pá #12807 üzenetére

  Nekem is 2007 van, és nekem van.
  [link]

• #12804 plaschil aktív tag Delila_1 #12803

  Új Válasz 2012-02-04 10:51:27 #12804

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Delila_1 #12803 üzenetére

  1 bizonyos fájl végére. A bizonyos fájl 3 oszlopból áll. (A, B, C)
  Így:
  A oszlopba:
  B oszlop (i, 2) celláját, tegye a bizonyos fájl A oszlop végére.
  C oszlopba:
  D oszlop (i, 4) celláját, tegye a bizonyos fájl C oszlop végére.
  B oszlopba:
  Ez egy kicsit bonyolult, mert a C oszlopba beírt adatoktól függően kell beírnia valamit. Tehát, ha C-be írt pl. 5255-öt, akkor B legyen "ország_1", ha 5345-öt akkor "ország_2" és még 3db ilyen feltétel.

• #12802 plaschil aktív tag plaschil #12801

  Új Válasz 2012-02-04 10:34:32 #12802

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz plaschil #12801 üzenetére

  Javítás:
  Nem így:
  ' itt kellene egy olyan rész hogy ami az i-edik sorban (elvileg megfelel a szűrésnek) ebből a sorból kéne néhány ***oszlopot*** átteni egy másik fájl végére.
  Hanem így:
  ' itt kellene egy olyan rész hogy ami az i-edik sorban (elvileg megfelel a szűrésnek) ebből a sorból kéne néhány ***cellát*** átteni egy másik fájl végére.
  

• #12801 plaschil aktív tag Delila_1 #12800

  Új Válasz 2012-02-04 10:21:29 #12801

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Delila_1 #12800 üzenetére

  Köszönöm szépen, éjjel 1-ig szórakoztam vele mire megtudtam hogy a "left"-et kell használni ha kezdődést akarok vizsgálni.

  Viszont ez az if hibás, vagy nekem nem működik, én is így írtam először:

  If Cells(i, 4) = "5415" Or "5415B" Then

  Nekem ez csak úgy működött hogy:

  If Cells(i, 4) = "5415" Or Cells(i, 4) = "5415B" Then

  Most már változott az egész ciklus, úgyhogy így néz ki:

  For i = 1 To SorokSzama
  If Cells(i, 5) = "72" Then
  If (Cells(i, 4) = "5415" Or Cells(i, 4) = "5255" Or Cells(i, 4) = "211B" Or Cells(i, 4) = "5345" Or Cells(i, 4) = "5195") Then
  If Left(Cells(i, 2), 5) = "0.603" Then
  ' itt kellene egy olyan rész hogy ami az i-edik sorban (elvileg megfelel a szűrésnek) ebből a sorból kéne néhány oszlopot átteni egy másik fájl végére.
  End If
  If Left(Cells(i, 2), 5) = "0.615" Then
  ' itt kellene egy olyan rész hogy ami az i-edik sorban (elvileg megfelel a szűrésnek) ebből a sorból kéne néhány oszlopot átteni egy másik fájl végére.
  End If
  If Left(Cells(i, 2), 7) = "1.600.a" Then
  ' itt kellene egy olyan rész hogy ami az i-edik sorban (elvileg megfelel a szűrésnek) ebből a sorből kéne néhány oszlopot átteni egy másik fájl végére.
  End If
  If Left(Cells(i, 2), 7) = "1.600.z" Then
  ' itt kellene egy olyan rész hogy ami az i-edik sorban (elvileg megfelel a szűrésnek) ebből a sorból kéne néhány oszlopot átteni egy másik fájl végére.
  End If
  End If
  End If
  Next

• #12797 plaschil aktív tag plaschil #12796

  Új Válasz 2012-02-03 21:47:00 #12797

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz plaschil #12796 üzenetére

  Úgy tűnik mintha nem lehetne megadni több feltételt egy if-ben. Érdekes. Na de ha így nem megy, akkor megírom minden feltételre egyesével az if-et azon nem múlik. Viszont akkor azzal az akadállyal kell megküzdenem, hogy meg kell vizsgálnom, hogy pl. "XXX"-el kezdődik-e egy adott cella tartalma.

• #12796 plaschil aktív tag zsotesz81 #12795

  Új Válasz 2012-02-03 20:34:25 #12796

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz zsotesz81 #12795 üzenetére

  Köszönöm azóta rájöttem. Most azzal szenvedek, hogy végigmegyek az egyik oszlopon (E) és megnézem hogy az értéke 72. Ha annyi akkor nézze meg hogy ugyanabban a sorban a (D) oszlopban ez az érték van-e: 5415 vagy 5415B. De nem működik. Az első IF az megy.

  For i = 1 To SorokSzama
  If Cells(i, 5) = 72 Then
  If Cells(i, 4) = "5415" Or "5415B" Then
  Ide kell még 1 feltétel (B) oszlop tehát (i, 2) ez* Or az* Or emez* Or amaz* -zal kezdődik (!)
  End If
  End If
  Next

  Hát kb. ennyi.

• #12794 plaschil aktív tag plaschil #12792

  Új Válasz 2012-02-03 19:19:51 #12794

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz plaschil #12792 üzenetére

  Azt hiszem teljesen rossz irányba indultam el. :S
  Egy megnyitott fájlban hogyan tudok hivatkozni az egyik cellájára? Azt szeretném, hogy megszámolom hány soros a fájl, és ráállok 1 oszlopra és megnézem hogy bizonyos értéknek megfelel-e.

• #12792 plaschil aktív tag plaschil #12791

  Új Válasz 2012-02-03 17:53:11 #12792

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz plaschil #12791 üzenetére

  No azt hiszem ezt megoldottam. További problémák merültek fel: fel szeretném vetetni makróval, hogy az egy oszlopban lévő 4 db szűrési feltételnek megfelelő sorok legyenek szűrve. Hogy egyszerűbb? Ha felvetetem, vagy ha megnézem hány soros a fájl és IF-el megcsinálom? Csak azért mert pl. 2 feltételnél még működik (makró rögzítésnél) de 4-nél már nem.
  ActiveSheet.Range("$A$1:$FM$5909").AutoFilter Field:=2, Criteria1:= _
  "=szoveg_1*", Operator:=xlOr, Criteria2:="=szoveg_2*", Operator:=xlOr, Criteria3:="=szoveg_3*", Operator:=xlOr, Criteria4:="=szoveg_4*", Operator:=xlOr
  Ezzel a 4 feltétellel nem szűri le az adatokat. De ha csak 2-őt adok meg akkor igen.
  Ötlet?

• #12791 plaschil aktív tag

  Új Válasz 2012-02-03 16:27:01 #12791

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Üdvözletem!

  Olyan makróra lenne szükségem, hogy egy felugró ablakból ki lehessen tallózni egy fájlt, amit meg kéne nyitni különböző szűrések miatt. Na én már a megnyitásnál elakadtam. A megnyitó rész xls fájlokkal tökéletesen működik, viszont nekem csv fájljaim vannak, ráadásul egy halom. Több száz megabájt. Szóval ha csv fájlt tallózok be neki, akkor kb. 2 oszlopba beírja a kb 80 oszlopot, pontosvesszővel elválasztva. Hogyan tudnám megírni úgy a kódot, hogy rendesen nyissa meg a csv-t fájlt?

• #12572 plaschil aktív tag icons #12570

  Új Válasz 2012-01-11 10:35:40 #12572

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz icons #12570 üzenetére

  Itt írnak róla részletesen.

• #12569 plaschil aktív tag poffsoft #12565

  Új Válasz 2012-01-11 09:55:13 #12569

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz poffsoft #12565 üzenetére

  Találtam egy megoldást:
  1. Korrektúra fül -> tartomány módosításának engedélyezése->Megadás
  Itt kell kijelölni azokat a cellákat, amiket "felmentek" a korlátozás alól, tehát minden cellát kijelölök, amire szeretném, hogy érvényes maradjon a módosítás joga. A felugró ablakban megadok egy nevet, a lényegi rész a tartomány megadása. Ha megadtam -> Ok -> Ok.
  2.Korrektúra fül -> Lapvédelem -> Felugró ablakon Ok.
  Ezután a ki nem jelölt cellákba írni nem tudunk, csak a lapvédelem feloldásával. Természetesen, jelszóval érdemes ezt levédeni, mert a lapvédelmet bárki feloldhatja, aki használja a fájlt. (Vagy csak a tulajdonos? Nem tudom.)
  3. Örülünk.

• #12568 plaschil aktív tag Lackó86 #12567

  Új Válasz 2012-01-11 09:38:19 #12568

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Lackó86 #12567 üzenetére

  A fejlecet lemásolod (amire a szűrőt teszed) és beilleszted az elé a bizonyos sor elé ahonnan szűrni akarsz. Ehhez persze beszúrsz egy üres sort az elé a bizonyos sor elé. És így nem kell rejteni, törölni. Csupán a fejléc lesz meg 2x a doksiban, amit akár szűrés után törölhetsz is. Függvényes megoldást nem ismerek, ha ilyenre gondolsz.

• #12566 plaschil aktív tag poffsoft #12565

  Új Válasz 2012-01-11 09:21:33 #12566

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz poffsoft #12565 üzenetére

  Tartomány kijelölés után a pipa alapból bent van. Ha ráteszem a lapvédelmet, akkor ha módosítani szeretnék, ezt az üzit kapom (bárhol a lapon): [link]
  Tehát levédi az egész lapot, de nekem csak a tartományt kellene.
  (Office 2007)

• #12563 plaschil aktív tag Lackó86 #12561

  Új Válasz 2012-01-11 08:44:13 #12563

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  válasz Lackó86 #12561 üzenetére

  Azokat a sorokat amik nem kellenek, elrejted, vagy törlöd ideiglenesen, és pl. nem mentessz rá.

• #12562 plaschil aktív tag

  Új Válasz 2012-01-11 08:37:11 #12562

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  plaschil

  aktív tag

  Üdv!

  Szeretnék egy adott cellatartományt levédeni (ne tudjanak bele írni). Hogyan kell?

Új hozzászólás Aktív témák