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

• #37049 lasarus1988 tag

  Új Válasz 2018-01-18 19:43:08 #37049

  Ú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

  

  lasarus1988

  tag

  Sziasztok,

  egy kis segítséget szeretnék kérni:

  Adott mondjuk 'Szabik' nevű munkalap és azon az 'A' oszlopban rögzítek dátumokat 'yyyy-MM-dd' formátumban. 'Eredmeny' nevű munkalapon pedig szintén 'A' oszlopban felírom januártól decemberig a hónapokat és azt szeretném megtudni, hogy adott hónapban hány nap szabi lett kivéve 'Szabik' munkalap alapján.

  Egy minta fájlt elérhető az alábbi linken, a könnyebb érthetőség miatt és jó lenne, ha csak függvényt kellene használni.

  [Minta fájl]

  A segítséget előre is köszönöm.

• #34831 lasarus1988 tag Lya #34830

  Új Válasz 2017-04-05 17:03:50 #34831

  Ú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

  

  lasarus1988

  tag

  válasz Lya #34830 üzenetére

  Szia,

  magyar excel esetén: FKERES
  angol excel esetén: VLOOKUP

  függvényt kell használnod.

• #34749 lasarus1988 tag csferke #34746

  Új Válasz 2017-03-31 12:45:07 #34749

  Ú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

  

  lasarus1988

  tag

  válasz csferke #34746 üzenetére

  Az eredeti függyvényedben ';'-t használtál, de angol excelben sima ',' a függvény paraméterek elválasztója.

• #34744 lasarus1988 tag csferke #34742

  Új Válasz 2017-03-31 09:18:22 #34744

  Ú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

  

  lasarus1988

  tag

  válasz csferke #34742 üzenetére

  Szia,

  próbáld így: =CONCAT(B8,"-",TEXT(C8,"dd.MM.yyyy"))

• #34630 lasarus1988 tag lasarus1988 #34629

  Új Válasz 2017-03-24 09:48:37 #34630

  Ú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

  

  lasarus1988

  tag

  válasz lasarus1988 #34629 üzenetére

  Megoldódott! El kellett osztani 24-gyel a tört számot és idő formátumra formázni a cellát.

  Köszönöm

• #34629 lasarus1988 tag Fferi50 #34623

  Új Válasz 2017-03-24 09:37:47 #34629

  Ú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

  

  lasarus1988

  tag

  válasz Fferi50 #34623 üzenetére

  Szia,

  sajnos ez nem működik, mivel a tört szám tényleg szám (pl.: 127,24) és nem dátum (pl.: 1900.01.05 12:15:54).

  Köszi

• #34621 lasarus1988 tag

  Új Válasz 2017-03-24 09:10:06 #34621

  Ú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

  

  lasarus1988

  tag

  Sziasztok!

  Egy kis segítséget szeretnék kérni az alábbi számolgatásban. Excel 2016, angol nyelvű.

  Adott az A1 cellában a '127.208' szám érték és ezt szeretném idő formátumban megkapni '127:12:27'.
  Tehát egy tört számről szeretném tudni, hogy idő formátumban hogy nézne ki.

  Köszönöm a segítséget!

• #8886 lasarus1988 tag Zomb€€ #8885

  Új Válasz 2010-12-14 11:32:30 #8886

  Ú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

  

  lasarus1988

  tag

  válasz Zomb€€ #8885 üzenetére

  Nem, figyelembe veszi.

  If Instr("mák", cells(row, coluomn)) > 0 Or Instr("Mák", cells(row, coluomn)) > 0 Then

  End If

• #8884 lasarus1988 tag Zomb€€ #8883

  Új Válasz 2010-12-14 10:59:25 #8884

  Ú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

  

  lasarus1988

  tag

  válasz Zomb€€ #8883 üzenetére

  Zomb€€
  If Instr("mák", cells(row, column))>0 Then
  
  amit akarsz csinálni
  
  End If

  Egyébként nekem is lenne egy kérdésem:

  Hosszú idejű pingelést írtam meg vb makróban és akad benne egy hiba, ez pedig a timer átfordulása. 86400 után 0-tól újrakezdi számolni a napot.

  Ha csak pár órát mérek akkor működik így a dolog:
  Start = Timer
  Pause = 7200
  
  Do While Timer < Start + Pause
  
  mérés
  
  Loop

  Na most, ha én több napig szeretnék mérni, akkor hogyan tudom megoldani ezt do while ciklussal? Próbálkoztam a now() függvénnyel de nem igazán jártam sikerrel.

• #8064 lasarus1988 tag Fire/SOUL/CD #8062

  Új Válasz 2010-09-07 20:55:05 #8064

  Ú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

  

  lasarus1988

  tag

  válasz Fire/SOUL/CD #8062 üzenetére

  1. Köszönöm, hogy megnézted, megnyugodtam, hogy nem én vagyok a hülye!

  2.-3. Fejben tartom!

  Még egyszer köszönöm!

