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

• Delila_1 veterán

  #10000

  #9999 BoharJoe

  2011-04-09 19:21:55

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9999 BoharJoe

  A cellaformátum [ó]:pp legyen, akkor nem hoz ki 82 percet, és simán elvégzi a kivonást.

• BoharJoe csendes tag

  #9999 2011-04-09 19:05:07

  Új Válasz

  Ú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

  

  BoharJoe

  csendes tag

  Sziasztok!

  Két elég primitv kérdésem lenne Excel-el kapcsolatban.
  Munakidő nyilvántartásban szeretnék munkaidőt összegezni. Pl: 8:52 + 8:45 stb.
  Részben működik is a dolog, leszámítva a hibát amikor átlépi a 24 órát, ami ugyebár úgy oldható meg, hogy az [ó]-t a celleformázásban így "jelölöm". Viszont a szumma függvénnyel automatikusan 0:00 lesz az összesítés eredmény, amely csak akkor javul, ha minden összeadandó cellában duplán klikkelek. Erre már hajlandó összeadni a fent említett számokat normálisan. Vélemény?

  A másik kérdésem ugyanezzel kapcsolatos, csak kivonás esetében: Pl: a 187:24 - 180:82 hogyan oldható meg?

  Köszönöm a segítségeteket előre is!

• Delila_1 veterán

  #9998

  #9994 Mauzes

  2011-04-09 17:50:06

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9994 Mauzes

  A 2000 előttieket így tudod dátummá alakítani:

  =DÁTUM("19"&JOBB(A1;2);KÖZÉP(A1;4;2);BAL(A1;2))

  A tengelyhez az új dátumos oszlopot rendeld.

• Delila_1 veterán

  #9997

  #9996 Danecay

  2011-04-09 17:29:10

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9996 Danecay

  Majd írd meg, mire jutottál!

• Danecay addikt

  #9996

  #9993 Delila_1

  2011-04-09 17:27:46

  Új Válasz

  Ú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

  

  Danecay

  addikt

  #9993 Delila_1

  Köszönöm a segítséget, megpróbálom a leírtak szerint!

• Delila_1 veterán

  #9995

  #9994 Mauzes

  2011-04-09 17:26:17

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9994 Mauzes

  Nézd meg, hogy a jelzett cellákon nem szövegformátum van-e?

• Mauzes addikt

  #9994 2011-04-09 17:18:44

  Új Válasz

  Ú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

  

  Mauzes

  addikt

  Sziasztok!

  Segítsetek lécci, mert annyira nem értek az excelhez, de szakdogámhoz kellene vele alkotnom. A problémám az, hogy van egy adathalmazom, miszerint:

  dátum I százalék
  01.02.90 I 7,5
  01.03.90 I 7,6
  .
  .
  .
  12.31.99 I 6,45

  Tehát első oszlopban dátum akar lenni, de az excel ezt így nem ismeri fel, formázással sem tudom rendes dátummá átalakítani. Ha beírom, hogy 01.02.03, akkor átalakítja magától 2003.január 02-re (és tudom formázni a dátumot), de a 2000 előtti dátumokat már nem, a 01.02.90-et hagyja úgy, ahogy van (és formázásra sem változtat semmit).

  Én egy trendvonalat szeretnék csinálni, y-tengely a százalék, x-tengely a dátum, de a fenti formátumban nem sikerült megoldanom a dolgot.

  Ha valakinek van ötlete, ossza meg verem, kérem!

  Köszönettel:
  Mauzes

• Delila_1 veterán

  #9993

  #9991 Danecay

  2011-04-09 17:13:05

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9991 Danecay

  Az E1-től kezdődően bevittem a napokat: 15, 16, ... 31.
  Bementem a névadásba, és a napok nevet adtam meg. A hivatkozáshoz ez a kis képlet jött:

  =OFSZET(Munka1!$E$1;0;0;HOL.VAN(NAP(EOMONTH(MA();0));Munka1!$E:$E;0);1)

  Az érvényesítésnél a forráshoz ezt adtam meg: =napok

  A gépen a dátumot februárra átírva az érvényesítés 15-től 28-ig, áprilisban 30-ig, májusban 31-ig teszi választhatóvá a napokat.

  U.i.:
  Ha nincs eomonth függvényed, az Eszközök/Bővítménykezelőben kapcsold be a két Analysis kezdetű bővítményt.

• Delila_1 veterán

  #9992

  #9991 Danecay

  2011-04-09 16:58:18

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9991 Danecay

  Egy inputboxban bekéred a nevet, és esetleg beírod egy cellába, mentéskor pedig onnan veszed elő.

  Cells(1, 3) = InputBox("Kérem a fájl címét", "Fájl címe")

  A másik kérdésedre megpróbálom kitalálni a választ.

• Danecay addikt

  #9991

  #9990 Delila_1

  2011-04-09 16:53:56

  Új Válasz

  Ú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

  

  Danecay

  addikt

  #9990 Delila_1

  Szerintem úgy csináltam, egy oszlopba beírtam a választható dátumokat, majd érvényesítésnél a listát választottam. Elegánsabb lenne viszont ha a választható dátumok hónap függvényében frissülnénet. Teszem azt most az áprilisi dátumok lennének választhatóak, viszont ha jövő honapban nyitnám meg akkor a jövő havi dátumok.

  Szóval ott, annál a párbeszédablaknál megállítani a makrót ahol a file nevét meg kell adni nem lehet? Végül is az is jó lenne ha az aktuális hónap nevén mentené el, de előtte szerepeljen más cím is a táblázatra vonatkozóan.

• Delila_1 veterán

  #9990

  #9989 Danecay

  2011-04-09 16:43:58

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9989 Danecay

  A legördülőnél alkalmazd az érvényesítést. Melyik verziót használod? Más helyen találod meg a 2007-ben és a régebbiekben.

  A makróban meg kell adnod az útvonalat és a fájl nevét.
  utvonal= "meghajtó:\mappa\almappa\"
  FN="MentendőFileNeve"

  Megadhatod, hogy az aktuális hónap nevével mentsen.
  ment=utvonal & FN & "_" & Format(Now, "yyyy.mm") & ".xls"
  ActiveWorkbook.SaveAs ment
  ActiveWindow.Close 'ezzel bezárod

