Sziasztok! A következõ feladatot nem tudom bevinni excelbe. Van elõszezonom, fõszezonom, utószezonom dátummal behatárolva. Szeretnék olyan függvény készíteni, ami az érkezési és távozási dátum megadásával kiszámolja az adott szezonokban töltött napok számát. Elõre is köszönöm
Egyet próbálj meg: átviszed az adatokat egy másik lapra, vagy másik füzetbe, és ott állítod össze a diagramot. Több esetben elõfordult már, hogy egy-egy lap hibás volt, másik lapon jól hozta az eredményt. Diagramnál nálam még nem volt ilyen eset, de nem túl sok diagramot alkalamazok.
A nem egybefüggõ adatállományokhoz oszlop diagramok tartoznak. Ötödik éve mûködik így, nem volt ez gond eddig sem.
Ahol elõállt a probléma az a "C°min." a "C°max." és a "Szél" oszlopokhoz tartozó vonal diagram. Ebbõl a "Szél" vonala a másodlagos kategória tengelyhez tartozik. Ezeknek az oszlopoknak az adatállománya, épp a vonal diagram miatt, folyamatos.
Meg van itt is minden adatpont, tehát pl. helyes értékkel szerepel az ápr. 10. "C°max." értéke, és szerepel szintén helyes értékkel ápr. 11. "C°max." értéke.A két adatpont közti piros vonal viszont hiányzik!!! Elkövethetek bármit az adatokkal, formátum és teljes adatrészek másolása, cseréje,vagy bármi,az értékeknek megfelelõen változik a diagram, de az eddig is hiányos helyeken nem jelenik meg a vonal... Nem tudom, hogy a ChartObjects is lehet hibás...?!
Ahogy Yan írta a #965-ben, nem egybefüggõ az adatállomány. A "Felhõ" és az "Esõ" oszlopokban lyukak vannak, azért nem folyamatos a két vonalad. Nincs minden naphoz érték rendelve. Ha ezekhez adhatsz pl. 0 értéket, kitöltõdnek az üres helyek. Persze lehet, hogy a 0 meghamisítja az eredményt.
Tegyél be egy képet azokról az adatokról, amik hiányos grafikont eredményeznek, vagy csak simán írd le az értékeket. Hátha többre jutunk ezeknek az ismeretében.
Igen. A naponta bevitt adatpontok megvannak, csak az összekötõ vonalak hiányoznak idõnként!Adatsorok formázásánál is próbáltam már mindent... A tengely-> Skála-> Maximum/Minimum mostani átállítása (negyed évenként rendszeres)után kb. a tizedik adatbevitelnél jelentkezett elõször.
Megtörtént. Törölni nem kellett a sorokat, csak idõlegesen eltüntetni. Mint kiderült (privátban), az adatok listába vannak foglalva. Két makrót írtam, az elsõ csak azokat a sorokat mutatja, ahol az A oszlop adatai egyediek, a másik mindent felfed.
Sub Egyedi_rekordok() usor = Range("A65536").End(xlUp).Row Range("A1:A" & usor).AdvancedFilter Action:=xlFilterInPlace, Unique:=True End Sub
Sub Minden_rekord() ActiveSheet.ShowAllData End Sub
Így is nullát ír vagy pedig valami Név problémát. Ha =nukunév írom be akkor nem történik semmi. Viszont ha a függvényeknél megkeresem akkor a felhasználóinál megtalálható de akkor is név hiba.. és ez a függvény neve: =névlista.xls!Module1.NukuNév()
Az Alt+F11-gyel bejutsz a VB szerkesztõbe. Bal oldalon kiválasztod a saját fájlodat (nálam Munkafüzet1). Insert menü, Module. A jobb oldalon kapott üres lapra másold be, amit a képen látsz.
Na.. bedobtam egy képet,hogy néz ki az egész.. Oszlopokban 3 sortól vannak a nevek. Fölötte érték,hogy hány név van az oszlopban. piros összesítés. hány név van összesen. A szürkébe akarom azt kiíratni,hogy melyik betûnél nem szerepel még név egyáltalán.
Sikerült elvileg megcsiálni de nullát ír ki akár melyik sort adom meg neki. ha van név benne ha nincs
Hali.. Köszi a helpet de excelbõl nagyon láma vagyok. Kb tudok szöveget írni a kockákba meg pár laap függvényt használni :) Ha jól gondolom saját függvényt kéne létrehoznom ahova beírom amit elsõnek küldtél.. Ezt nem tudom, hogyan kell.
Az A1 képlete: =DÁTUM(ÉV(MA());HÓNAP(MA());NAP(1)) Az A2-é: =A1+1, ezt másold le. Lehet még cifrázni egy HA függvénnyel, hogy ne írja be egy 30 napos hónap végére a következõ hónap elsõ napját.
Egy oszlopban szeretném egymás alatt megjeleníteni az aktuális hónap napjait. Pl: 2010.04.01 ... 2010.04.30 formában Köszi
Tegyél ki valami példát, mert ebbõl nem lehet érteni, mit is szeretnél.
Hali.. Egy kérdésem lenne.. Csináltam egy táblázatot amiben A-Z ig nevek vannak az oszlopokban.. Egy oylan függvény kéne amivel meg tudom azt cisnálni,hogy kiírja melyik oszlopban nincs név.. Csak annyit,hogy Pl: Q,P,W Ezz meg lehet oldani?
Ha a számok után pontot teszel, már szövegként értelmezi az Excel. Igazítsd az oszlopot jobbra, és helyiértéküknek megfelelõen jelennek majd meg. Pont nélkül a számok alapértelmezésben jobbra igazodnak.
elfelejtettem, hogy kell beállítani hogy a számok az oszlopokban helyérték szerint jelenjenek meg. azaz ha nézek egy oszlopot akkor egymás alá kerüljenek a helyértékek. (a 0 a számok elõtt ne jelenjenek meg. : 001. 002. . . . 010. 011. . . . 100. 101. . . .
köszy szépen!
Szívesen. Létezik még á .--.- (akácméznyalás) ä .-.- é ..-.. (Elemér gyere, vagy evezõ nyele) ö ---. (õrállások) ü ..-- (üvegállvány)
Kicsit túlbonyolítottad a függvényeket. A CNorm()-nál a "D" és "E" között hiányzik egy vesszõ, a CMorse() csoportból pedig kimaradt egy morse jel. A MORSE funkciód nálam magát a betût, ill. a számot adta eredményül.
A módosított funkció:
Function Moorse(Betu As String) As String Dim CMorse, CNorm, C As String Dim M As Integer CNorm = Array("0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z") CMorse = Array("-----", ".----", "..---", "...--", "....-", ".....", "-....", "--...", "---..", "----.", ".-", "-...", "-.-.", "-..", ".", "..-.", "--.", "....", "..", ".---", "-.-", ".-..", "--", "-.", "---", ".--.", "--.-", ".-.", "...", "-", "..-", "...-", ".--", "-..-", "-.--", "--..") Betu = UCase$(Betu) M = WorksheetFunction.Match(Betu, CNorm) Moorse = CMorse(M) End Function
Az inverse-nél úgy gondoltam, hogy a CMorse()-ban kerestetem meg a jel helyét, és a CNorm() azonos helyén lévõ karaktert íratom ki. Ám valamiért a "..--" jelet, ami a 3. a sorban, a 15. helyen lévõnek találja meg a MATCH, számomra érthetetlen módon. Ezen még rágódom egy kicsit.
Sziasztok Egy kis segitségre lenne szükségem. Irtam egy függvényt, ami a morze jeleket irja ki, de megirtam az inverzét is de nem mükxik. Itt az egyik: Function MORSE(ByVal Text As String) As String Dim CMorse, CNorm, C As String Dim I, L, M As Integer CNorm = Array("0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "A", "B", "C", "D""E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z") CMorse = Array("-----", ".----", "..---", "...--", "....-", ".....", "-....", "--...", "---..", "----.", ".-", "-...", "-.-.", "-..", ".", "..-", "--.", "....", "..", ".---", "-.-", ".-..", "--", "-.", "---", ".--.", "--.-", ".-.", "...", "-", "..-", "...-", ".--", "-..-", "-.--", "--..") Text = UCase$(Text) L = Len(Text) On Error Resume Next For I = 1 To L C = Mid$(Text, I, 1) If C Like "[.-]" Then MORSE = CVErr(xlErrValue): Exit Function M = WorksheetFunction.Match(C, CNorm) - 1 If CNorm(M) = C Then MORSE = MORSE & CMorse(M) Else MORSE = MORSE & C End If If I < L And C <> "" Then MORSE = MORSE & "" Next I End Function és itt a másik ami nem mükxik: Function MORSEINVERSE(Texte As String) As String Dim CMorse, CNorm, C As String Dim I, L, M, J As Integer CMorse = Array("-", "--", "---", "-----", ".", "-.", "--.", "----.", ".-", "-.-", "--.-", ".--", "-.--", ".---", ".----", "..", "-..", "--..", "---..", ".-.", "-.-.", ".--.", "..-", "-..-", "..---", "...", "-...", "--...", ".-..", "..-.", "...-", "...--", "....", "-....", "....-", ".....") CNorm = Array("T", "M", "O", "0", "E", "N", "G", "9", "A", "K", "Q", "W", "Y", "J", "1", "I", "D", "Z", "8", "R", "C", "P", "U", "X", "2", "S", "B", "7", "L", "F", "V", "3", "H", "6", "4", "5") L = Len(Texte) On Error Resume Next I = 1 Do Do J = InStr(I, Texte, "") If J <> I Then Exit Do MORSEINVERSE = MORSEINVERSE & " " I = I + 1 Loop C = Mid$(Texte, I, IIf(J, J, L + 1) - I) M = WorksheetFunction.Match(C, CNorm) - 1 'Hol.van(Ké,T,Et) If CMorse(M) = C Then MORSEINVERSE = MORSEINVERSE & CNorm(M) Else MORSEINVERSE = MORSEINVERSE & C I = J + 1 Loop While J End Function elöre is köszönöm a segitséget
mso 'o7-ben Nézet menü; Panelek rögzítése; a folyamat ugyanaz
A sor alá és az oszlop mögé állsz, amiket állandóan látni akarsz. Ablak menü, Ablaktábla rögzítése. Ha A2-bõl rögzítettél, a felsõ sor marad állandóan a képernyõn. Ha B2-bõl indulsz, akkor a felsõ sor, és az A oszlop látszik folyton.
Sziasztok Azt hogy lehet megoldani, hogy excelben, egy adott sor mindég látszódjon, akármeddig is tekerem le a táblázatot, azt mindég lehessen látni? Kösszi
Nézd meg az elõbbi "Kép"-et. A makrókat ahhoz a laphoz kell rendelned, amelyiken mûködtetni szeretnéd. Mindkettõ a C:E tartomány celláira hat. Az elsõ jobb klikkre, a második duplaklikkre hajtja végre a feladatot.
köszi a gyors választ bejött(azt hittem nem fogjátok érteni XD)
Sziasztok! A következõ feladatban szeretném a segítségeteket kérni. 1.esemény: tetszõleges mezõbe kattintva beszínezi pirosra a cellát, és beír egy szöveget. pl.: "FALSE" 2.esemény: tetszõleges mezõbe duplán kattintva beszinezi zöldre a cellát, és beír egy szöveget. pl.: "OK" Ezt a funkciót nem az egész táblázatra szeretném alkalmazni, csak 3 oszlopra. Sajnos csak úgy tudom megoldani a fealdatot hogy billentyûparancsra fusson le a macro.
Üdvözlettel: ANP pl.: Sub Macro2() ' ' Macro2 Macro ' Macro recorded 2010.03.31 by ANP ' ' Keyboard Shortcut: Ctrl+k ' ActiveCell.FormulaR1C1 = "OK" With Selection.Interior .ColorIndex = 4 .Pattern = xlSolid End With End Sub
nekem kiírja végig. cella formázásnál esetleg válts át egyéni-[ó]:pp:mm -re
Ugyanilyen elgondolással egy BAL(A1;2) képletet szeretnék a B2 cellába beírattatni:
ActiveCell.FormulaR1C1 = "=Left(R[-1]C[-1];2)"
de „Run-time error ’1004’: Application-defined or object-defined error” hibaüzenetet kapok.
Tudna-e valaki segíteni?
megnyitod openoffice-al és elmented *.xls-be. érdekes hogy az oo tudja kezelni az *.xlsx fájlokat az mso nem :) saját magával nem kompatibilis :D
Hülyeséget írtam itt a nagy sietségemben (találtam egy file Format convertert) az rátelepítettem a 2003-asra és most már átkonvertálta.) köszi mégegyszer.
Igen 2003 as szervizcsomag van benti gépen,az otthonin meg 2007-es. Végül sikerült. Köszi a gyors válaszokat.
ha jól értelmeztem van egy szervízpack 3 a 2003 as office-hoz amit ha telepítesz meg tudod nyitni. olvasd át azért Te is, mert csak fél szemmel futottam át. link
Sziasztok.Lenne egy kérdésem,hátha tudtok segíteni.(fontos lenne) Otthon a 2007-es Excel be lett csinálva valami itt a benti gépen melóban 2003-as van,nem bírja megnyitni,hogyan lehet konvertálni vagy mit kell csinálni hogy a 2003-as megnyissa. Elõre is köszönöm(fontos lenne).
Sajnos azt hiszem annyira kezdõ vagyok, hogy még a választ sem értettem meg. BocsAzonban közben rájöttem, hogy egyszerûen =A1*B1 nullát ad eredményul, ha valamelyik nulla. A probléma az lehetett, hogy én szorzat függvénnyel próbálkoztam így:=SZORZAT(A1;B1)és érdekes módon ebben az esetben valamiért az egyik argumentum cella üresen hagyása estén azt 1-nek veszi. Ezt ugyan nem értem, de a lényeg, hogy sikerült. Azért köszönöm a segítséget
Sziasztok! Sajnos elég kezdõ vagyok az excelben ezért segítséget kérnék egy probléma megoldásában. Egy táblázatban szorzatokat kell létrehoznom, de az volna a cél hogyha az egyik szorzandó cella üres marad akkor a végeredmény vagyis a szorzat cella 0 legyen ill. üres maradjon. Most ugyanis az történik, hogy az üresen hagyott cellát 1-nek veszi a program.