• #8061 lasarus1988 tag Fire/SOUL/CD #8060

  Új Válasz 2010-09-07 18:21:10 #8061

  Ú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

  

  lasarus1988

  tag

  válasz Fire/SOUL/CD #8060 üzenetére

  Sajnos pont az első sor a probléma a többi már csak diagram készítés. Egyébként beépített excel add-in az első sor (Analysis Toolpak, Analysis Toolpak - VBA).

  A makrók ugyanúgy vannak beállítva ahogyan Nálad!

  Próbáld ki a következőt:

  Excel beállításai/Bővítmények/Excel bővítmények/Ugrás->Analysis Toolpak, Analysis Toolpak - VBA pipa és OK

  Private Sub Workbook_Open()

  Range("A1").Select
  ActiveCell.FormulaR1C1 = "1"
  Range("A2").Select
  ActiveCell.FormulaR1C1 = "2"
  Range("A1:A2").Select
  Selection.AutoFill Destination:=Range("A1:A20"), Type:=xlFillDefault
  Range("A1:A20").Select
  Range("A1").Select
  Application.Run "ATPVBAEN.XLAM!Histogram", ActiveSheet.Range("$A$1:$A$20") _
  , ActiveSheet.Range("$D$1"), , False, False, False, False

  End Sub

  Ha ez megvan akkor rakj egy gombot a munkalapra és rendeld hozzá ugyanazt a fenti kódot. Ment, bezár, újra megnyit! Ha működik akkor a D és E oszlopban megjelennek a rekesz és gyakoriság értékek, hanem akkor nincs ott semmi.

  Nyomd meg a gombot! Megint nem történik semmi és ezt sokáig el tudod játszani.

  Manuálisan csináld meg a hisztogramot (Adatok fül/Adatelemzés/Hisztogram)
  Bemeneti tartomány : A1:A20
  Rekesz tartományt ne adj meg
  Kimeneti tartomány: D1

  D és E oszlopban megjelennek a rekesz és gyakoriság értékek! Töröld ki, nyomd meg a gombot és működik! De addig nem csinálja automatikusan amíg egyszer végig nem csinálod manuálisan.

  Bocsánat, ha nagyon szájba rágós lett, de három napja ezen töröm a fejem és nem jöttem rá a problémára.

  Köszönöm, ha kipróbálod!

• #8059 lasarus1988 tag Fire/SOUL/CD #8053

  Új Válasz 2010-09-07 17:40:50 #8059

  Ú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

  

  lasarus1988

  tag

  válasz Fire/SOUL/CD #8053 üzenetére

  Hello,

  miután megvannak az adatok amiket kiolvastam, akkor meghívom a hisztogram rutint, hogy készítse el a gyakoriság táblázatot illetve a hozzá tartozó oszlop diagramot.

  Application.Run "ATPVBAEN.XLAM!Histogram", ActiveSheet.Range("$A$2:$A$30") _
  , ActiveSheet.Range("$B$1"), , False, False, False, False

  ActiveSheet.Shapes.AddChart.Select
  ActiveChart.SetSourceData Source:=Range("'Munka2'!$A$1:$B$7")
  ActiveChart.ChartType = xlColumnClustered
  ActiveChart.Location Where:=xlLocationAsNewSheet
  Sheets("Diagram1").Select
  Sheets("Diagram1").Move After:=Sheets(4)
  Sheets("Munka1").Select
  Range("A1").Select

  Ha csak megnyitom az xls-t akkor hiba nélkül lefut a program, épp csak a gyakoriság táblázatot nem készíti el, de ha utána manuálisan újra lépésről lépésre megcsinálom, majd újra elindítom a programot, akkor már automatikusan megcsinálja ahogyan kéne.

  Köszönöm a segítséget!

• #8052 lasarus1988 tag

  Új Válasz 2010-09-07 13:54:41 #8052

  Ú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

  

  lasarus1988

  tag

  Sziasztok!

  A következő lenne a problémám:

  Sub Workbook_Open()

  Call ExcelForm.DeleteChart("Ping statisztika")
  Call ExcelForm.DeleteChart("Hisztogram")
  Call ExcelForm.DeleteChart("Rövid idejű jitter")
  Call ExcelForm.ClearSheet("Log")
  Call ExcelForm.ClearSheet("Eredmény")
  Call ExcelForm.ClearSheet("Gyakoriság")

  AddIns("Analysis ToolPak").Installed = True
  AddIns("Analysis ToolPak – VBA").Installed = True

  Application.WindowState = xlMaximized
  Sheets("Log").Select
  Range("A1").Select

  Load Ping
  Ping.Show

  End Sub

  Ebben a szubrutinban elvileg hozzáadom automatikusan az Analysis Toolpak csomagokat az excel bővítményeihez, hogy azokat használni tudjam.

  Az eredmény munkalapon adott oszlopból kéne hisztogramhoz adatot generálni. A bemeneti tartomány ez az oszlop, a kimeneti tartomány egy másik munkalap, a rekesz tartomány automatikus.

  Ha megnyitom ezt a rutint tartalmazó xls-t akkor minden lefut csak éppen a hisztogramhoz szükséges adatokat nem generálja le és ezért diagramon sincs ábrázolva. Ezt a jelenséget mindaddig csinálja, amíg egyszer manuálisan végig csinálom a hisztogram adatainak legenerálását, utána már csinálja rendesen. Ha bezárom a munkafüzetet és újra megnyitom akkor kezdi elölről.

  Valakinek valami tippje erre?

  Köszönöm a segítséget!

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