• Danecay addikt

  #9989 2011-04-09 16:32:05

  Új Válasz

  Ú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

  

  Danecay

  addikt

  Sziasztok!
  Nem vagyok Excel guru, így lehet a kérdésem is egyszerű lesz.
  Olyan legördülő listát szeretnék csinálni, abiben mindig az aktuális hónap napjait lehet kiválasztani, sőt még jobb lenne ha csak az aktuáli hónap másodig felének napjait, pl. 15.-étől.
  A másik problémám, hogy olyan makrót szeretnék készíteni ami végülis, nem más mint egy mentés másként folyamat, de azt szeretném, ha a file nevének és helyének megadásánál lenne vége a script-nek. Úgy sikerült megcsinálnom, hogy el is menti, de azért szeretném ha az említett pontnál lenne vége a makrónak, mert file neve változik, nem nehéz kitalálni, havonta

  Ötlet, valaki?

  Előre is köszönöm!

• m.zmrzlina senior tag

  #9988

  #9987 Fire/SOUL/CD

  2011-04-09 09:48:53

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #9987 Fire/SOUL/CD

  Köszönöm

• Fire/SOUL/CD félisten

  #9987

  #9986 m.zmrzlina

  2011-04-09 08:54:52

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9986 m.zmrzlina

  =HA(HIBÁS(INT(A1));"Ez nem szám";A1)

• m.zmrzlina senior tag

  #9986 2011-04-09 08:40:23

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  

  A fenti példában szeretném eltüntetni a #ÉRTÉK hibaüzenetet 2003 kompatibilis módon. 2007-es verzióban úgy szoktam csinálni, hogy HAHIBA() [érték] argumentumába teszem a képletet, [érték hiba esetén]-be pedig "" üres sztringet.

  Ha jól tudom 2003-ban nincs HAHIBA() Legalábbis ha kompatibilis módon (xls-ként) akarom elmenteni a munkafüzetet akkor "jelentős mértékű funkcióvesztés" hibaüzenet van és a HAHIBA()-t tartalmazó képletekre hivatkozik.

• Fire/SOUL/CD félisten

  #9985

  #9984 Fire/SOUL/CD

  2011-04-08 20:05:02

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9984 Fire/SOUL/CD

  Oops.. A 2 pont így félreérthető, szóval helyesen így:

  2. Az angol UTF8 mezei szöveges fájl, annyiban különbözik egy sima angol textfájltól, hogy az első 3 byte-ja rendre a következő (hexadecimálisan): 0xEF, 0xBB, 0xBF

  Mivel egy sima angol(meg bármilyen nyelvű) text fájlban nem szokás speciális karaktereket használni, illetve (és ez a fontosabb), az angolban nincs ékezet... Egy magyar nyelven írt text fájlhoz biztosan valós konverzió kell, nem csak az első 3 byte variálása...

• Fire/SOUL/CD félisten

  #9984

  #9978 Zomb€€

  2011-04-08 19:43:42

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9978 Zomb€€

  "Ezt be lehet építeni a makróba, hogy ne kelljen külön még átkódolni a .csv-t?"

  1. Attól függ, milyen módszerrel hozza létre a makró a CSV fájlt

  2. Az UTF8 mezei szöveges fájl, annyiban különbözik egy sima textfájltól, hogy az első 3 byte-ja rendre a következő (hexadecimálisan): 0xEF, 0xBB, 0xBF

  3. Az ASCII->UTF8 valós konverziónak, akkor van csak értelme (a 2. pont túl), ha tényleg speciális karakterek kerülnek a CSV-be, pl: äöüß, amit a weben is meg akarnak jeleníteni. Valószínű, hogy ezzel a fájllal is ez van... Ha ez a szitu, akkor egy példaprogi

  Private Sub CommandButton1_Click()
  
  Dim My_Real_UTF8_Conversion As Object
  Set My_Real_UTF8_Conversion = CreateObject("ADODB.Stream")
  
  My_Real_UTF8_Conversion.Type = 2
  My_Real_UTF8_Conversion.Charset = "utf-8"
  My_Real_UTF8_Conversion.Open
  My_Real_UTF8_Conversion.WriteText "ASCII nem fog változni, de ezek igen: äöüß"
  My_Real_UTF8_Conversion.SaveToFile "d:\FSCD_UTF8.UTF8", 2
  
  Set My_Real_UTF8_Conversion = Nothing
  
  End Sub

• Delila_1 veterán

  #9983

  #9982 bnorci71

  2011-04-08 13:27:54

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9982 bnorci71

  Szívesen.

• bnorci71 addikt

  #9982

  #9980 Delila_1

  2011-04-08 12:01:29

  Új Válasz

  Ú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

  

  bnorci71

  addikt

  #9980 Delila_1

  
  köszi
  

  már kész is

  perfag

  köszi neked is

• perfag aktív tag

  #9981

  #9979 bnorci71

  2011-04-08 11:57:52

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9979 bnorci71

  Kijelölöd az adataidat, Kezdőlapon Stílusok csoport, Feltételes formázás, Cellakijelölési szabályok, Ismétlődő értékek. Minden amiből több van az piros lesz, ha nem babrálod.
  (Excel 2007)

• Delila_1 veterán

  #9980

  #9979 bnorci71

  2011-04-08 11:19:23

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9979 bnorci71

  Írj mellé egy DARABTELI függvényt.

  =DARABTELI(A:A;A1)

  Ez a függvény kiírja, hogy az A1 értéke hányszor található meg az A oszlopban. A képletet lemásolva az adataid mellé minden leltári számnál megmutatja az előfordulása darabszámát.

• bnorci71 addikt

  #9979 2011-04-08 11:14:38

  Új Válasz

  Ú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

  

  bnorci71

  addikt

  Szasztok!

  olyanra kellene nekem gyors megoldás, hogy egy excel táblában 1 oszlopban leltári gyári számok szerepelnek. Lehet, hogy van olyan ami 2x 3x ezeket kellene megtalálni.
  A kézi végiggörgetés kicsit körülményes ~2e sornál

• Zomb€€ őstag

  #9978 2011-04-08 08:52:45

  Új Válasz

  Ú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

  

  Zomb€€

  őstag

  Üdv!

  Újra kérdeznék:]
  Szóval, egy makró adott excelt .csv file-ként ment el, ami majd feltöltésre kerül valahova. Viszont a feltöltés feltétele megváltozott, és ASCII helyett UTF-8 kódolású filera lenne szükség. Ezt be lehet építeni a makróba, hogy ne kelljen külön még átkódolni a .csv-t?

• m.zmrzlina senior tag

  #9977

  #9975 Fire/SOUL/CD

  2011-04-08 07:57:16

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #9975 Fire/SOUL/CD

  Megtaláltam, de nem állítom, hogy láttam már ilyet.

  Kétféle aposztróf karakter van a szövegben. A C1-ben látszik is.

• m.zmrzlina senior tag

  #9976

  #9975 Fire/SOUL/CD

  2011-04-08 07:46:45

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #9975 Fire/SOUL/CD

  De van mégpedig az A1-hez nagyon hasonló karaktersorozat.

  A kérdés inkább az hogy mitől más a második képletben az adattípus mint az elsőben.

• Fire/SOUL/CD félisten

  #9975

  #9974 m.zmrzlina

  2011-04-08 07:44:57

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9974 m.zmrzlina

  És itt honnan kellene látnunk, hogy mi van az A2-ben?
  Lehet, hogy tényleg nincs...

• m.zmrzlina senior tag

  #9974 2011-04-08 07:39:42

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  Egy egyszerű képlet elég érdekesen viselkedik.

  

  D1-ben működik D2-ben pedig "Nem megfelelő adattípusú a képletben használt érték" hibát ad.

  Aposztróf karaktert keresek.

• Bibby addikt

  #9973 2011-04-07 23:10:42

  Új Válasz

  Ú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

  

  Bibby

  addikt

  Sziasztok!

  Gyors segítség kellene. Adott egy vonaldiagram, vízszintes tengelyen 0-tól 12000-ig az értékek. Itt kellene jelölnöm a vízszintes tengelyen egy értéket (11271) és ezt egy vastag vonallal szerepeltetni (tehát egy párhuzamos vonal az y tengely mellett, a 11271-nél metssze x tengelyt)
  Nem jövök rá hogyan.

• Fire/SOUL/CD félisten

  #9972

  #9967 MIFtIli

  2011-04-07 21:55:37

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9967 MIFtIli

  Ezek elintézik a táblázatokat, próbáld ki, hátha megfelel.
  [link]
  [link]

• m.zmrzlina senior tag

  #9971

  #9970 MIFtIli

  2011-04-07 21:45:14

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #9970 MIFtIli

  Én nem tudok róla (persze ez nem jelenti azt hogy nem létezik) de a képet próbáld meg még egyszer!

• MIFtIli aktív tag

  #9970 2011-04-07 21:40:25

  Új Válasz

  Ú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

  

  MIFtIli

  aktív tag

  Nincs olyan gyorsbill mint a tab, csak ami a kurzor előtt van azt viszi magával?

• MIFtIli aktív tag

  #9969

  #9968 m.zmrzlina

  2011-04-07 21:21:47

  Új Válasz

  Ú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

  

  MIFtIli

  aktív tag

  #9968 m.zmrzlina

  

  Ez egy screenshot a pdf-ről, amit most már lehet másolni. Ezt kéne valahogy bevarázsolni excelbe. A baj az, hogy ez az egésznek csak egy nagyon kis részlete.

• m.zmrzlina senior tag

  #9968

  #9967 MIFtIli

  2011-04-07 21:10:47

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #9967 MIFtIli

  Adatok>Szövegből oszlopok vagy Data>Text to columns

  Több segítséghez jó lenne látni az eredeti adatot amit szét szeretnél szabdalni.

• MIFtIli aktív tag

  #9967 2011-04-07 20:48:46

  Új Válasz

  Ú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

  

  MIFtIli

  aktív tag

  Van egy nagy pdf, amiből ha kimásolom a táblázat sorait, az egészet egy cellába teszi be. Át akarom mozgatni szöveg egy részét, hogy minden a megfelelő cellába kerüljön. Nincs erre valami gyorsbill?
  Tehát, hogy a szövegből maradjon valamennyi, a többit meg vigye át egy cellával jobbra, ott megint stb..

• Fire/SOUL/CD félisten

  #9966

  #9965 perfag

  2011-04-07 14:30:42

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9965 perfag

  Hmmm.. Tényleg nem tudom mi lehet a problem Nálatok.
  Mellesleg a korábbiakban írt makrók egyike sem alakítja Szám formátumúvá a cellákat, hanem Általános formátumra, igaz, azzal már lehet dolgozni/számolni. Általános (vagy bármi egyéb) formátumra hozni egy tartományt, ahhoz nem kell ciklus, elég egy sor is. pl

  Private Sub CommandButton1_Click()
  
  Range("A1:A" & Range("A1").End(xlDown).Row).NumberFormat = "General"
  
  End Sub

• perfag aktív tag

  #9965

  #9963 Fire/SOUL/CD

  2011-04-07 13:23:28

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9963 Fire/SOUL/CD

  Nálam sem megy tizedesszámokkal a makró. Gyalog megcsinálja, makróval csak az egész számokat. (Win7 x32, Excel 2010)

• PetX aktív tag

  #9964

  #9963 Fire/SOUL/CD

  2011-04-07 13:05:28

  Új Válasz

  Ú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

  

  PetX

  aktív tag

  #9963 Fire/SOUL/CD

  Öööö, ezt hogyan adom meg az adatmezőkre vonatkozóan?
  {MERGEFIELD Mező neve \# "0,00"}
  -------------
  Tárgytalan, megvan!

  KÖSZÖNÖM!

• Fire/SOUL/CD félisten

  #9963

  #9961 bozsozso

  2011-04-07 13:00:32

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9961 bozsozso

  Nem tudom, ha tudnám megírnám. (Visszaolvasva, ha minden úgy van ahogy írtad, akkor működnie kellene)

  PetX
  Word körlevélben használsz adatfájlként excel táblázatot, ok.

  1. A wordben használt sablonról van szó? (ha igen, akkor sem mész vele semmire)
  2. A word körlevélben is meg kell formázni az adott mezőt, pl így
  {MERGEFIELD Mező neve \# "0,00"}

• PetX aktív tag

  #9962 2011-04-07 10:46:27

  Új Válasz

  Ú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

  

  PetX

  aktív tag

  Hello!

  A bajom a következő: körlevelet készítek, de míg az adatfile-ban a kerekítéseket megcsinálja, addig a sablonban ismét a 2km hosszú kerekítettlen értéket adja vissza. Erre van valami trükk? KEREKÍTÉS-t használtam, előtte CSONK-ot, de az nem volt helyes.
  Ha a formátumot átállítom szövegre, akkor persze jó, de hát akkor meg agyoncsapom a fv.-t...

  Ha van valami ötletetek akkor irjátok le, köszönöm!

  (szerk)
  Hja: Office2007-ről van szó, ha esetleg fontos lenne (Vista alatt)

• bozsozso őstag

  #9961

  #9958 Fire/SOUL/CD

  2011-04-06 20:43:10

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9958 Fire/SOUL/CD

  de akkor nállam miért nem működik? mi lehet a probléma? nekem is Win7 64bit és 2010 64bit van

• Fire/SOUL/CD félisten

  #9960

  #9959 Delila_1

  2011-04-06 19:31:54

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9959 Delila_1

  Persze, mint írtam hibátlanul lefut és működik...
  (W7 x64 és Office 2010 x64 Up to Date)

• Delila_1 veterán

  #9959

  #9958 Fire/SOUL/CD

  2011-04-06 19:29:58

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9958 Fire/SOUL/CD

  Törtekkel is hibátlan?

• Fire/SOUL/CD félisten

  #9958

  #9954 Delila_1

  2011-04-06 19:25:27

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9954 Delila_1

  Írnék Én, de miről? Nálam semmi gond nincs, a Te makród is simán, hibátlanul lefut, szóval nálam nem jelentkezik ez a hiba...
  (ha jól rémlik 2004-2005 óta nem is lehetne, mert az időtájt valóban létezett bug-ként, de akkor javították...)

• bozsozso őstag

  #9957

  #9956 Delila_1

  2011-04-06 19:09:03

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9956 Delila_1

  hát igen, de most a jelenlegi problémámat megoldotta.

• Delila_1 veterán

  #9956

  #9955 bozsozso

  2011-04-06 18:50:41

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9955 bozsozso

  Ez egy szükség-megoldás, de attól még az Excel hibája nem szűnt meg.
  A ciklus lelassítja a futást, nálam több nagy területről van szó.

  Próbálgattam, hogy makróból az irányított beillesztéssel történő felszorzást elvégzi, csak éppen a területet cellánként le kell enterezni (!)
  Ez persze nem megoldás. Gondoltam, hogy a felszorzás után ugyanarra a területre nyomok egy Paste:=xlValues-t, de az sem javított rajta.

  A 2007-ből már kiirtották ezt a hibát – tettek helyette egyebet.

• bozsozso őstag

  #9955

  #9950 Delila_1

  2011-04-06 18:37:19

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9950 Delila_1

  Szia!

  Ezzel sikerült megoldanom:

  Range("G2:G" & Range("G1").End(xlDown).Row).Select
  For Each xCell In Selection
  xCell.Value = xCell.Value * 1
  Next xCell

• Delila_1 veterán

  #9954 2011-04-06 08:29:29

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  Fire

  Ez a Te profilod. Meg kellene beszélni Microsoftékkal, hogy egy tartomány (ami szöveg formátumú számokat tartalmaz) makróból csak akkor szorozható fel – alakítható át a művelettel számokká –, ha a tartomány nem tartalmaz törteket. Egész számoknál nincs probléma.

• gban veterán

  #9953

  #9952 gban

  2011-04-05 22:05:40

  Új Válasz

  Ú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

  

  gban

  veterán

  LOGOUT blog

  #9952 gban

  Igeeeeen!
  A súgót elolvasva végre rájötem, hogy mit értelmeztem rosszul!
  Köszönöm még egyszer!

• gban veterán

  #9952 2011-04-05 21:45:52

  Új Válasz

  Ú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

  

  gban

  veterán

  LOGOUT blog

  Nem jön össze, pedig nem vagyok nagyon hülye ember
  Kérhetek valakitől segítséget?
  Elküldeném mailben a mini példa file-t, és ebbe kellene beírni a képletet.
  Abban sem vagyok biztos hogy érthetően írtam le, másnak tűnik a függvény picit, mint amire szükségem van.
  Köszönöm.

• gban veterán

  #9951

  #9949 Delila_1

  2011-04-05 20:50:48

  Új Válasz

  Ú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

  

  gban

  veterán

  LOGOUT blog

  #9949 Delila_1

  Gondoltam hogy félreértetted, arra értettem hogy a leírást róla ha megkapom magyarul, és esetleg valaki bővebben elemzi, akkor azt nem kérem angolul, csak a függvény nevét
  Köszönöm mindkettőtöknek.

• Delila_1 veterán

  #9950

  #9948 bozsozso

  2011-04-05 19:48:50

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9948 bozsozso

  Sajnos én nem jöttem rá, de hátha itt valaki...

• Delila_1 veterán

  #9949

  #9946 gban

  2011-04-05 19:48:12

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9946 gban

  "(elég a függvény angol neve)"

  Ezért bátorkodtam csakis angolul megírni.

• bozsozso őstag

  #9948

  #9945 Delila_1

  2011-04-05 19:13:29

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9945 Delila_1

  akkor semmi megoldás nincs rá?

• Fire/SOUL/CD félisten

  #9947

  #9946 gban

  2011-04-05 18:16:29

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9946 gban

  FKERES függvény

  hasznos lehet, ha angol függvények magyar megfelelőjét keresed...

• gban veterán

  #9946

  #9943 Delila_1

  2011-04-05 18:03:22

  Új Válasz

  Ú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

  

  gban

  veterán

  LOGOUT blog

  #9943 Delila_1

  Köszönöm, ha kérhetem megmondod magyarul is?
  Itthon magyar office van, itt áttanulmányoznám, ahol meg alkalmazni kell ott van angol office.

• Delila_1 veterán

  #9945

  #9944 bozsozso

  2011-04-05 17:36:06

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9944 bozsozso

  passz

• bozsozso őstag

  #9944

  #9942 Delila_1

  2011-04-05 17:28:02

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9942 Delila_1

  nekem vessző van benne nem pont

• Delila_1 veterán

  #9943

  #9941 gban

  2011-04-05 17:24:50

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9941 gban

  vlookup

• Delila_1 veterán

  #9942

  #9940 bozsozso

  2011-04-05 17:23:33

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9940 bozsozso

  Fogalmam sincs. Mostanában jártam én is így. Az eredeti, szöveg formátumú számok tizedes elválasztója pont volt, azokat makróval kicseréltettem vesszőre, ezután jött volna az irányított beillesztés. Ez már nem jött össze.

  Addig írtam meg, hogy egy változóba bevettem az 1-et, kijelöltem a nem összefüggő területeket, és egy üzenetet küldtem, hogy illessze be irányítottan, szorzásként.

• gban veterán

  #9941 2011-04-05 17:22:03

  Új Válasz

  Ú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

  

  gban

  veterán

  LOGOUT blog

  Eddig Accessel oldottam meg, excelben hogy kell megoldani a következőt?
  1. munkafüzet A oszlopa ha egyezik 2. munkafüzet A oszlopával, akkor legyen 1. munkafüzet B oszlopa egyenlő a 2. munkafüzet B oszlopával?
  Vagyis, van 1. munkafüzet A oszlopában egymás alatt pl. 10 érték, ebből lehet azonos is, és rendelje hozzá a B oszlopban azt az értéket, ami a 2. mf. B oszlopában van, ha az A oszlopok megegyeznek.
  Másképp, 1. mf. A5 cellájában levő értékhez ami pl. 4567abcd, rendelje hozzá a B5 cellához azt az értéket, ami a 2. mf-ben van az akárhanyadik sorban, de az A oszlopban levő 4567abcd érték melletti B oszlopban levő cellában van.

  Köszönöm, remélem érthető voltam.
  És angolul?
  (elég a függvény angol neve)
  köszönöm

• bozsozso őstag

  #9940

  #9937 Delila_1

  2011-04-05 17:18:12

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9937 Delila_1

  az lehet csak azt nem értem, ha "kézzel" megcsinálom az irányított beillesztést és működik akkor ha le is rögzítem makrórögzítéssel akkor miért nem hajtja végre?

• bozsozso őstag

  #9939

  #9933 perfag

  2011-04-05 17:09:56

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9933 perfag

  igen makróban akarok számolni, de úgy hogy szumha függvény van beillesztve egy adott cellába ami végül ezen oszlopok tartalmát összesíteni.

• perfag aktív tag

  #9938

  #9937 Delila_1

  2011-04-05 16:53:01

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9937 Delila_1

  perfagnak biztos, hogy nincs igaza, mert perfag kérdezett ugyan, azzal a nem titkolt szándékkal, hogy majd okoskodik, de választ nem kapott, így perfag körön kívül van

• Delila_1 veterán

  #9937

  #9936 bozsozso

  2011-04-05 14:39:22

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9936 bozsozso

  Ez átalakítja. Lehet, hogy Perfagnak igaza van, és a tizedesekkel gyűlt meg a bajod?

• bozsozso őstag

  #9936

  #9935 Delila_1

  2011-04-05 14:35:46

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9935 Delila_1

  Én is így próbáltam de csak kijelöli az adott oszlopot és nem csinál semmit

• Delila_1 veterán

  #9935

  #9930 bozsozso

  2011-04-05 13:03:44

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9930 bozsozso

  Sub szám()
  Range("B1") = 1
  Range("B1").Copy
  Range("A1:A" & Range("A1").End(xlDown).Row).Select
  Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlMultiply
  Range("B1") = ""
  Application.CutCopyMode = False
  End Sub

• Delila_1 veterán

  #9934

  #9928 Azura

  2011-04-05 12:55:28

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9928 Azura

  Ezt próbáld meg futtatni:

  Sub hiper()
  Dim usor As Long, sor As Long, A As String, B As String
  
  Calculate
  usor = Range("A6000").End(xlUp).Row
  
  For sor = 1 To usor
  Cells(sor, 1).Select
  A = Cells(sor, 46)
  B = Cells(sor, 1)
  ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
  A, TextToDisplay:=B
  Next
  End Sub

• perfag aktív tag

  #9933

  #9930 bozsozso

  2011-04-05 12:40:35

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9930 bozsozso

  Hmm, nem értem. "Szöveg formátumot szeretnék számmá alakítani makróval." A makróban akarsz vele számolni, vagy vissza akarod írni az eredményt egy cellába?
  Makróban a Val () függvénnyel lehet szöveget számmá alakítani.
  b = Val(Range("A1"))
  Elvileg. Mert a szövegben tizedes pontot kell használni, nem tizedes vesszőt. Meg lehet kerülni egy vesszőfigyelő makróval, ami kicseréli pontra az elválasztót. A VBA Súgó szerint viszont CDbl függvényt kell az internacionalistáknak használniuk.

• Fire/SOUL/CD félisten

  #9932

  #9931 scott_free

  2011-04-05 12:18:12

  Új Válasz

  Ú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

  

  Fire/SOUL/CD

  félisten

  #9931 scott_free

  Van, a SZUMHA függvényben ugyanazt a kritériumot adod meg, mint ami miatt a feltételes formázásnál "elzöldülnek" a cellák.

• scott_free senior tag

  #9931 2011-04-05 12:04:50

  Új Válasz

  Ú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

  

  scott_free

  senior tag

  sziasztok,

  adott egy tartomány (A1:A3), ahol a cellák értéke egy külső, igen-nem választás szerint feltételes formázással zöld vagy szürke színű.
  arra van-e mód, hogy az A4-es cellába csak a zöld színűeket adja össze?

• bozsozso őstag

  #9930 2011-04-05 11:56:00

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  Sziasztok!

  Szöveg formátumot szeretnék számmá alakítani makróval. Simán úgy tudom megvalósítani, hogy pl.:A1 cellába írok egy 1-est majd A1 cella másolás kijelölöm azokat a cellákat amiket át szeretnék alakítani majd irányított beillesztés kiválasztom az értéket és a szorzást ezzel jó lesz, de hiába csináltam rá makró rögzítést nem tudom megvalósítani. Vagy erre létezik valami függévny?

  Így szövegként nem tudok számolni a cella tartalommal.

  Előre is köszönöm.

• perfag aktív tag

  #9929

  #9928 Azura

  2011-04-05 11:54:20

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9928 Azura

  Próbálj meg egy Calculate-t a két alprogram között, hátha az segít. (Ártani nem fog )
  Alprogram hívásnál minek a Call?

• Azura csendes tag

  #9928 2011-04-05 10:40:58

  Új Válasz

  Ú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

  

  Azura

  csendes tag

  Sziasztok

  írtam egy macrot, és valami miatt nem úgy működik, ahogy szeretném.
  amit szeretnék elérni, hogy csináljon egy frissítést, ezzel befrissíti a táblában lévő adatokat, különféle külső adatbázisokból, majd hajtson végre egy hiperlinkesítést (az A oszlopban lévő értékekhez csatolja az AT oszlopban lévő webcímet)

  ha külön futtatom a 2 macrot, akkor minden további nélkül lefut, de ha a runall macrot futtatom, vagy összeteszem egy macroba, akkor is lefut, de a hiperlinkek nem működnek.

  Előre is köszi a segítséget
  Azura

  Sub frissit()
  ActiveWorkbook.RefreshAll
  End Sub

  Sub link()
  i = 1
  Do While Cells(i, 1) <> ""
  i = i + 1
  Loop
  i = i - 1
  For J = 2 To i
  A = Cells(J, 46)
  b = Cells(J, 1)
  Cells(J, 1).Select
  ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=A, TextToDisplay:=b
  Next
  Columns(1).Font.Name = "Arial"
  Columns(1).Font.Size = 8
  End Sub

  Sub runall()
  Call frissit
  Call link
  End Sub

• bozsozso őstag

  #9927

  #9926 Delila_1

  2011-04-03 10:04:00

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9926 Delila_1

  igen köszönöm. a #9921-ben meg is válaszoltam magamnak

• Delila_1 veterán

  #9926

  #9924 bozsozso

  2011-04-03 08:32:47

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9924 bozsozso

  A 2007 Mentés másként menüpontjában van egy ilyen almenü: 97-2003 verziójú munkafüzet.
  Felteszem, hogy a 2010-esben is van. Ebben a formátumban mentsd el, akkor jó lesz.

• perfag aktív tag

  #9925

  #9924 bozsozso

  2011-04-02 19:22:58

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9924 bozsozso

  Miért ne működne? Ha jól emlékszem az Excel 95-ről Excel 97-re átállásnál volt egy nagyon jelentős váltás a VBA objektum modelljében, azóta olyan nagy dolgok nem történtek, az egyik verzióban megírt makró fut a másikban is. Majdnem azt mondtam miért nincs kéznél egy portable Excel 2003-od, de mióta áttértem Win7-re nekem sincs

• bozsozso őstag

  #9924

  #9922 perfag

  2011-04-02 19:16:41

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9922 perfag

  vagy az nem fog működni 2003 alatt? most nincs a közelemben 2003-as excell, hogy ki tudnám próbálni.

• perfag aktív tag

  #9923

  #9917 tomlake

  2011-04-02 18:59:40

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9917 tomlake

  Részemről nem kedvesség, én önző ember vagyok, nekem a fórum unaloműző. Mások pasziánszoznak
  Onnan kezdve, hogy ismétlődnek a darabok szerintem ez már inkább adatbázisos probléma, mint táblázatkezelés. Meg lehet csinálni Excelben is, ötletem van rá, de lusta vagyok begépelni ezt a sok adatot. Ha felteszed egy fájlcserélőre, vagy elküldöd a yahoo-s címemre akkor holnap szülök egy megoldást. Az még kellene, hogy
  - a Tartalékból származó adatokat hova szeretnéd tenni
  - az adatismétlődés maximuma a Tartaléklapon 2? 3?

• perfag aktív tag

  #9922

  #9919 bozsozso

  2011-04-02 18:44:06

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9919 bozsozso

  Azok biztosan Excel 2003-ban (vagy régebbiből) erednek.

• bozsozso őstag

  #9921

  #9920 bozsozso

  2011-04-02 18:34:22

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9920 bozsozso

  ok megvan. a mentésnél paraméterbe oda kell írni, hogy Fileformats:= xlexcel8

• bozsozso őstag

  #9920

  #9919 bozsozso

  2011-04-02 18:25:07

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9919 bozsozso

  pedig biztosan az lesz a probléma. ha megnyitom és utánna elmentem 97-2003 excelként akkor minden rendben. valahogy ez a makrónak nem "mondható" meg hogy így mentse?

• bozsozso őstag

  #9919

  #9918 perfag

  2011-04-02 18:15:28

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9918 perfag

  pont most nézem más xls-el nem problémázik csak azokkal amiket makróból mentek.

• perfag aktív tag

  #9918

  #9916 bozsozso

  2011-04-02 15:49:16

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9916 bozsozso

  Szerintem 2003-ban rendben lesz, de meg kell próbálni és kiderül

• tomlake csendes tag

  #9917 2011-04-02 14:07:39

  Új Válasz

  Ú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

  

  tomlake

  csendes tag

  Köszönöm kedvességetek!
  Igen, a DARABTELI-re van szükségem.
  Ezt a kilistázó témát nem értem egészen, az FKERES kicsit magas nekem...
  Csatolok két képet, hogy is néz ez ki valójában. Az a gondom, hogy nem csak arra lenne szükségem, hogy mennyi a tartalék, hanem arra is, hogy hányas dobozban, ill. van 1 megjegyzés oszlop is, ennek a tartalmára is szükségem lenne. A darabok ismétlődhetnek, tehát lehet hogy több dobozban is van tartalék.
  Előre is köszönöm!
  

  

• bozsozso őstag

  #9916

  #9913 perfag

  2011-04-02 13:42:18

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9913 perfag

  köszönöm.akkor ez azt jelenti, hogy majd a 2003-as excelben ez nem fog jelentkezni? Ahol használni fogom ott az van csak itthon használom a 2010-et.

• m.zmrzlina senior tag

  #9915

  #9912 tomlake

  2011-04-02 12:22:05

  Új Válasz

  Ú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

  

  m.zmrzlina

  senior tag

  #9912 tomlake

  Ha jól értem a feladatot akkor a =DARABTELI() fv-re van szükséged.

  Az általam (a leírásod) alapján rekonstruált munkalapon használt elnevezések és tartományok szerint így néz ki a fv:

  =DARABTELI(tartalek!$B$2:$B$14;F2)
  Ezt minden sorhoz hozzá kell rendelned amiben olyan rajzszám van amiről tudni szeretnéd, hogy mennyi van belőle a tartalék munkalapon.

  Ez van a "megrendelo" munkalapomon:
  

  Ez van a "tartalek" munkalapomon:
  

• perfag aktív tag

  #9914

  #9912 tomlake

  2011-04-02 12:09:25

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9912 tomlake

  Nem biztos, hogy jól értem a problémát, de ha igen:
  =HA(DARABTELI(Tartalékok!D4:D18;H3)>0;FKERES(H3;Tartalékok!D4:E5;2;HAMIS);"nincs")
  Az általad leírt munkafüzeteket létrehoztam. A Munkafüzet2-nek a Tartalékok nevet adtam.
  A Rajzszámok a H oszlopba kerültek az első lapon, a Tartalékok lapon a D oszlopba.
  A képlet ezt csinálja: darabtelivel megnézem a Tartalékok lapon van-e a H3-nak megfelelő rajzszám, ha nincs akkor kiírja nincs. Ha van, akkor az fkeressel megnézem hol van és mellőle kiíratom a darabszámot.
  Ha nem erre gondoltál, akkor finomítsd.

• perfag aktív tag

  #9913

  #9907 bozsozso

  2011-04-02 11:32:35

  Új Válasz

  Ú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

  

  perfag

  aktív tag

  #9907 bozsozso

  Azért mert az Excel 2007-től nem xls a fájltípus. Ha csak adat van a munkafüzetben akkor xlsx, ha makró is akkor xlsm. Eszerint kellene a makródon változtatnod.

• tomlake csendes tag

  #9912 2011-04-02 08:20:54

  Új Válasz

  Ú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

  

  tomlake

  csendes tag

  Üdv Mindenki!

  Egy kérdéssel szeretnék Hozzátok fordulni:
  van 1 excelem, 2 munkalap van benne. Az első munkalapon van egy olyan oszlop is, hogy rajzszám. Ezek ömlesztve szerepelnek, kb. 10-es 20-as csoportokban (ennyi rajzszám van 1 megrendelésen). Így néz ki 1 sor pl.:

  Munkaszám/Pozíció / Anyagszám / Megrendelés / Megnevezés / Rajszám / Darabszám
  M11-590-029/017 118 4530498833 Welle 8-109-271-765 1

  A másik munkalapon tartalékok szerepelnek, a következő formában:
  Megnevezés / Rajzszám / Darabszám / Doboz
  Schwenkteil 8-109-384-494 4 2

  Olyan függvényt keresek, amiben megadhatok neki 1 tartományt (egy megrendelést), hogy azokból a rajzszámokból hányat talál meg a másik munkalapon (a tartalékokból), és ezt a végén kilistázza. Ezt eddig egyenként, manuálisan csináltam (ctrl+c, másik munkalap, ctrl+f, ctrl+v, listába mind), és kicsit sokáig tart, ha több száz sort kell kitartalékolni...

  Válaszotokat előre is köszönöm!

• Delila_1 veterán

  #9911

  #9910 Petrov86

  2011-04-02 07:44:17

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9910 Petrov86

  Nincs mit.

• Petrov86 csendes tag

  #9910

  #9909 Delila_1

  2011-04-01 21:51:23

  Új Válasz

  Ú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

  

  Petrov86

  csendes tag

  #9909 Delila_1

  oh de jó, köszi!

• Delila_1 veterán

  #9909

  #9908 Petrov86

  2011-04-01 19:38:48

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9908 Petrov86

  Nézd meg a Formátum - Feltételes formázás menüpontot. Egyszerű követni.

• Petrov86 csendes tag

  #9908 2011-04-01 19:29:45

  Új Válasz

  Ú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

  

  Petrov86

  csendes tag

  Sziasztok!

  Hogy tudom megcsinálni azt, hogyha az egyik cella mondjuk eléri a 10 értéket akkor onnantól legyen piros színű 20ig ahonnan kezdve meg zöld legyen?

  Köszi!

• bozsozso őstag

  #9907 2011-04-01 18:35:01

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  Miért írja ki az xls megnyitásakor a következő üzenetet?

  A megnyitni kívánt fájl(fájlnév.xls) más formátumú, mint amilyet a fájlkiterjesztés jelez. A fájl megnyitása előtt ellenőrizze, hogy az nem sérült, valamint megbízható forrásból származik.Meg szeretné most nyitni?

  Igen-re kattintva mind rendben megnyitja. Ezek olyan táblázatok amit makróval mentettem el. Egy munkalapot egy fájlba.

  Amilyen kóddal mentettem:

  usorB = Range("B5000").End(xlUp).Row
  Set Wb1 = ActiveWorkbook
  For a = 4 To usorB
  
  Set Wb2 = Workbooks.Add
  Wb1.Sheets("Adatlap").Range("A2") = Wb1.Sheets("Összesen").Range("D" & a)
  Wb1.Sheets("Adatlap").Range("B5") = Wb1.Sheets("Összesen").Range("B" & a)
  Wb1.Sheets("Adatlap").Range("B6") = Wb1.Sheets("Összesen").Range("C" & a)
  Wb1.Sheets("Adatlap").Range("F6") = Wb1.Sheets("Összesen").Range("I" & a)
  Wb1.Sheets("Adatlap").Range("G6") = Wb1.Sheets("Összesen").Range("H" & a)
  vag = Left(Wb1.Sheets("Összesen").Range("D" & a), 15)
  fnev = Replace(vag, "*", "X")
  Wb1.Sheets("Adatlap").Copy Before:=Wb2.Sheets(1)
  
  Wb2.SaveAs Filename:="E:\PC\" & vas & "\" & fnev & ".xls"
  
  Wb2.Close False
  
  
  Next a

  Lehet vele valamit csinálni, hogy ne hozzon fel ilyen üzenetet?

  Office2010

• Delila_1 veterán

  #9906

  #9905 bozsozso

  2011-04-01 18:01:41

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9905 bozsozso

  Azt jelenti, hogy pontos értéket keresel, nem közelítő értéket. Azonos a HAMIS paraméterrel.

  Szívesen.

• bozsozso őstag

  #9905

  #9904 Delila_1

  2011-04-01 17:57:13

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9904 Delila_1

  ja igen természetesen azt is. azon kívül gondoltam. a vlook függvény végén a 0 jelenti azt, hogy nincs sorba rendezve az "A" oszlop az új munka2 lapon?

  Köszönöm szépen mégegyszer

• Delila_1 veterán

  #9904

  #9903 bozsozso

  2011-04-01 17:47:59

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9903 bozsozso

  Mást is módosítottam.
  Az újban nem a G, hanem a T oszlopba gyűjtettem ki az irányított szűrővel az A oszlop egyedi értékeit, mert látom, hogy a G oszlop foglalt.

• bozsozso őstag

  #9903

  #9902 Delila_1

  2011-04-01 17:23:17

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9902 Delila_1

  Köszönöm szépen erre gondoltam. csak most próbálom megérteni, hogy a saját kódomba át tudjam ültetni.

  ha jól látom akkor csak ennyit illesztettél az erdetibe:

  Range("C2:C" & usorA) = "=VLOOKUP(A2:A" & usorA & ",Munka1!A:I,8,0)"
  Range("D2:D" & usorA) = "=VLOOKUP(A2:A" & usorA & ",Munka1!A:I,9,0)"
  Range("A:D").Select

• Delila_1 veterán

  #9902

  #9901 bozsozso

  2011-04-01 16:40:00

  Új Válasz

  Ú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

  

  Delila_1

  veterán

  #9901 bozsozso

  Ez az új a Munka2 lapon a B oszlopba írja a Munka1 H oszlopát, és a C-be az I-t.

  Sub Összegzés()
  Dim usorA As Long, usorT As Long, usor2A As Long
  
  Sheets("Munka1").Select
  usorA = Range("A1").End(xlDown).Row 'Alsó sor a Munka1 lapon
  
  'Irányított szűrés egyedi ('A' oszlop) értékekre a T1-be
  Range("A1:A" & usorA).AdvancedFilter Action:=xlFilterCopy, _
  CopyToRange:=Range("T1"), Unique:=True
  
  'Alsó sor a T oszlopban
  usorT = Range("T1").End(xlDown).Row
  
  'Első üres sor a Munka2 lap A oszlopában
  usor2A = Sheets("Munka2").Range("A5000").End(xlUp).Row + 1
  
  'Munka1 T oszlopának másolása a Munka2 A oszlopába
  Range("T2:T" & usorT).Copy Sheets("Munka2").Range("A" & usor2A)
  
  Sheets("Munka2").Select 'Szumha képlet a Munka2!B-be
  usorA = Range("A1000").End(xlUp).Row
  Range("B2:B" & usorA).Select
  Selection = "=SUMIF(Munka1!A:A,Munka2!A2,Munka1!B:B)"
  Range("C2:C" & usorA) = "=VLOOKUP(A2:A" & usorA & ",Munka1!A:I,8,0)"
  Range("D2:D" & usorA) = "=VLOOKUP(A2:A" & usorA & ",Munka1!A:I,9,0)"
  Range("A:D").Select
  Selection.Copy
  Selection.PasteSpecial Paste:=xlValues
  Application.CutCopyMode = False
  Cells(2, 1).Select
  
  'Munka1!T oszlop törlése
  Sheets("Munka1").Columns(20).Delete
  End Sub

• bozsozso őstag

  #9901

  #9900 Delila_1

  2011-04-01 16:17:19

  Új Válasz

  Ú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

  

  bozsozso

  őstag

  #9900 Delila_1

  Szia!

  Az alap kód az ez lenne:
  Sub Összegzés()
  Dim usorA As Long, usorG As Long, usor2A As Long
  Sheets("Munka1").Select
  usorA = Range("A1").End(xlDown).Row 'Alsó sor a Munka1 lapon
  'Irányított szűrés egyedi ('A' oszlop) értékekre a G1-be
  Range("A1:A" & usorA).AdvancedFilter Action:=xlFilterCopy, _
  CopyToRange:=Range("G1"), Unique:=True
  'Alsó sor a G oszlopban
  usorG = Range("G1").End(xlDown).Row
  'Első üres sor a Munka2 lap A oszlopában
  usor2A = Sheets("Munka2").Range("A5000").End(xlUp).Row + 1
  'Munka1 G oszlopának másolása a Munka2 A oszlopába
  Range("G2:G" & usorG).Copy Sheets("Munka2").Range("A" & usor2A)
  Sheets("Munka2").Select
  'Szumha képlet a Munka2!B-be
  Range("B2:B" & Range("A5000").End(xlUp).Row).Select
  Selection = "=SUMIF(Munka1!A:A,Munka2!A2,Munka1!B:B)"
  Selection.Copy
  Selection.PasteSpecial Paste:=xlValues
  Cells(2, 1).Select
  'Munka1!G törlése
  Sheets("Munka1").Columns(7).Delete
  End Sub

  Ami annyit tesz, hogy egyik munkalapról a másik munkalapra összesít azonos terméknevek mennyiségeit, de mivel ebben szerepel szerepel ár is ami az azonos termékeknél ugyan az, ezért szeretném még azt is átvinni a másik munkalapra. Ez lenne a H illetve I oszlopban.

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